الرجاء من سيادتكم كود الفرز التصاعدي في قاعدة بيانات ado
بحيث أنني إذا أضفت أي بيانات يتم الترتيب تصاعديا
بمعتى أنن أعددت قاموس ومن فترة لأخرى أضيف كلمات جديدة فالرجاء المساعدة بحيث أنني كلما قمت بتشغيل الفورم أجد البيانات تم ترتيبها تصاعديا
وهذا هو كود التعرف على قاعدة البيانات في حدث form .load أرجو اكماله ولكم الشكر
db.Provider = "Microsoft.JET.OLEDB.4.0;"
db.Open App.Path & "\db1.mdb"
rs.Open "[hard words]", db, adOpenStatic, adLockPessimistic
إلى متى نظل عاجزين عن الإبداع في عالم البرمجة[وسط][/وسط]
اهلا بك اخي العزيز
يمكنك استخدام عبارة SQL لفتح الجدول من خلال كائن السجلات .. وهناك خاصيه للفرز لا اذكرها حاليا تتوفر في تقنية ADO ..
على العموم هذه هي جمله الاستعلام :
rs.Open "SELECT * FROM [hard words] OrderBy FieldName", db, adOpenStatic, adLockPessimistic
حيث FieldName هو اسم الحقل ..
يمكنك مراجعه كتاب الاخ ناصر فهو يحتوي على العديد من المراجع بخصوص جمل الاستعلام التي ستفيدك كثيرا جدا
تقبل تحياتي
[/وسط]
اللهم أزد من علمك استازى النبهانى
مشكووووووووووور
أعمل لدنياك كأنك تعيش أبداً وأعمل لأخرتك كأنك تموت غداً
أحفظ لسانك تصان كرامتك
-----------------
من مواضيعى بالمنتدى
جديد الباب الاول من كتابى المدخل الى قواعد البيانات
جديد دروس قواعد البيانات
الان حرك الماوس بواسطة الكيبورد
برنامج VB6 Projects Viewer مساعد المبرمجين
للأسف يا أخي لم تعمل وظهر لي الخطأ التالي بعد كتابة الكود في حدث foarm.load
إلى متى نظل عاجزين عن الإبداع في عالم البرمجة[وسط][/وسط]
أخي الكريم هذه الرسالة تقول أن المتغيير تم فتحه سابقاً ولتفادي هذه المشكلة أستخدم العبارة التارية : قبل جملة الاسكيو ال التي وضعها أخي النبهاني
IF RS.State = adStateOpen then Rs.Close rs.Open "SELECT * FROM [hard words] OrderBy FieldName", db, adOpenStatic, adLockPessimistic
تحياتي
OMANI FOR EVER
-------------------------------------------------
-------------------------------------------------
هذا الموضوع مغلق.