---

Hallo,
ich habe in Scripten schon öfter auf eine Excel Tabelle zugegriffen and daraus Daten ausgelesen oder auch Daten zurück geschrieben.
Nun möchte ich auf eine Tabelle in ACCESS zugreifen. Von dort Informationen auslesen und weiter verarbeiten. Hat jemand ein VBS-Beispiel wie man ins ACCESS kommt?
Danke,
Gruß Kerstin 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Kerstin,

ich habe folgenden Script ausprobiert. Da sieht man, wie Access geöffnet wird. Vielleicht hilft Dir das ja schon weiter:

Code:

---

Set App  = CreateObject( "CT.Application" )
Set Prj  = App.CreateJobObject
Set appAcc = CreateObject("Access.Application")

appAcc.OpenCurrentDatabase "F:\Temp\Test.mdb", False, "Kennwort"
appAcc.Visible = 1
AccTabelle1 = InputBox("", "Tabelle")

---

Folgender Link hilft Dir vielleich auch: msdn - Access

------------------
Gruß Uwe

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

...noch ein Schritt weiter:

Code:

---

appAcc.DoCmd.OpenTable AccTabelle1

---

------------------
Gruß Uwe

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Uwe,

Danke, das ist schon mal was.
Habe auch noch von CIM-Team das Beispiel PartsAccess.vbs gefunden und werde nun versuchen, aus alle dem was zu lernen und dann meine gestellte Aufgabe zu lösen.
Ziel ist es, aus einer Tabelle in Access Daten auszulesen und daraus neue Blätter in einem E³-Project zu erstellen, die Blätter beschriften, Teilschaltungen plazieren etc.

Gruß, Kerstin

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP