الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سوال : شلون اكتب الاكواد شلون اسويهن

بدأه مبرمج في 14 في 7 يونيو 2010 · 6 رد · 594 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلامـــ عليكمـــــ ورحمهـــ اللهـــ وبركاتهــــــ

كيفــــــــــــــ الحالـــــــــــــــــــــــــــــــــــــــــ

إن شاء اللهـــــــــــــــ مرتاحينـــــــــــــــــــــــــــ

اقول أنا تعلمت من هذا المنتدى اشي كثيرة ومفيدة بس في شغلة وحدة مو فهمه

ابي اسوي الاكواد شلون يعني شلون اصنع اكواد

ممكن تساعدوني

#2

و عليكم السلام ,

ممكن توضح أكثر ؟

سبحآن الله وبحمده .. سبحآن الله العظيم .. ,

#3
إشراقــه فجــر كتب:

و عليكم السلام ,

ممكن توضح أكثر ؟

يعني هذا مو كواد

  msAccessCn.ConnectionString = ConnString


        If TextBox1.Text = "" And TextBox2.Text <> "" Then
        MsgBox("أدخل اسم المستخدم")
        ElseIf TextBox1.Text <> "" And TextBox2.Text = "" Then
        MsgBox("أدخل كلمة المرور")
        ElseIf (TextBox1.Text = "" And TextBox2.Text = "") Then
        MsgBox("ادخل اسم المستخدم وكلمة المرور")
        End If


        If (TextBox1.Text <> "" And TextBox2.Text <> "") Then
        sqlstr = "select count(Us_Name) from Users where Us_Name='" & TextBox1.Text & " 'and Us_Password='" & TextBox2.Text & "'"

        msAccessCn.Open()
        Using cmd As New OleDbCommand(sqlstr, msAccessCn)
        If cmd.ExecuteScalar > 0 Then
        Me.Hide()
        Form3.Show()
        End If
        End Using
        msAccessCn.Close()

        Else
        MsgBox("اسم المستخدم او كلمة المرور غير صحيحة")
        End If

شلون تم تركيبة يعني منو سوه وشلون

#4

السلام عليكم

البرمجة يا أخي الكريم هي عبارة عن مجموعة من التعليمات التي تحقق هدف معين وكل تعليمة لها دورها فأي مشكلة تريد حلها يجب أن تبسطها إلى أجزاء وهذه الأجزاء إلى أجزاء أصغر فأصغر حتى نتمكن من النهاية بإستبدال كل جزء بتعليمة

وهذه العملية قد تكون ذهنية أوبحاجة إلى رسم وتوضيح وإستشارات.

تم تعديل هذه المشاركة بواسطة DOWNLOADER في 7 يونيو 2010 في 23:54

#5
DOWNLOADER كتب:

السلام عليكم

البرمجة يا أخي الكريم هي عبارة عن مجموعة من التعليمات التي تحقق هدف معين وكل تعليمة لها دورها فأي مشكلة تريد حلها يجب أن تبسطها إلى أجزاء وهذه الأجزاء إلى أجزاء أصغر فأصغر حتى نتمكن من النهاية بإستبدال كل جزء بتعليمة

وهذه العملية قد تكون ذهنية أوبحاجة إلى رسم وتوضيح وإستشارات.

ممكن تعطين كتاب تعليم البرمجية في الفيجوال بيسك دوت نت ( عربي )

#6

بص ياباشا الموضوع اسهل من مانت تتخيل و بسيط جدا

هو بس بيبتدى بفكرة و طريقة التنفيز مش مشكلة ياعنى الكود الانت حطه ده

انت عندك شاشة دخول مستخدمين و عايز لما المستخدم يدخل اسم المستخدم و كلمة المرور تتأكد أن هما صح و موجدين فعلا فى قاعدة البيانات بس هتحتاج تتأكل او تعمل Check او Validation ان المستخدم فعلا مدخل أسم مستخدم و مدخل كلمة مرور

فأول حاجة هتشوف أذا الراجل مداخل أسم مستخدم ولا لا

If TextBox1.Text = "" And TextBox2.Text <> "" Then

لو مش مدخل أسم مستخدم هطلعهله رسالة تحذير تطلب منه يدخل أسم مستخدم

تانى حاجة هتحتاج تعرف إذا كان المستخدم دخل كلمة مرور ولا لا

 ElseIf TextBox1.Text <> "" And TextBox2.Text = "" Then

و إذا كان المستخدم لم يدخل كلمة مرور تطلعله رسالة تطلب منه يداخل كلمة مرور

و زيادة على التأكيد هتشوف إذا دخل الاتنين ولا لا

ElseIf (TextBox1.Text = "" And TextBox2.Text = "") Then

و السطر ده زي قلته ياعنى ملوش لزمة ياعنى لما تيجي بعد كده تعمل Optimize للكود بتاعك ممكن تشيله مش هيفرق كتير

خلصنا اول جزء ان المستخدم فعلا مدخل إسم مستخدم و كلمة مرور هنروح للجزء الثانى انك هتروح على الداتا بيز و تتأكد إن كلمة المرور و إسم المستخدم صح

ولازم طبعا تكون كلمة المرور بتاعت المستخدم ده

 sqlstr = "select count(Us_Name) from Users where Us_Name='" & TextBox1.Text & " 'and Us_Password='" & TextBox2.Text & "'"

و دي جملة Query إستعلام على الداتا بيز و تفيد انك هتعمل Select لعدد Count ال Records الليها إسم المستخدم ده و كلمة المرور دي

و طبعا إ1ذا رجع صفر ياعنى مفيش كلمة المرور دي أو إسم المستخدم ده و إذا رجع رقم أكبر من صفر يبقى ف يبقى فعلا المستخدم ده موجود

 msAccessCn.Open()
 Using cmd As New OleDbCommand(sqlstr, msAccessCn)
 If cmd.ExecuteScalar > 0 Then
 Me.Hide()
 Form3.Show()
 End If
 End Using
 msAccessCn.Close()

و أحب أقولك ان الجزئية دي ممكن تتعمل ب 1000000 طريقة و دي ترجع لعقلية المبرمج و خبرته و عوامل كتير

و ممكن تقول إن دي طريقة من الطرق

و انا عن نفسي مش بفضل الطريقة دي عشان زي مقال إستاذ Ghost2010 قال دي فيها ثغرة Sql Injection و كمان لايوجد بها Optimize للكود

و توجد طرق كتير أفضل منها

لكن مش وحشة لمبتدىء بالعكس حلو جدا و مع الوقت الكود هيطور نفسه

زي مانت شايف أخر العزيز البرمجة ليست كتابة كود بالعكس الكود هو أخر شيء تفكر فيه لكن قبل مرحلة الكود لابد من الفكرة و هى دي المهم

فكر على ورق الاول بإستخدام Pseudo Code او Flow Chart و بعد متتكون الفكرة فى دماغك فكر بعد كده الطرق الممكن تعملها بيها ثم مرحلة كتابة الكود

و أخيرا Debug (مرحلة حل الأخطاء ) وانا عن نفسي بعتبرها أصعب مرحلة و أمتع مرحلة

بالتوفيق إن شاء الله

#7
Tornadofay كتب:

بص ياباشا الموضوع اسهل من مانت تتخيل و بسيط جدا

هو بس بيبتدى بفكرة و طريقة التنفيز مش مشكلة ياعنى الكود الانت حطه ده

انت عندك شاشة دخول مستخدمين و عايز لما المستخدم يدخل اسم المستخدم و كلمة المرور تتأكد أن هما صح و موجدين فعلا فى قاعدة البيانات بس هتحتاج تتأكل او تعمل Check او Validation ان المستخدم فعلا مدخل أسم مستخدم و مدخل كلمة مرور

فأول حاجة هتشوف أذا الراجل مداخل أسم مستخدم ولا لا

If TextBox1.Text = "" And TextBox2.Text <> "" Then

لو مش مدخل أسم مستخدم هطلعهله رسالة تحذير تطلب منه يدخل أسم مستخدم

تانى حاجة هتحتاج تعرف إذا كان المستخدم دخل كلمة مرور ولا لا

 ElseIf TextBox1.Text <> "" And TextBox2.Text = "" Then

و إذا كان المستخدم لم يدخل كلمة مرور تطلعله رسالة تطلب منه يداخل كلمة مرور

و زيادة على التأكيد هتشوف إذا دخل الاتنين ولا لا

ElseIf (TextBox1.Text = "" And TextBox2.Text = "") Then

و السطر ده زي قلته ياعنى ملوش لزمة ياعنى لما تيجي بعد كده تعمل Optimize للكود بتاعك ممكن تشيله مش هيفرق كتير

خلصنا اول جزء ان المستخدم فعلا مدخل إسم مستخدم و كلمة مرور هنروح للجزء الثانى انك هتروح على الداتا بيز و تتأكد إن كلمة المرور و إسم المستخدم صح

ولازم طبعا تكون كلمة المرور بتاعت المستخدم ده

 sqlstr = "select count(Us_Name) from Users where Us_Name='" & TextBox1.Text & " 'and Us_Password='" & TextBox2.Text & "'"

و دي جملة Query إستعلام على الداتا بيز و تفيد انك هتعمل Select لعدد Count ال Records الليها إسم المستخدم ده و كلمة المرور دي

و طبعا إ1ذا رجع صفر ياعنى مفيش كلمة المرور دي أو إسم المستخدم ده و إذا رجع رقم أكبر من صفر يبقى ف يبقى فعلا المستخدم ده موجود

 msAccessCn.Open()
 Using cmd As New OleDbCommand(sqlstr, msAccessCn)
 If cmd.ExecuteScalar > 0 Then
 Me.Hide()
 Form3.Show()
 End If
 End Using
 msAccessCn.Close()

و أحب أقولك ان الجزئية دي ممكن تتعمل ب 1000000 طريقة و دي ترجع لعقلية المبرمج و خبرته و عوامل كتير

و ممكن تقول إن دي طريقة من الطرق

و انا عن نفسي مش بفضل الطريقة دي عشان زي مقال إستاذ Ghost2010 قال دي فيها ثغرة Sql Injection و كمان لايوجد بها Optimize للكود

و توجد طرق كتير أفضل منها

لكن مش وحشة لمبتدىء بالعكس حلو جدا و مع الوقت الكود هيطور نفسه

زي مانت شايف أخر العزيز البرمجة ليست كتابة كود بالعكس الكود هو أخر شيء تفكر فيه لكن قبل مرحلة الكود لابد من الفكرة و هى دي المهم

فكر على ورق الاول بإستخدام Pseudo Code او Flow Chart و بعد متتكون الفكرة فى دماغك فكر بعد كده الطرق الممكن تعملها بيها ثم مرحلة كتابة الكود

و أخيرا Debug (مرحلة حل الأخطاء ) وانا عن نفسي بعتبرها أصعب مرحلة و أمتع مرحلة

بالتوفيق إن شاء الله

مشكوووووووووووووووووور أنا سويت اول برمجية لي

هي اسهل من هذي هذا هو الكود

If TextBox1.Text = "هنا نكتب اسم المستخدام" Then If TextBox2.Text = "هنا نكتب كلمة السر" Then Form2.Show

مواضيع مشابهة