txt-bestand importeren in Access?

[Amadeus]

Hallo allemaal,

Ik heb een vraag, en ik hoop dat iemand mij op weg kan helpen.

Ik heb een adressenlijst als .txt bestand. Ziet er zo uit:

Jantje de Wit
Schipholpad 67
postcode woonplaats
en een paar opmerkingen

Pietje de Zwart
Kerkweg 56
postcode woonplaats
en nog een paar opmerkingen

enz.

Hoe kan ik deze in Access importeren.

Wat ik zelf al heb geprobeerd, is via Bestand/Externe Gegevens ophalen/Importeren... en dan keuze "met scheidingstekens", maar daar kan ik alleen tabs of (punt)komma's selecteren.
Alleen: ik heb harde returns in mijn document.

Kan je dat in dit dialoogvenster bij Overige zetten (is er een code voor?)

Of is er een andere weg?

Dank voor ieders reactie!


Wolfie

 

[hackerfrans]

Misschien kun je de ASCII code voor een harde return proberen, moet je even kijken welke je moet hebben op http://www.asciicodetable.com

 

[Amadeus]

Hoi hackerfrans,

Dank - ik heb dat ASCII geprobeerd, maar dat werkt helaas niet.

Iemand anders de gouden tip?

 

[Bartuls]

Programmeren!

Open het tekst bestand en lees dit regel voor regel uit.
Daarvoor kun je hier een hele handige class module vinden: http://www.mvps.org/access/modules/mdl0057.htm
Vervolgens moet je de uitgelezen gegevens opslaan in je tabel.
Dit kun je ook met code doen.
Hiertoe moet je een string opbouwen met een SQL INSERT statement.

INSERT INTO tblJouwTabel (Veld1, Veld2, Veld3, ....)
VALUES (waarde1, waarde2, waarde3, ....)

Vervolgens kun je dit statement uitvoeren op je database.

Dim db as Database

set db = currentdb()

docmd.setwarnings False
db.execute strJouwSQLString, dbFailOnError
docmd.setwarnings True

set db = nothing

 

[Amadeus]

Pfffff..... Bartuls, programmeren, je tip ziet er heftig voor mij uit. Ik heb twee linkerhanden met programmeren.

Ik heb inmiddels wel na lang nadenken en zoeken een andere, in ieder geval goed werkbare, oplossing gevonden.

En dat is:
- txt bestand omzetten naar Word
- in Word Zoek + Vervang Harde return
(in Word heet dat alineamarkering, teken ^p)

- als 1e ^p^p (voor de witregel) vervangen door een unieke reeks (ik koos voor de palindroom "legeregel")
- daarna zoek en vervang ^p door de puntkomma;
- dan zoek en vervang legeregel door ^p
- nu staat alles achter elkaar per labelreeks
- vervolgens importeren in Access

En tot mijn eigen verbazing werkte het nog ook.

Desondanks bedankt voor jullie tips!

Wolfie