francisco
23 de Marzo del 2003

Tengo una consulta echa en un control tex pero cuando digitalizo algo en el control unas veces me da la consulta y otra vez la fila que corresponde por que
Set res = mibase.OpenRecordset("select * from librdiario WHERE Ref Like '*" & Val(Text1.Text) & "*'", dbOpenDynaset)
If KeyAscii = 13 Then

If res.RecordCount = 0 Then

MsgBox "No hay datos que coincidan con la búsqueda especificada," & vbCrLf & "(o no está bien realizada)", 64, "Referencia"
Exit Sub

End If
MSFlexGrid1.TextMatrix(1, 1) = res!ref
End If