[elgokr]

(20-06-18, 06:04 AM)princeofislam كتب : شكرا لك سيدي لاكن الكود اعطاني خطاء

ما هى رسالة الخطاء الذى تحدث معك

لان من الواضح ان السبب فقط لعدم وجود مسافة فى هذا الجزء

كود :

& "ORDER BY ID"

لتصبح بعد المسافة

كود :

& " ORDER BY ID"

او يمكنك جعل كود الاستعلام بهذا الشكر لتجنب اخطاء المسافات وتشابك الكلمات

كود :

Adodc1.RecordSource = "select * from KASS where ID>='" & Val(Trim$(Text8.Text)) & "' And ID<='" & Val(Trim$(Text9.Text)) & "' ORDER BY ID"

تحياتى لك 

وتمنياتى لك التوفيق