hm1020
|
CASTELANDIA
GO - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 05/10/2010 10:08 hs
Pessoal, Bom dia Gostaria que algume me ajudasse na segunite situação: Tenho BD que se chama MERCADO, e uma tabela que se chama VENDA no meu formulario tenho um MSFLEXGRID, que se chama GDVenda, como eu faço para gravar os dados desse grid nesse banco de dados. uso VB6, com DAO 3.6, ACCESS |
|
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 05/10/2010 11:09 hs
poste como vc faz a inclusão em seu banco
assim fica mais fácil de explicar
|
|
|
|
|
|
Postada em 05/10/2010 11:14 hs
Em Ado é assim:
dim XFil =0
For XFil =0 to MshfServicos.rows-1
XFil = XFil + 1
cn.execute ("insert into SERVICOS values ( '" & MshfServicos.TextMatrix(XFil,1) &"' ) , '" & MshfServicos.TextMatrix(XFil, 2) &"' ")
Next x
|
|
TÓPICO EDITADO
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 05/10/2010 11:29 hs
bom em DAO seria assim
With MSFlexgrid1
For Linha = 1 To .Rows - 1
REG_arq.AddNew
REG_arq("codigo") = .TextMatrix(Linha,0)
REG_arq("data") = .TextMatrix(Linha,1)
REG_arq("Nr_documento") = .TextMatrix(Linha,2)
REG_arq("Cod_Pasta") = .TexMatrix(Linha,3)
REG_arq("assunto") = .TextMatrix(Linha,4)
REG_arq.Update
Next Linha
End With
|
|
|
|
hm1020
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 07/10/2010 21:14 hs
treze Muito obrigado pela ajuda, deu certinho do jeito que eu queria. M0uuuuuuito obrigado mesmo. |
|
|
|
