ADO savienojuma virknes VBA for Microsoft SQL

KOPSAVILKUMS Šajā rakstā ir aprakstīta informācija, kas nepieciešama, lai konkrētā logā parādītos koktedēs attēlotas opcijas, būs

izgūta, izmantojot ADO savienojumu.




PAPILDINFORMĀCIJA Pirmā opcija ir stingrā kodā Lietotāja ID, Parole, Datu bāzes nosaukums un Datu avota nosaukums. Tā piemērs ir šāds: (Šī savienojuma virkne ir

redzama vienā VBA


rindiņā). ConnectionString="Provider=SQLOLEDB;DSN=eEnterprise; Lietotājs=sa; Password=;InitialCatalog=TWO"

DSN ir ODBC datu avots, kas ir iestatīts SQL datu Server.In šajā piemērā parole
ir tukša. Sākotnējais katalogs ir datu bāzes nosaukums, kurā atrodas dati.


Ja nevēlaties šo informāciju atkodēt, ir DLL fails, kuru var izmantot, lai izgūtu visu šo informāciju. Šis .dll fails atrodams vietnē PartnerSource vai CustomerSource sadaļā Lejupielādes un & atjauninājumi | Produktu laidienu | Turpinājums eEnterprise produktu laidienos | Modifikatora/VBA paraugi. Faila nosaukums ir
ActiveX DLL pieteikšanās informācijas izgūšanai.


Failā Readme, kas ir iekļauts, ir parādīts, kā declare the variables to use the dll file. Koda piemērs var paziņot mainīgos un pēc tam izmantot mainīgos savienojuma virknē.


Dim userinfo As Object

Dim luserid As String

Dim lsqlpassword As String

Dim lintercompanyid As String

Dim lsqldatasourcename As String


Šis kods būtu logā atvērtā notikumā.


Set userinfo = CreateObject("RetrieveGlobals.retrieveuserinfo")

luserid = userinfo.retrieve_user()

lsqlpassword = userinfo.sql_password()

lintercompanyid = userinfo.intercompany_id()

lsqldatasourcename = userinfo.sql_datasourcename()


Pēc tam savienojuma virknē izmantojiet mainīgos.

(Šī .connection virkne VBA ir redzama vienā


rindiņā). ConnectionString="Provider=SQLOLEDB;DSN="+lsqldatasourcename+"; UserID="+luserid+";p assword="+lsqlpassword+";Initial Catalog="+lintercompanyid Izmantojot šāda veida savienojuma virkni ar retrieve.dll, tiek


izgūts lietotājvārds, parole, uzņēmums, kurā viņš ir pieteicies, un datu avots, kurā viņš izmanto.

Šis raksts bija TechKnowledge dokumenta ID:22116