AGENDA DE CONTATOS COM MSFLEXGRID

WOLF 11/02/2011 02:41:16
#365066
Estou desenvolvendo uma agenda de contatos com BD, estava pronto com DATA, porem agora estou atualizando ela para ADO, não estou conseguindo fazer a MSFlexGrid que esta em outra Form atualizar com os dados digitados e salvos no BD.
A agenda esta em uma Form e a tela que esta a Flex esta em outra Form.
Como Faço.?
KIKO.WIZZ 11/02/2011 08:32:21
#365070
Se eu entendi, é mais ou menos isso que vc precisa:

[txt-color=#0000f0]dim rsTable as ADODB.RecordSet
Set rsTable = New ADODB.RecordSet

rsTable.Open [Ô]SELECT * FROM Tabela[Ô],ADOconn
i=1
Do Until rsTable.EOF
MSFlexGrid.additem (row)
NomeDoFormOndeEstaAGrid.MSFlexGrid.textMatrix(vLinha,1)=rsTable([Ô]Campo1[Ô])
NomeDoFormOndeEstaAGrid.MSFlexGrid.textMatrix(vLinha,2)=rsTable([Ô]Campo2[Ô])
i=i+1
Loop

rsTable.close[/txt-color]
ACG1574 11/02/2011 08:53:12
#365074
o metodo additem vc nao tinha colocado o nome do form

Do Until rsTable.EOF
NomeDoFormOndeEstaAGrid.MSFlexGrid.additem (row)
NomeDoFormOndeEstaAGrid.MSFlexGrid.textMatrix(vLinha,1)=rsTable([Ô]Campo1[Ô])
NomeDoFormOndeEstaAGrid.MSFlexGrid.textMatrix(vLinha,2)=rsTable([Ô]Campo2[Ô])
i=i+1
Loop
WOLF 12/02/2011 00:23:26
#365219
Vlw

So tem mais uma coisa como faço pra fazer uma exclusao de contato excluindo uma linha e o contato do BD.
TECLA 13/02/2011 22:01:20
#365337
Utilize o método RemoveItem para excluir do MSFlexGrid.
Para obter o índice da linha selecionada, utilize o método RowSel.
Tópico encerrado , respostas não são mais permitidas
Voltar