Cadeias de conexão do ADO no VBA para Microsoft SQL

RESUMO Este artigo descreve as informações necessárias para que uma
pojectneeds seja exibida em uma janela específica terá que ser recuperada por meio de uma conexão
do ADO.


MAIS INFORMAÇÕES A primeira opção seria codificar a ID do Usuário, Senha, Nome do Banco de Dados e

o nome da Fonte de Dados. Um exemplo disso seria o seguinte: (Essa cadeia de caracteres de conexão estaria em uma

única linha no VBA)


. ConnectionString="Provider=SQLOLEDB;DSN=eEnterprise; User=sa; Password=;InitialCatalog=TWO" O DSN seria a fonte de dados ODBC que está configurada


para o SQL Server. Neste exemplo, a senha está em branco. O Catálogo Inicial é o nome do banco de dados onde os dados estão localizados.


Se não quiser codificar essas informações, há um arquivo dll que pode ser usado para recuperar todas essas informações. Esse .dll arquivo pode ser encontrado em PartnerSource ou CustomerSource em Downloads & Atualizações | Lançamentos de produtos | Continuação nas versões do produto eEnterprise | Amostras do Modificador/VBA. O arquivo é chamado
ActiveX DLL para Recuperar Informações de Logon.


O arquivo readme incluído mostrará como declarar as variáveis para usar o arquivo dll. Um exemplo de código declararia variáveis e usaria as variáveis na cadeia de caracteres de conexão.


Dim userinfo As Object

Dim luserid As String

Dim lsqlpassword As String

Dim lintercompanyid As String Dim

lsqldatasourcename As String This code would be on


a window open event.


Definir userinfo = CreateObject("RetrieveGlobals.retrieveuserinfo")

luserid = userinfo.retrieve_user()

lsqlpassword = userinfo.sql_password()

lintercompanyid = userinfo.intercompany_id()

lsqldatasourcename = userinfo.sql_datasourcename()


Em seguida, na cadeia de caracteres de conexão, você usaria as variáveis.

(Essa cadeia de caracteres .connection estaria em uma única linha no VBA)


. ConnectionString="Provider=SQLOLEDB;DSN="+lsqldatasourcename+"; UserID="+luserid+";p assword="+lsqlpassword+";Initial Catalog="+lintercompanyid Usando esse tipo de cadeia de conexão com o retrieve.dll, ele recuperará o nome, a senha, a empresa em que está conectado e o


datasource que está usando.

Este artigo foi TechKnowledge Document ID:22116