morika
پنج شنبه 26 اردیبهشت 1387, 13:28 عصر
سلام
من با این کد تو بانک جستوجو می کنم و با دادن نام و نام خانوادگی شماره تلفن رو می گیرم اما اگه دوتا نام خانوادگی یکی باشه دیگه این کد جواب نمیده چیکار کنم؟
For j = 0 To Adodc1.Recordset.RecordCount
If Adodc1.Recordset.Fields("Name") = Trim(Text1.Text) Then
Msgbox Adodc1.Recordset.Fileds("Name")
Exit Sub
end if
Adodc1.Recordset.MoveNext
Next
من با این کد تو بانک جستوجو می کنم و با دادن نام و نام خانوادگی شماره تلفن رو می گیرم اما اگه دوتا نام خانوادگی یکی باشه دیگه این کد جواب نمیده چیکار کنم؟
For j = 0 To Adodc1.Recordset.RecordCount
If Adodc1.Recordset.Fields("Name") = Trim(Text1.Text) Then
Msgbox Adodc1.Recordset.Fileds("Name")
Exit Sub
end if
Adodc1.Recordset.MoveNext
Next