MSFLEXGRID
Olá pessoal !
Eu tenho uma flexgrid populada com dados. Ela tem 7 colunas e o número de linhas não é fixo. Como que eu faço para pegar cada dado da flexgrid e salvar no bando de dados ?
Desde já agradeço.
Eu tenho uma flexgrid populada com dados. Ela tem 7 colunas e o número de linhas não é fixo. Como que eu faço para pegar cada dado da flexgrid e salvar no bando de dados ?
Desde já agradeço.
Um exemplo.
With MSFlexGrid1
For i = 1 To .Cols - 1
Strsql = [Ô]INSERT INTO SuaTabela (Cod,Nome,Fone) VALUES ([ô][Ô] & .TextMatrix(i, 0) & [Ô][ô],[ô][Ô] & .TextMatrix(i, 1) & [Ô][ô],[ô][Ô] & .TextMatrix(i, 2) & [Ô][ô])[Ô]
[ô]Strsql = [Ô]INSERT INTO SuaTabela (Cod,Nome,Fone) VALUES ([ô][Ô] & .TextMatrix(i, 1) & [Ô][ô],[ô][Ô] & .TextMatrix(i, 1) & [Ô][ô],[ô][Ô] & .TextMatrix(i, 2) & [Ô][ô])[Ô]
cn.Execute (Strsql)
Next
End With
Se todas as colunas estiverem cheias use a primeira.([ô][Ô] & .TextMatrix(i, 0)
Se for apartir da segunda coluna use a sengunda.([ô][Ô] & .TextMatrix(i, 1)
With MSFlexGrid1
For i = 1 To .Cols - 1
Strsql = [Ô]INSERT INTO SuaTabela (Cod,Nome,Fone) VALUES ([ô][Ô] & .TextMatrix(i, 0) & [Ô][ô],[ô][Ô] & .TextMatrix(i, 1) & [Ô][ô],[ô][Ô] & .TextMatrix(i, 2) & [Ô][ô])[Ô]
[ô]Strsql = [Ô]INSERT INTO SuaTabela (Cod,Nome,Fone) VALUES ([ô][Ô] & .TextMatrix(i, 1) & [Ô][ô],[ô][Ô] & .TextMatrix(i, 1) & [Ô][ô],[ô][Ô] & .TextMatrix(i, 2) & [Ô][ô])[Ô]
cn.Execute (Strsql)
Next
End With
Se todas as colunas estiverem cheias use a primeira.([ô][Ô] & .TextMatrix(i, 0)
Se for apartir da segunda coluna use a sengunda.([ô][Ô] & .TextMatrix(i, 1)
Obrigado pelo exemplo OMAR2011.
Um abraço.
Um abraço.
Tópico encerrado , respostas não são mais permitidas