txt-bestand inlezen in access tabel

Status
Niet open voor verdere reacties.

Arius

Gebruiker
Lid geworden
30 jan 2007
Berichten
10
Hallo,

ik wil graag een txt-bestand in een Access tabel laten inlezen doormiddel van VBA,
Kunnen jullie me hierbij helpen??

Groeten, Arie
 
Met de volgende code plaats je de inhoud van een tekstbestand in variabelen. Deze variabelen dien je dan op te slaan in een tabel.

Code:
    sBestand = "Pad\Bestand.txt"
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    If objFSO.FileExists(sBestand) = True Then
        Open sBestand For Input As #1
        While Not EOF(1)
        
            Input #1, _
                Veld1, Veld2, Etcetera

        Wend
        
        Close #1
    End If


De volgende waarden kunnen ingelezen worden, gescheiden door een komma :

"tekst", #FALSE#, #TRUE#, #NULL#.

Let er wel op dat in de tekst velden geen komma's of aanhalingstekens voorkomen.

Succes.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan