GRID COM CHECKBOX SALVANDO NO BANCO
Olá pessoal,
Já perguntei algo parecido, mais a solução não foi aprovada pelo cliente =/
bem... vamos ao problema
Eu tenho uma tela de diagnóstico. Funciona mais ou menos assim:
A primeira coluna no Grid é a pergunta, ex. : "Já fez tratamento estético?"
Na segunda eu preciso de uma checkox, pra ficar sim/não
Eu já descobri como editar o Grid, mais preciso descobrir como colocar a checkbox e salvar tudo isso em banco.
estou usando msflexgrid e access com dao. se existir algum outro grid que fique mais facil eu tb aceito sugestões.
Alguem me da uma luz
Obrigado
Já perguntei algo parecido, mais a solução não foi aprovada pelo cliente =/
bem... vamos ao problema
Eu tenho uma tela de diagnóstico. Funciona mais ou menos assim:
A primeira coluna no Grid é a pergunta, ex. : "Já fez tratamento estético?"
Na segunda eu preciso de uma checkox, pra ficar sim/não
Eu já descobri como editar o Grid, mais preciso descobrir como colocar a checkbox e salvar tudo isso em banco.
estou usando msflexgrid e access com dao. se existir algum outro grid que fique mais facil eu tb aceito sugestões.
Alguem me da uma luz
Obrigado
tenta usar o sgrid
ele eu se q tem o check do lado
agora no grid eu nunca vi num so se fazer um pog
Procura aqui no vbmania sgrid
ele eu se q tem o check do lado
agora no grid eu nunca vi num so se fazer um pog
Procura aqui no vbmania sgrid
eu testei o sgrid2... só que não consegui fazer ele interagir com o banco =/
vo tenta aqui e ja te falo
aqui kra o no load
marcado=1
For i = 1 To 100
.CellDetails i, 1, , DT_CENTER Or DT_VCENTER, marcao
.CellDetails i, 2, "Item " & i, DT_LEFT, , , , , , , i
Next i
isso aqui e o que preenche
na primeira linha ele recebe uma variavel q e 0 ou 1
1=Marcado
0=Desmarcado
ai vc add no cod assim
For i = 1 To 100
.CellDetails i, 1, , DT_CENTER Or DT_VCENTER, rsteste!temcarro
.CellDetails i, 2, "Item " & i, DT_LEFT, , , , , , , i
Next i
ai se o campo temcarro for 1(true) ele marca se for 0(false)
agora se vc ja tah armazenando no bd true e false
faz uma função tipo
if rs!temcarro=true then
varcheck = 1
else
varchek = 0
end if
For i = 1 To 100
.CellDetails i, 1, , DT_CENTER Or DT_VCENTER, VarCheck
.CellDetails i, 2, "Item " & i, DT_LEFT, , , , , , , i
Next i
falo kra
marcado=1
For i = 1 To 100
.CellDetails i, 1, , DT_CENTER Or DT_VCENTER, marcao
.CellDetails i, 2, "Item " & i, DT_LEFT, , , , , , , i
Next i
isso aqui e o que preenche
na primeira linha ele recebe uma variavel q e 0 ou 1
1=Marcado
0=Desmarcado
ai vc add no cod assim
For i = 1 To 100
.CellDetails i, 1, , DT_CENTER Or DT_VCENTER, rsteste!temcarro
.CellDetails i, 2, "Item " & i, DT_LEFT, , , , , , , i
Next i
ai se o campo temcarro for 1(true) ele marca se for 0(false)
agora se vc ja tah armazenando no bd true e false
faz uma função tipo
if rs!temcarro=true then
varcheck = 1
else
varchek = 0
end if
For i = 1 To 100
.CellDetails i, 1, , DT_CENTER Or DT_VCENTER, VarCheck
.CellDetails i, 2, "Item " & i, DT_LEFT, , , , , , , i
Next i
falo kra
ah tah... vlw... mais ai vc tá usando ADO né?
eu to usando DAO...
não entendi mto bem o codigo :S
eu to usando DAO...
não entendi mto bem o codigo :S
me aceita lah no msn
eu te add
ou add eu milton_barretos@hotmail.com
eu te add
ou add eu milton_barretos@hotmail.com
jah add
Tópico encerrado , respostas não são mais permitidas