الاخوة الكلام
السلام عليكم ورحمة وبركاته
كيف يتم البحث برقم الصنف إذا كانت قيمة رقم الصنف في قاعدة البيانات (نص) ؟؟
نامل من الله المساعدة في برنامجي المرفق والله يحفظكم ويرعاكم
إذا ضاقت بك الأحوال يوماً فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
لو جعلت رقم الصنف نوع رقم فهو أفضل
على العموم الحقل النصي تستخدم معها علامات التنصيص المفردة '' والرقمي بدون
كود :
Set RS = DB.OpenRecordset("Select * From Store Where iD='" & Val(Trim$(fox.TextMatrix(fox.Row, 0))) & "'")
كود :
Set RS = DB.OpenRecordset("Select * From Store Where iD='" & Val(Trim$(fox.TextMatrix(fox.Row, 0))) & "'", 2)
.....
اخي العزيز
السلام عليكم ورحمة وبركاته
في الاول اسمح لي ان اقدم لك جزيل الشكر والتقدير على ماتقدمه من دعم فني
ملاحظه هامه
اخي العزيز المشكله انه عدما يكون رقم الصنف رقم واريد إدخال 13 عدد في رقم الصنف لا يقبل ؟؟
والله يحفظكم ويرعاكم
إذا ضاقت بك الأحوال يوماً فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
قمت بتغيير نوع الحقل إلى [رقم] في قاعدة البيانات ولم أقم بأي تعديل في البرنامج
وأدخلت رقم الصنف ثم ضغطت [إنتر] فأحضر البيانات
وأدخلت العدد وضغطت [إنتر] فقام بإظهار الناتج
ولم تحدث مشكلة
تنفيذ البرنامج جيد
الحدث (fox_KeyPress) كان مضغوطاً جداً
ولو جعلته على أجزاء بشكل دوال Functions وتستدعيها بالاسم
لكان أفضل للتعديل لاحقاً أوالتطوير مستقبلاً
قمت بتغيير نوع الحقل إلى [رقم] في قاعدة البيانات ولم أقم بأي تعديل في البرنامج
وأدخلت رقم الصنف ثم ضغطت [إنتر] فأحضر البيانات
وأدخلت العدد وضغطت [إنتر] فقام بإظهار الناتج
ولم تحدث مشكلة
تنفيذ البرنامج جيد
الحدث (fox_KeyPress) كان مضغوطاً جداً
ولو جعلته على أجزاء بشكل دوال Functions وتستدعيها بالاسم
لكان أفضل للتعديل لاحقاً أوالتطوير مستقبلاً
.....
----------
اخي العزيز
لك مني فائق الشكر والتقدير على هذه النصحه والله يحفظكم ويرعاكم
إذا ضاقت بك الأحوال يوماً فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ