Boni
|
JABOTICABAL SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 07/10/2004 16:34 hs
' ---------------------- Percorrendo todas as linhas do grid For X = 1 To Grid.Rows - 1 Grid.Row = X Sql = "INSERT INTO LANCMOVCONTACORRENTE VALUES (" _ & txtNumero.Text & ", " _ & Grid.TextMatrix(Grid.Row, 0) & ", " _ & Grid.TextMatrix(Grid.Row, 1) & ", " _ & Grid.TextMatrix(Grid.Row, 2) ", " _ & Grid.TextMatrix(Grid.Row, 3) ")" ExecutaSql Next End Sub
[] Boni www.bonattiweb.com.br www.xxformandosfatec.com.br
|
|
|