Cita:
Iniciado por netgame necesito cargar en una grilla los datos que tengo en una tabla, para conectarme utilizo la siguiente conexion.
Dim cnn As New ADODB.Connection
Dim rec As New ADODB.Recordset
cnn.Open "Provider=SQLOLEDB;" & _
"Data Source=(local);" & _
"Initial Catalog=mermas;", "sa", ""
rec.Open "select * from PRODUCTOS", cnn, _
adOpenKeyset, adLockOptimistic
alguien podria echarme una manito.
OJALA TE SIRVA ESTE CODIGO...
Dim cnn as New ADODB.Connection
Dim rs as New ADODB.Recordset
Private Sub Form_Load()
' Linea de connexión a la BD
strSQL ="Select *from Productos"
rs.cursorLocation=AdUseClient
rs.Open strSQL,cnn, AdOpenStatic, AdLockReadOnly
set Datagrid1.Datasource=rs
End Sub
Ejecuta el Form
Suerte...