ارجوا تعديل هذا الكود لكى يبحث عن طريق تلاثة حقول
If rs.State = adStateOpen Then rs.Close
SQL = "SELECT * From [Tabel] where [1]='" & (Text1.Text) & "'and ([2]='" & (Text2.Text) & "'and ([3]='" & (Text3.Text) & "')"
rs.Open SQL, db, adOpenStatic, adLockPessimistic
Text4.Text = rs.Fields("4").Value
Text5.Text = rs.Fields("5").Value
Text6.Text = rs.Fields("6").Value
