[Ahmed_Mansoor]

أهلا أخي الكريم , تم تعديل الكود , أعتقد أنه يجب عليك تغيير إسم الجدول لأن الكلمة Query أعتقد محجوزة أو ممكن تسبب لك أخطاء لذلك غير إسم الجدول بوضع حرف قبل أو بعده غيره في قاعدة البيانات وأيضاً في جملة الإستعلام كما عدلتها أنا , وأيضاً عندما تبحث بإسم حقل نصي في جملة الإستعلام فلاتضع مسافات بعد أو قبل التنصيص المفرد الذي يستخدم للحقول التي نوعها "نص" لأن المسافات ستعتبر من ضمن نص البحث .

PHP كود :

Private Sub Command1_Click()

Adodc1.RecordSource = " Select * From zQuery where name_s='" & Trim$(Text1.Text) & "'"
Adodc1.CommandType = adCmdText
Adodc1.Refresh

If Adodc1.Recordset.RecordCount > 0 Then
   Set DataGrid1.DataSource = Adodc1
Else
   Set DataGrid1.DataSource = Nothing
End If

End Sub