[farid34000]

السلام عليكم
قمت بإنشاء مشروع متابعة لكن تفاجأت بعدم القيام بالبحث عن جزء من الكلمة بخاصية '%' ولا يمكن البحث الا على الكلمة الكاملة مثل هذه الامثلة:
البحث عن الرقم 1112221 في Ticket يجب أن يكون كاملا مثلا لا يجب ان يكون 111 او 1112 وإلا لن يظهر حتى باضافة خاصية '%" في المثال الموضح في الاسفل
Private Sub Command13_Click()
On Error Resume Next
a = InputBox("input Ticket")
Adodc1.RecordSource = "select * from SUIVIE_PDR where Ticket='" & a & "'"
Adodc1.CommandType = adCmdText
Adodc1.Refresh
End Sub

البحث بالاسم كذلك يجب ان يكون كاملا مثلا : Amar، لو كتبت AM فلن تظهر حتى باضافة خاصية '%" في المثال الموضح في الاسفل

Private Sub Command14_Click()
On Error Resume Next
a = InputBox("entrée le Nom de Client")
Adodc1.RecordSource = "select * from SUIVIE_PDR where Nom_Client='" & a & "'"
Adodc1.CommandType = adCmdText
Adodc1.Refresh
End Sub

لو قمت بتغيير البرمجية إلى :
= "SELECT * FROM SUIVIE_PDR WHERE Ticket LIKE '%" & searchString & "%'"
فلا يقوم المحرر باظهار اي شيء او يظهرها فارغة وكأن الشيء المراد البحث عنه لا يوجد

أود مساعدتي في عمل مثلا زر للبحث المخصص مثلا كل تكست بزر بحث خاص بها وكذا زر يبحث عن اي شيء في قاعدة البينات سواء جملة كاملة أو جزء من الكلمة
وشكرا لكم