04-04-13, 03:12 PM
الصور توضح المشكلة
04-04-13, 05:02 PM
قبل السطر المضلل بالأصفر ضع مسافة بين النجمة و (from)
04-04-13, 06:13 PM
السلام عليكم...
الأمر بسيط!
لديك متغيران باسم db و كلاهما يمكن لكود الـ Form أن يصل إليه. أحدهما في الـ Module و الآخر في كود الـ Form. هذا لا يعتبر تعارضاً لأن كلاً منهما معرف في وحدة منفصلة، و لكن عندما تطلب من الكود أن يستعمل المتغير db فإنه سيستعمل الأقرب، أي المعرف في كود الـ Form و هذا ستكون قيمته Null لأنك لم تقم بفتحه، حيث أن استدعاء الإجراء conn يعمل على فتح الاتصال باستخدام المتغير المعرف في الـ Module.
الحل: احذف جملة Dim db As New ADODB.Connection الموجودة في بداية كود الـ Form.
نرجو الاستفادة و السلام.
الأمر بسيط!
لديك متغيران باسم db و كلاهما يمكن لكود الـ Form أن يصل إليه. أحدهما في الـ Module و الآخر في كود الـ Form. هذا لا يعتبر تعارضاً لأن كلاً منهما معرف في وحدة منفصلة، و لكن عندما تطلب من الكود أن يستعمل المتغير db فإنه سيستعمل الأقرب، أي المعرف في كود الـ Form و هذا ستكون قيمته Null لأنك لم تقم بفتحه، حيث أن استدعاء الإجراء conn يعمل على فتح الاتصال باستخدام المتغير المعرف في الـ Module.
الحل: احذف جملة Dim db As New ADODB.Connection الموجودة في بداية كود الـ Form.
نرجو الاستفادة و السلام.
04-04-13, 10:07 PM
نفس المشكلة
انا جربت الحلين
ونفس المشكله
انا جربت الحلين
ونفس المشكله
05-04-13, 03:48 AM
السلام عليكم...
المعذرة! لم أنتبه إلى أن المتغير db المعرف في الـ Module معرف بجملة Dim. استعمال Dim لتعريف متغير (أو ثابت Const) تجعله خاصاً (Private) لتلك الـ Module فقط.
الحل:
1. احذف جملة Dim db As New ADODB.Connection الموجودة في بداية كود الـ Form.
2. عدل التعريف الموجود في الـ Module ليكون هكذا: Public db As New ADODB.Connection أي باستعمال Public بدل Dim ليكون المتغير db معروفاً على مستوى المشروع (أي يمكن الوصول إليه من أي مكان في المشروع).
نرجو الاستفادة و السلام.
المعذرة! لم أنتبه إلى أن المتغير db المعرف في الـ Module معرف بجملة Dim. استعمال Dim لتعريف متغير (أو ثابت Const) تجعله خاصاً (Private) لتلك الـ Module فقط.
الحل:
1. احذف جملة Dim db As New ADODB.Connection الموجودة في بداية كود الـ Form.
2. عدل التعريف الموجود في الـ Module ليكون هكذا: Public db As New ADODB.Connection أي باستعمال Public بدل Dim ليكون المتغير db معروفاً على مستوى المشروع (أي يمكن الوصول إليه من أي مكان في المشروع).
نرجو الاستفادة و السلام.
05-04-13, 04:12 PM
ضهر لي هذا الخطأ
05-04-13, 04:44 PM
السلام عليكم...
الرسالة تحجب الجملة التي فيها الخطأ.
نرجو التوضيح.
سلام.
الرسالة تحجب الجملة التي فيها الخطأ.
نرجو التوضيح.
سلام.
05-04-13, 04:51 PM
هذا التوضيح
05-04-13, 06:03 PM
الواضح ان تكست بوكس 1
يحمل نص وليس رقم
لذلك عدل الكود الذي اعلا التضليل الأصفر ليصبح كالتالي :
يحمل نص وليس رقم
لذلك عدل الكود الذي اعلا التضليل الأصفر ليصبح كالتالي :
PHP كود :
sql = "select * from users where num ='" & Text1.Text & "'"
05-04-13, 09:34 PM
السلام عليكم...
إذا كان نوع الحقل num نصي فأحد الأسباب ما ذكره أخونا حريف برمجة، أي يجب حصر القيمة بين علامتي تنصيص أو اقتباس.
لكن يبدو لي أنه لا يوجد لديك أصلاً حقل باسم num و لهذا يعترض بأنه لم تعط قيمة لمعلمة (بارامتر parameter). انظر إلى السطرين بعد RS.AddNew ستجد أن لديك حقلين هما user و password و لا يوجد حقل باسم num.
أعتقد أن جملة SQL يجب أن تكون كالتالي:
نرجو الاستفادة و السلام.
إذا كان نوع الحقل num نصي فأحد الأسباب ما ذكره أخونا حريف برمجة، أي يجب حصر القيمة بين علامتي تنصيص أو اقتباس.
لكن يبدو لي أنه لا يوجد لديك أصلاً حقل باسم num و لهذا يعترض بأنه لم تعط قيمة لمعلمة (بارامتر parameter). انظر إلى السطرين بعد RS.AddNew ستجد أن لديك حقلين هما user و password و لا يوجد حقل باسم num.
أعتقد أن جملة SQL يجب أن تكون كالتالي:
كود :
sql = "SELECT * FROM users WHERE [color=#FF0000]user[/color] = '" & Text1.Text & "'"نرجو الاستفادة و السلام.