Estoy utilizando un código que he encontrado de visual basic para mi programa en visual studio 2005.
He conectado bien mi programa a MySQL, quiero hacer una simple consulta, pero me dice que las variables adOpenStatic y adLockOptimistic no han sido declaradas, ¿de que tipo y como he de declararlas? (soy novato)
Código:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
On Error GoTo Ver
Dim RecBD = New ADODB.Recordset
RecBD.Open("select * from contactos", BD, adOpenStatic, adLockOptimistic)
While Not RecBD.EOF
MsgBox("Su ID: " & RecBD.Fields(0) & " | " & " y su nombre " & RecBD.Fields(1), , "Información...")
RecBD.MoveNext()
End While
Exit Sub
Ver:
MsgBox("Nº de error: " & Err.Number & " | " & Err.Description, vbCritical, "Control de errores")
Err.Clear()
End Sub