mshflexgrid y facturar

fernando
03 de Septiembre del 2004
hola que tal tengo un mshflexgrid que contiene los productos que estoy facturando
y cuando me propongo a guardar esos datos en la tabla "facturacion"de la base de datos
solamente se guarda la ultima fila de datos del mshflexgrid alguien puede decirme
que tengo que hacer por favor.
Si no me exprese bien con la pregunta por favor avisenme



Dim NUMFILA As Long
Public cnn As ADODB.Connection
Dim Sql As String
Set cnn = New ADODB.Connection
'
cnn.Mode = adModeShareDenyNone
cnn.CursorLocation = adUseClient
cnn.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "dbAlmacen.mdb;Persist Security Info=False")


Sql = "insert into [facturacion] values (" & Val(Grid.TextMatrix(NUMFILA, 1)) & ", " & Val(Grid.TextMatrix(NUMFILA, 2)) & ", '" & Grid.TextMatrix(NUMFILA, 4) & "', " & Val(Grid.TextMatrix(NUMFILA, 6)) & ")"

cnn.Execute (Sql)

Caceres
03 de Septiembre del 2004
Mira tiens que hacer un Bucle(ciclo), para ir cambiando la fila es decir le da el valor de la primera fila hasta el total que tenga el Grid Porque con el ejemplo que pone solo le pasa el valor de la Ultima fila.bye suerte

Mr Cerebro
03 de Septiembre del 2004
debes pasar pasas la fila activa q contiene los datos
dim xfila as single

for xfila= 1 to grid.rows-1
call GuardarDetalleDoc(Xfila) '
next