Liste Dienste importieren

18/04/2009 - 13:21 von Juergen Meyer | Report spam
Bekanntlich kann man in Windows XP die Dienste aufrufen und die Liste
in eine Textdatei exportieren. Anschließend dann in Access
importieren.
Gibt es eine Möglichkeit unter VBA, diese Liste direkt zu importieren?

Gruß
Jürgen
 

Lesen sie die antworten

#1 Stefan Hoffmann
18/04/2009 - 13:50 | Warnen spam
hallo Jürgen,

Juergen Meyer wrote:
Bekanntlich kann man in Windows XP die Dienste aufrufen und die Liste
in eine Textdatei exportieren. Anschließend dann in Access
importieren.
Gibt es eine Möglichkeit unter VBA, diese Liste direkt zu importieren?


Im Prinzip Ja. Deine Beschreibung ist sehr wage, daher:

1) mittels sequentiellem Lesen:

Dim FileHandle As Long
Dim LineContent As String

FileHandle= FreeFile
Open "services.txt" For Input As FileHandle
Do While Not EOF(FileHandle)
Line Input #FileHandle, LineContent
Debug.Print LineContent
Loop
Close FileHandle

oder

2) falls die Datei einen regelmàßigen Aufbau im Sinne einer CSV-Datei hat:

DoCmd.TransferText ..

mit einer Import-Spezifikation.


mfG

Access-FAQ http://www.donkarl.com/
KnowHow.mdb http://www.freeaccess.de
Newbie-Info http://www.doerbandt.de/Access/Newbie.htm

Ähnliche fragen