Mit VBScript auf eine lokale AccessDB zugreifen ohne Office

**Luckie**

Ich habe hier noch eine AccessDB rumliegen, die ich gerne auslesen würde. Ich habe allerdings kein MS Office installiert. Jetzt haben wir in der Schule über VBScript auf eine Datenbank zugegriffen und ich würde das gerne auch mit meiner lokalen AccessDB machen:

markieren

Code:

			''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

' Script        : Datenbankzugriff                                             '

' File          : 06_01_ADODB_DatenbankZugriff.vbs                             '

' Date          : 2007-03-22 - Last modified: 2007-03-22                       '

'                                                                              '

'               Michael Puff - [url]http://www.michael-puff.de[/url]                      '

'                                                                              '

'               Zugriff auf eine Datenbank mit ADODB                           '

'                                                                              '

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

const CAPTION = "06_01_ADODB_DBZugriff.vbs"

const CONSTR = "driver=MySQL ODBC 3.51 Driver;server=10.17.171.200;uid=root;pwd=;database=Benutzerverwaltung2;option=NUM"

Set adoDataCom = CreateObject("ADODB.Connection")

' Datenbankverbindung aufbauen

adoDataCom.open(CONSTR)

' SQL Statement

Set rs = adoDataCom.execute("SELECT * FROM benutzer")

' Iterieren durch die Ergebnismenge

While not rs.eof

  For Each field in rs.fields

    s = s & field & ", "        

  Next   

  ' letzte Komma abschneiden und Zeilenumbruch

  s = Left(s, len(s) - 2)

  s = s & vbcr

  rs.moveNext

Wend

MsgBox s, 0, CAPTION

Jedoch weiß ich nicht, wie ich den ConnectionString aufbauen muss.

Ich habe es jetzt so probiert:

markieren

Code:

const CONSTR = "driver=Microsoft Access Driver;server=127.0.0.1"

, jedoch bekomme ich den Fehler:

Zitat:

Fehler: [Microsoft][ODBC Driver Manager] Der Datenquellenname wurde nicht gefunden, und es wurde kein Standardtreiber angegeben

Mit VBScript auf eine lokale AccessDB zugreifen ohne Office

Mit VBScript auf eine lokale AccessDB zugreifen ohne Office

Forumregeln