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:  Abrindo Bancos de Dados Externos - DAO & ADO
Postada em 8/10/2000 por Webmaster      Clique aqui para enviar email para o autor  webmaster@vbweb.com.br
Caso você venha a ter a necessidade de abrir uma base de dados externa, como um arquivo do Excel (por exemplo), use uma chave de conexão com a base de dados externa. Veja este exemplo:

DAO
Sub DAOAbrirBDExterno()
  Dim DB As DAO.Database
  Set DB = DBEngine.OpenDatabase(App.Path & _
           "\Plan.XLS", False, False, "Excel 5.0;")
  DB.Close
End Sub

ADO
Sub ADOAbrirBDExterno()
  Dim CNN As New ADODB.Connection
  CNN.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=" & App.Path & "\Plan.XLS;" & _
           "Extended " & "Properties=Excel 5.0;"
  CNN.Close
End Sub
Veja nesta tabela, os principais tipos de chaves de conexão usadas.

Base de Dados Chave de Conexão (String)
dBase III dBase III;
dBase IV dBase IV;
dBase 5 dBase 5.0;
Paradox 5.x Paradox 5.x;
Excel 5.0/Excel 95 Excel 5.0;
Excel 97 Excel 97;
Excel2000 Excel 8.0;
HTML Import HTML Import;
HTML Export HTML Export;
Text Text;
ODBC ODBC;
DATABASE=database;
UID=user;
PWD=password;
DSN=datasourcename;
 


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