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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Combobox
Filipe Gonçalve
não registrado
ENUNCIADA !
Postada em 25/06/2007 13:20 hs   
A ligação via DAO não funciona, no exemplo em
 
Obrigado
   
KoRn
Pontos: 2843
SAO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 25/06/2007 13:21 hs            
cara na boa é o terceior topico que vc abre só com isso ? abre um topico e fica posta só nele

Jesus Cristo é O Senhor!!!
   
Filipe Gonçalve
não registrado
ENUNCIADA !
Postada em 25/06/2007 13:25 hs   
se não funciona, como faço?
 
Obrigado
   
KoRn
Pontos: 2843
SAO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 25/06/2007 13:26 hs            
vc se cadastrou ? entra com o login , se torna membro que eu resolvo isso pra vc

Jesus Cristo é O Senhor!!!
   
Dumas
BRAGA
41 - PORTUGAL
ENUNCIADA !
Postada em 25/06/2007 13:30 hs            
já me cadastrei e já entrei com o login
 
Dumas
   
KoRn
Pontos: 2843
SAO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 25/06/2007 13:31 hs            
'------------------------Em ADO
Function RecordBD(combo As ComboBox)
combo.Clear
Set TA = New ADODB.Recordset
TA.LockType = adLockOptimistic
TA.Open "Select  * from Tabela", Db, adOpenDynamic
Do Until TA.EOF
    combo.AddItem TA!field
    TA.MoveNext
Loop
End Function
'-----------------------EM DAO
Function RecordBD(Combo as Combobox)
combo.clear
set tb = db.openrecordset("Tabela")
tb.moveMin
do until tb.eof
 combo.additem tb!Field
        tb.movenext
loop
end function

'---------------Chamando função no form_load
recordbd(combo1) 'tanto em ado como em dao

Jesus Cristo é O Senhor!!!
TÓPICO EDITADO
 
Página(s): 1/3      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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