Cita:
Iniciado por carbon 
Hola. No se realmente a que te refieres con "rejilla". Primero por qué no intentas establecer la conexión con la DB? Hay muchos códigos sobre eso en VB6 (sobretodo access!).
Y como ya es de costumbre preguntar, por qué usas VB6, teniendo en cuenta que no se actualiza desde 1996 o por ahí y está super obsoleto.
Hola!
Muchas gracias por tomarte el tiempo en responder.
y tienes toda la razon de que no se actualiza desde 1996, pero como es para darle mantenimiento a un sistema ya hecho, que por cierto el que lo hizo no documento lo suficiente, y yo por mi parte ni me acuerdo más de como se hacian ciertas cosas en vb6
y para los que quieran, aqui esta una solución.
Código:
With Grid1
For i = 1 To .Rows - 1
If Len(.TextMatrix(i, 1)) > 0 Then
Dato1 = .TextMatrix(i, 1)
Dato2 = .TextMatrix(i, 2)
Dato3 = Val(.TextMatrix(i, 3)) 'Supongamos que es un número, poner val es una costumbre personal cuando no declaró la variable Dato3. Lo correcto seria declararla.
sql = "INSERT INTO TuTabla (Campo1, Campo2, Campo3) " & _
"VALUES ('" & Dato1 & "', '" & Dato2 & "', " & Dato3 & ")"
cn.Execute sql, , adCmdText
End If
Next i
End With
