ini-Datei auslesen

Question

Hallo zusammen,

ich hätte mal eine Frage zum auslesen einer Ini-Datei.
Ich habe eine kleine ini Datei die immer gleich heißt und am selben Ort liegt.

C:\Temp\Kunde.ini

nun möchte ich einfach den kompletten Inhalt der Datei in eine Accesstabelle schreiben.

Mit der Importfunktion für Text funktioniert das ganze leider nicht.

Gibt es hierfür einen ähnlichen Befehl wie

DoCmd.TransferText mit dem ich das ganze importieren kann?
Ich habe Access 2007.
Würde den Befehl gerne hinter einem Button in einem Formular hinterlegen.

Vielen Dank für eure Hilfe.

Gruß
morpheus

Answer 1

Hi morpheus,

hier mal ein kleines Codebeispiel:

Open "C:\xx.ini" For Input As #1
Do While Not EOF(1)
Line Input #1, xinhalt
feldname = Left(xinhalt, 2)
feldinhalt = Mid(xinhalt, 4, 30)
If feldname = "89" Then Strasse = feldinhalt
If feldname = "8b" Then PLZ = feldinhalt
If feldname = "8c" Then Ort = feldinhalt
Loop
Close #1

Gruß Rudolf

Answer 2

Hallo Rudolf,

vielen Dank für deine tolle Hilfe.
Das hat mir super geholfen und war genau das was ich gesucht habe.

Gruß
morpheus