Saludos, deseo llenar un datagrid con un recorset:
este es el codigo:
Código PHP:
Private Sub Form_Load()
Connect
Dim strSql As String
strSql = "SELECT * FROM tmpventa"
Set Rs = New ADODB.Recordset
Rs.CursorLocation = adUseClient
Rs.Open strSql, cnLogin, adOpenStatic, adLockReadOnly, adCmdText
With DataGrid1
Set .DataSource = Rs
.Columns(0).DataField = Rs.Fields(0).Name
.Columns(1).DataField = Rs.Fields(1).Name
.Columns(2).DataField = Rs.Fields(2).Name
.Columns(3).DataField = Rs.Fields(3).Name
.Refresh
End With
Me.Refresh
End Sub
y lo que sale al ejecutar la aplicacion es el datagrid con el numero de filas correspondientes a la cantidad de registros de la tabla, pero sin ningun dato.
Mi tabla tiene 7 registros y al ejecutar mi aplicacion, aparece el datagrid con las 7 filas correspondientes a cada registro, pero sin datos.
que podria estar mal en el codigo que doy?
Help please