السّلام عليكم و رحمة الله و بركاته
إخواني الأعزّاء .. أساتذتنا الأكارم بكل ود واحترام .. كيف يمكن أضيف عمليّة البحث بأوّل حرف من الاسم بالتاكست 6 داخل الفليكس جريد .. جرّبت وضع كود بالتاكست 6 change لكن الأمور لم تضبطْ معي و تسرْ على أحسن ما يرام .. و لذلك لو تكرّمتم البحث يكون بأول حرف في الاسم أو اللقب
ثانيا أساتذتي الأكارم لماذا التّرقيم داخل الفليكس جريد لا يظهر متسلسلاً 1-2-3-4-5
بارك الله فيكم مسبّقا و في صحّتكم و أولادكم و أوقاتكم
إحتراماتي
اولا الترقيم يا البسكري
اللغة المكتوبة بين القوسين هي الرقم
rs.Open "USERS order by [ÇáÑÞã]", MyDb, adOpenStatic, adLockPessimistic
والشباب الباقي مايقصرو
تقريبا جرب
Set DB = OpenDatabase(App.Path & "\DOUSSA.mdb", 2)
If rs.State = 1 Then rs.Close
'البحث بحقل اللقب
'Set RS = DB.OpenRecordset("select * from Table1 where [Nom] Like'" & Text1.Text & "*'")
'البحث بحقلي الاسم و اللقب
Set rs = DB.OpenRecordset("Select * From USERS Where الاسم=%'" & Val(Trim$(Text6.Text)) & " Or اللقب Like '" & Trim$(Text6.Text) & "*'")
السّلام عليكم و رحمة الله و بركاته
ألف شكر وبارك الله فيك و لك أخي الكريم AMER2000 على نيّة المساعدة
لكن مع الأسف عزيزي لم أفهم أين أضع الكود الخاص بترتيب التّرقيم على الفليكس جريد و بقيّة الأكواد لم تضبط معي هي تقريبا نفس الأكواد المتواجدة داخل الفورم
تقبّل خالص إحتراماتي
rs.Open "USERS order by [ÇáÑÞã]", MyDb, adOpenStatic, adLockPessimistic
عدله داخل form_load
تحياتي
وعليكم السّلام و رحمة الله و بركاته
أهلا بك أخي عبدالعزيز , تم تعديل المثال .
السّلام عليكم و رحمة الله و بركاته
أخي الكريم AMER2000
قمت فعلاً بما أخبرتني به .. لكن تظهر رسالة الخطأ بهذا السّطر
أين الخلل .. الله أعلم
إحتراماتي
السّلام عليكم و رحمة الله و بركاته
" إذا حضر الماء بطل التيمّم "
باسم الله .. ما شاء الله .. تبارك الله
فعلاً لا أجد العبارات اللائقة لأفيك حقّك أستاذنا الغالي " أحمد منصور "
نوّر الله طريقك و قلبك و دنياك و آخرتك مثلما نوّرت طريقي بالعلم و المعرفة
تمام التّمام و لله الحمد و الشكر
خالص محبّتي في الله
