SELECIONAR OS CLIENTES CONFORME O MSFLEXGRID

USUARIO.EXCLUIDOS 14/12/2006 21:26:01
#190061
ai pessoal..
como fazer essa consulta corretamente??

select * from Clientes where cod_cliente = "& msflexgrid1.textmatrix(i, o) &"

ou
seleciona na tabela clientes os clientes que estao nas linhas do grid
sendo que nao sei quantos cod_clientes vai ter.
como faço??! me ajudem t+
USUARIO.EXCLUIDOS 14/12/2006 21:45:13
#190064
Tenta assim...

Citação:


cont = 0
For I = 1 to flex.rows - 1

flex.row = cont ' linha
flex.col = 0 'coluna onde o codigo do clientes esta
VarCodigo = flex.text
select * from Clientes where cod_cliente = "& Varcodigo &"

cont = cont + 1
next



agr vc adiciona no for o q vc precisa ok ?

ve se eh isso eu naum testei mais eh por aew msm...
USUARIO.EXCLUIDOS 14/12/2006 21:45:17
#190065
??

mas e como ele vai selecionar se tiver dois clientes??
USUARIO.EXCLUIDOS 14/12/2006 22:06:42
#190068
ai pessoal.. seria mais ou menos assim...

dim ProcCliente as string
dim i as integer

for i = o to MSFlexGrid1.rows - 1
    MSFlexGrid1.row = i
    if MSFlexGrid1.cellBackColor = &hff& then
    ProcCliente = MSFlexGrid1.textMatrix(i,0)
    end if
next i

set TBClientes = banco.openRecorSet("select * from Clientes where codigo_cliente = "& ProcCliente &" ")
mas como fazer para ele consulte se tiver mais de uma linha vermelha no grid???
USUARIO.EXCLUIDOS 14/12/2006 22:22:45
#190070
?? me ajudem pessoal
USUARIO.EXCLUIDOS 14/12/2006 22:30:29
#190071
vc pode pegar tds o codigo dos clientes onde a linha for vermelha lah dentro do if no for...

ow vc faz a consulta dentro do if...e joga pra algum lugar ow guarda
USUARIO.EXCLUIDOS 14/12/2006 22:31:46
#190072
como faço isso amigo??
USUARIO.EXCLUIDOS 14/12/2006 22:50:51
#190077
digamos q so tenha um cliente em vermelho no flex qd vc fizer o select * vc vai mandar ele pra onde ?
USUARIO.EXCLUIDOS 14/12/2006 22:54:05
#190078
vou atualizar o grid conforme as linhas em vermelho...

o grid é composto por clientes e suas vendas...
ao selecionar um cliente ele fica em vermelho, ai se clicar em atualizar ele vai fazer a selecao conforme as linhas em vermelho e mostrar apenas os clientes selecionados!!
USUARIO.EXCLUIDOS 14/12/2006 23:34:40
#190081
malz a demora eu fikei pensado aki...

fiz numa forma mais rapida no q vc estava querendo fazer ve se fiko no q vc ker...

Citação:


1º fais um select * da sua tabela clientes e manda pro flex

2º qd vc ja selecionou no grid o q vc ker q fike apos a atualizacao
coloque esse codigo...

For I = 0 To flex1.Rows - 1

If I = flex1.Rows Then
Exit Sub
End If

flex1.Row = I

If flex1.CellBackColor <> &HFF& Then 'muda a cor q vc deseja
flex1.RemoveItem (I) ' retira as linhas q nao contem cor vermelha
I = -1
End If
Next I

3º configure o flex assim...
fixed cols = 0
fixed rows = 0
rows = 1

ok ?



boa sorte
sem consultas sua aplicacao fika mais rapida
Tópico encerrado , respostas não são mais permitidas
Voltar