Topic: REQ. searching record in database using inputbox in VB 6.0

[ֆ™JinDa™ֆ]

salamat po s magrereply

[dragknot11]

a=inputbox("Bla bla")

If Adodc1.Recordset.EOF = True Then
Else
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find "[Item_Code]='" & a & "'"
If Adodc1.Recordset.EOF = True Then
MsgBox "No Item Found on the Meralco Database!", , "No Item Found"
Else

End If
End If


'bayad ko ha.