hola amigos (a) soy nuevo en esto y estoy aprendiendo
pero me salio el siguiente error
errro en tiempo de ejecucion "3704"
y me marca la siguiente linea con el error
Código PHP:
Private Sub Text3_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If Len(Text3) > 0 Then
If valrut(Val(Text2)) = Text3 Then
sql = " SELECT*FROM datospacientes WHERE RutPacientes =" & Text2.Text
Adodc1.RecordSource = sql
Adodc1.Refresh
Set rst = con.Execute(sql) // aeuip me mearca ek error
If rst.EOF Then
SW = 1
MsgBox (" Paciente no registrado ingrese nuevos datos ")
Text2.SetFocus
Else
si me peden echar una mano