المشاركات : 1,556
المواضيع 14
الإنتساب : Apr 2013
السمعة :
253
الشكر: 3551
تم شكره 4875 مرات في 1243 مشاركات
قبل السطر المضلل بالأصفر ضع مسافة بين النجمة و (from)
المشاركات : 372
المواضيع 15
الإنتساب : Sep 2013
السمعة :
28
الشكر: 487
تم شكره 1677 مرات في 187 مشاركات
السلام عليكم...
الأمر بسيط!
لديك متغيران باسم db و كلاهما يمكن لكود الـ Form أن يصل إليه. أحدهما في الـ Module و الآخر في كود الـ Form. هذا لا يعتبر تعارضاً لأن كلاً منهما معرف في وحدة منفصلة، و لكن عندما تطلب من الكود أن يستعمل المتغير db فإنه سيستعمل الأقرب، أي المعرف في كود الـ Form و هذا ستكون قيمته Null لأنك لم تقم بفتحه، حيث أن استدعاء الإجراء conn يعمل على فتح الاتصال باستخدام المتغير المعرف في الـ Module.
الحل: احذف جملة Dim db As New ADODB.Connection الموجودة في بداية كود الـ Form.
نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
المشاركات : 148
المواضيع 29
الإنتساب : Sep 2012
السمعة :
0
الشكر: 0
تم شكره 4 مرات في 4 مشاركات
نفس المشكلة
انا جربت الحلين
ونفس المشكله
المشاركات : 372
المواضيع 15
الإنتساب : Sep 2013
السمعة :
28
الشكر: 487
تم شكره 1677 مرات في 187 مشاركات
السلام عليكم...
المعذرة! لم أنتبه إلى أن المتغير 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 معروفاً على مستوى المشروع (أي يمكن الوصول إليه من أي مكان في المشروع).
نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
المشاركات : 372
المواضيع 15
الإنتساب : Sep 2013
السمعة :
28
الشكر: 487
تم شكره 1677 مرات في 187 مشاركات
السلام عليكم...
الرسالة تحجب الجملة التي فيها الخطأ.
نرجو التوضيح.
سلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
المشاركات : 372
المواضيع 15
الإنتساب : Sep 2013
السمعة :
28
الشكر: 487
تم شكره 1677 مرات في 187 مشاركات
السلام عليكم...
إذا كان نوع الحقل num نصي فأحد الأسباب ما ذكره أخونا
حريف برمجة، أي يجب حصر القيمة بين علامتي تنصيص أو اقتباس.
لكن يبدو لي أنه لا يوجد لديك أصلاً حقل باسم num و لهذا يعترض بأنه لم تعط قيمة لمعلمة (بارامتر parameter). انظر إلى السطرين بعد RS.AddNew ستجد أن لديك حقلين هما user و password و لا يوجد حقل باسم num.
أعتقد أن جملة SQL يجب أن تكون كالتالي:
كود :
sql = "SELECT * FROM users WHERE [color=#FF0000]user[/color] = '" & Text1.Text & "'"
نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ