السلام عليكم ........... قمت بتحويل رقم الحجز من نص إلى رقم في قاعدة البيانات
وأصبح كود البحث لايعمل
findstr = "No_b = '" & Val(Text7.Text) & "'" Data1.Recordset.FindFirst findstr If Data1.Recordset.NoMatch Then MsgBox " ÚÝæÇÑÞã ÍÌÒ ÛíÑ ãæÌæÏ ", vbMsgBoxRtlReading + vbMsgBoxRight, " ÊäÈíÉ" End If
وتظهرلي رسالة الخطأ هذه
مالحل لانني أريد أن أجعل الترقيم تلقائي بواسطة كود ولاتتم عملية الزيادة الا إذا كان نوع الحقل رقم
أرجوا توضيح سبب المشكلة
وجزاكم الله خير
تم تعديل هذه المشاركة بواسطة k.f.u في 17 يناير 2007 في 06:04
سبحان الله وبحمده سبحان الله العظيم ..أستغفر الله
جملة البحث التي وضعتها خاصة بالحقول النصية وليس الرقمية وقد واجهتني هذه المشكلة من قبل وقد قمت بحلها بطريقة غريبة شوية وهي انك تحتفظ برقم الحجز كما هو نص وتقوم بإنشاء جدول جديد به حقر واحد وهو رقم الحجز ولكن حقل رقمي بحيث الزيادة تكون في هذا الرقم ثم تحويل قيمته الى حقل رقم الحجز النصي في الجدول الاساسي
وإذا لم تقتنع بهذه الطريقة قم بالبحث في مواضيع الاخ Omani فهو لو موضوع قوي عن البحث ولكن باستخدام SQL وشكرا
اقتباسلا تنسوا محمد الدرة وايمان حجو وفارس عودة ....
لا تنسوا القدس وبغداد وبيروت والشيشان ....
ولا تنسوا الشيخ ياسين ود. الرنتيسي وشهداء القضية
اقتباسلو هدوا بيتي منا خايف لو كسروا عظامي انا زاحف
مواضيعي بالمنتدي
(2) جميع رسائل الخطأ التي قد تظهر عند تشغيل مشروعك في ملف واحد
(3) كيف تنشأ اسم مستخدم وكلمة مرور بصلاحيات معينة لبرنامجك
(4) برنامج لمعرفة الــ ASCII كود لأي مفتاح على لوحة المفاتيح
(5) مثال على نقل عناصر من List Box إلى أخرى مع الترتيب (الفرز)
(6) مثال لتفقيط المبالغ المالية بالحروف
اللهم ارحم والداى كما ربياني صغيراً
ًWelcome Back
جرب الكود التالي
findstr = "No_b = " & Trim(Text7.Text) & ""
جزاكم الله خير وأكثر من امثالكم ونفع الله بعلمكم الدين
سبحان الله وبحمده سبحان الله العظيم ..أستغفر الله
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…