base de datos y visual basic
bueno tengo un pequeño problema, no puedo pasar los querys"base de datos" a un programa de visual basic. ya que recorset no acepta ser una variable..
si tu conexion es ado usa este codigo
Private Sub Form_Load()
cnns = "data source=war;initial catalog=northwind;provider=msdasql.1"
With cnn
.ConnectionString = cnns
.Open
If .State <> adStateOpen Then
MsgBox "no hay conexion"
Else
Me.Caption = "ACTIVE CONNECTION"
End If
sql = "select * from shippers"
rst.Open sql, cnn, adOpenStatic
mostrar
End With
End Sub
solo adecua tu data source
si necesitas algo mas escribeme al correo ok
Private Sub Form_Load()
cnns = "data source=war;initial catalog=northwind;provider=msdasql.1"
With cnn
.ConnectionString = cnns
.Open
If .State <> adStateOpen Then
MsgBox "no hay conexion"
Else
Me.Caption = "ACTIVE CONNECTION"
End If
sql = "select * from shippers"
rst.Open sql, cnn, adOpenStatic
mostrar
End With
End Sub
solo adecua tu data source
si necesitas algo mas escribeme al correo ok
