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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  ADO
¨Hennyere¨
Pontos: 2843
SALVADOR
BA - BRASIL
Postada em 06/02/2006 13:56 hs         
Como faço para abrir uma base de dados com o ADO de modo seguro?
Com o DAO isto funciona:
    DBEngine.SystemDB = App.Path & "Segurança.mdw"
    Set Wk = DBEngine.CreateWorkspace("", "Usuário", "Senha")
    Set db = Wk.OpenDatabase(App.Path & "ase.mdb")
E com o ADO?
     
ØHennyereØ
Pontos: 2843
SALVADOR
BA - BRASIL
Postada em 06/02/2006 17:52 hs         
Peço ajuda!
     
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
Postada em 07/02/2006 06:40 hs            
Vc usa o OleDB Provider ou ODBC pra conectar?


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

     
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
Postada em 07/02/2006 06:42 hs            
Pra conexao via ODBC a ConnectionString fica assim:
 
Driver={Microsoft Access Driver (*.mdb)}; Dbq=C:mydatabase.mdb; SystemDB=C:mydatabase.mdw; Uid=NomeUsuario; Pwd=SenhaUsuario;"


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

     
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
Postada em 07/02/2006 06:44 hs            
Pra conexao via OleDB (Jet Engine) fica assim:
 
"Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:mydb.mdb; Jet OLEDB:System Database=system.mdw; User Id=Usuario; Password=Senha;"


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

     
¨Hennyere¨
Pontos: 2843
SALVADOR
BA - BRASIL
Postada em 07/02/2006 13:20 hs         
Estou usando o procedimento abaixo e ñ está dando certo:
 
    With db
        .Mode = adModeReadWrite
        .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "BaseBase.mdb" & "; Jet OLEDB:System Database=" & App.Path & "BaseSegurança.mdw" & "; User Id=USER; Password=SENHA;"
        .Open
    End With
     
Página(s): 1/1    

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