Hola que tal como estan, nuevamente los molesto con una duda, estoy haciendo una aplicacion que mediante una db responde preguntas, el problema radica en que cuando quiero probar la aplicacion me tira este error "procedimiento externo no valido" en la segunda linea podria alguien decirme que hice mal, no se si esto influya en algo pero la db tiene una tabla llamada dialogo y dos columnas, la primera es pregunta y la segunda es respuesta
Código (vb) [Seleccionar]
Dim adoConexion As New ADODB.Connection
adoConexion.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0; Persist Security Info=True; Data Source = (App.Path & \Dialogo.MDB)"
adoConexion.Open
Dim sSQLQuery As String
sSQLQuery = "SELECT *" & vbCr
sSQLQuery = sSQLQuery & "FROM Dialogo" & vbCr
sSQLQuery = sSQLQuery & "WHERE Nombre = '" & Text2.Text & "'" & vbCr
Dim adoRegistros As New ADODB.Recordset
adoRegistros.Open sConsulta, adoConexion, adOpenStatic, adLockReadOnly
Private Sub Command1_Click()
If adoRegistros.BOF = adoRegistros.EOF And adoRegistros.EOF = False Then
Label1.Text = adoConsulta!Respuesta
End If
End Sub