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

 

  Dicas

  Visual Basic    (Banco de Dados)

Título da Dica:  Conexão ADO amarrada com um TextBox
Postada em 18/7/2002 por Douglas      Clique aqui para enviar email para o autor  douglasfranciscon@papel.irani.com.br
Para criar uma conexão ADO e conectá-lo à um TextBox facilmente podemos usar o exemplo abaixo.
Dim Conn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
        With Conn
            .ConnectionString = "String de conexão"
            .ConnectionTimeout = 50
            .Open
        End With
        RS.Open "Select * from Tabela",Conn,adOpenKeyset, adLockOptimistic
Para conectar os TextBox (Usálos como Bound) basta usar as linhas abaixo:
Text1.DataSource = RS
Set Text1.DataField RS.Field("Nome_do_Campo")
 


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