SAMENVATTING In dit artikel worden de gegevens beschreven die nodig zijn om een pojectneeds weer te geven in een bepaald venster, die moeten worden opgehaald
via een ADO-verbinding.
MEER INFORMATIE
De eerste optie is om de gebruikers-id, wachtwoord, databasenaam en de naam van de
gegevensbron hard te codeeren. Een voorbeeld hiervan is als volgt: (Deze verbindingsreeks zou allemaal
op één regel in VBA staan)
. ConnectionString="Provider=SQLOLEDB;DSN=eEnterprise; User=sa; Password=;InitialCatalog=TWO" De
DSN zou de ODBC-gegevensbron zijn die is ingesteld op de SQL Server.In dit voorbeeld is het
wachtwoord leeg. De initiële catalogus is de naam van de database waar de gegevens zich bevinden.
Als u deze gegevens niet hard wilt maken, is er een dll-bestand dat kan worden gebruikt om al deze gegevens op te halen. Dit .dll bestand vindt u in PartnerSource of CustomerSource onder Downloads & Updates | Productreleases | Voortgezet in eEnterprise Product Releases | Modifier/VBA Samples. Het bestand heet
ActiveX DLL voor het ophalen van aanmeldingsgegevens.
In het opgenomen leesmijbestand ziet u hoe u de variabelen declareert om het dll-bestand te gebruiken. In een voorbeeld van code worden variabelen gedeclareert en vervolgens de variabelen in de verbindingsreeks gebruikt.
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.
Userinfo = CreateObject("RetrieveGlobals.retrieveuserinfo")
luserid = userinfo.retrieve_user()
lsqlpassword = userinfo.sql_password()
lintercompanyid = userinfo.intercompany_id()
lsqldatasourcename = userinfo.sql_datasourcename()
Vervolgens gebruikt u de variabelen in de verbindingsreeks.
(Deze verbindingsreeks is allemaal op één regel in VBA)
. ConnectionString="Provider=SQLOLEDB;DSN="+lsqldatasourcename+"; UserID="+luserid+";p assword="+lsqlpassword+";Initial Catalog="+lintercompanyid Met dit type verbindingsreeks met de retrieve.dll wordt de naam, het wachtwoord van de gebruiker, het bedrijf waar ze zijn aangemeld en de gegevensbron die ze
gebruiken, opgehaald.
Dit artikel was TechKnowledge Document ID:22116