USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Carregar combo a partir de outro
ED - Claret
SÃO JOSE DO RIO PRETO
SP - BRASIL
ENUNCIADA !
Postada em 24/08/2011 10:42 hs         
OPS..............

Desculpem ai...... não tinha visto que tinha mais post´s

barrei

fuiiiiiiiiiiii - vixi
   
Francis
ARCOVERDE
PE - BRASIL
Postada em 25/08/2011 10:36 hs            
Galera, Agradeço a todos pelas respostas , mas eu só consegui com o exemplo do Treze , usando o itemdata, mas agora o que está acontecendo é o seguinte eu escolho um estado por exemplo: Alagoas no combo1 e no combo2 ele me lista só as cidades para Alagoas , até ai tudo bem, mas quando eu vou escolher outro estado por exemplo Bahia ele me mostra as cidades cadastradas para Bahia e continua exibindo as cidades de Alagoas , já tentei desconectar o Rs no evento lostfocus do combo2 e nada, desde já agradeço a colaboração.
     
Francis
ARCOVERDE
PE - BRASIL
Postada em 25/08/2011 10:39 hs            
Alguem entendeu, eu creio que tenha que ficar reconectando toda vez que seleciona algum estado para ele só mostrar as cidades do estado escolhido, mais não sei fazer como.
TÓPICO EDITADO
   
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
ENUNCIADA !
Postada em 25/08/2011 20:30 hs            
antes do loop

combo1.Clear

   
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
Postada em 25/08/2011 20:33 hs            
só pra ser mais especifico

Combo1.Clear '<-----------

sSQL = "SELECT * FROM cidade"
Set RS = CNN.Execute(sSQL)
Do While Not RS.EOF
Combo1.AddItem RS!Nome
Combo1.ItemData(Combo1.NewIdex) = RS!codigoestado
RS.MoveNext
Loop

bom para preencher o combo2 seria assim

no evento click, ou dblclik do combo1

Combo2.Clear '<-------------

sSQL = "SELECT * FROM estado WHERE codigoestado=" & Combo1.Itemdata(Combo1.ListIndex)
Set RS = CNN.Execute(sSQL)
Do While Not RS.EOF
Combo2.AddItem RS!Nome
RS.MoveNext
Loop
     
Francis
ARCOVERDE
PE - BRASIL
Postada em 26/08/2011 14:08 hs            
Poxa cara eu não sei nem como agradecer deu certinho, tudo perfeito, valeu e até a
próxima.
     
Página(s): 3/3     « ANTERIOR  


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página