[Access] Met VBA autom. dagelijks tabel importeren

[Alfa Novanta]

Hallo mede GoTTers,

Onder Access wil ik graag dagelijks een tabel importeren. Deze tabel wordt iedere dag aangemaakt en heeft vandaag bijvoorbeeld de naam: tst250302.dat

Nu wil ik deze bestanden dagelijks importeren als tabel, met als opmaak gescheiden op tab (of spatie) en de waarden van de eerste rij als veldnamen. Handmatig lukt me dit wel, daŽs makkelijk zat, maar hoe kan ik dit automatiseren met VBA ??

Ik heb al lopen zoeken op tabel, table, import, automate .. maar ik kon nog niets vinden wat hier op leek. Iemand een idee in welke richting ik het moet zoeken? Welk commando dit doet bijvoorbeeld?

Ik ben vrij n00b wat VBA en Access betreft, maar misschien dat als jullie me op weg willen helpen .. een duwtje in de goeie richting willen geven, dat ik er dan wel uitkom.

Nogmaals: dit is geen scriptrequest, ik wil alleen graag een beetje op weg worden geholpen.

thnx

[Skinny]

Moet wel kunnen vermoed ik..

Zoek in de VBA help eens op

- DoCmd .TransferText
of
- TekstOverbrengen

Hiermee kun je tekstfiles koppelen/importeren aan de huidige database. Deze funktie roep je dan aan vanuit een Sub(Macro) die de bestandsnaam samenstelt op basis van de huidige datum. Deze Sub laat je dan dagelijks runnen (daar moet je even verder voor zoeken)

[Alfa Novanta]

Zo, dat is snel

TransferText klinkt goed .. .ik heb nu de onderstaande code:

code:

Private Sub Knop1_Click()
On Error GoTo Err_Knop1_Click
    
    datum = Format(Date, "ddmmyy")
    bestand = "tst-ur" & datum & ".dat"
    Tekst2.Value = bestand
    MsgBox "Het bestand " & bestand & " wordt geimporteerd"
   
    'DoCmd.TransferText(acImportFixed, ,hoi,"& bestand &", true, , )
    DoCmd.TransferText acExportDelim, , "tst250302", "C:\iets.doc"

        
    
Exit_Knop1_Click:
    Exit Sub

Err_Knop1_Click:
    MsgBox Err.Description
    Resume Exit_Knop1_Click
    
End Sub

Het commando lijkt te werken!!

... maar hij geeft nu de foutmelding "database or object is read only", maar ik weet niet waar ik dat kan in/uitschakelen

[Skinny]

volgens mij moet je voor importeren toch echt zoiets doen :

code:

docmd.TransferText acImportDelim, <SpecificatieNaam>, <DoelTabel>, <Bestand>

SpecificatieNaam is de naam waaronder je de velddefinities hebt opgeslagen onder :

Bestand - Externe gegevens ophalen - Importeren - Tekstbestand importeren - Geavanceerd.

<DoelTabel> spreekt voor zich denk ik.
<Bestand> ook, is dus het bestand wat je wil importeren.

[Alfa Novanta]

thnx again

Toch nog twee vraagjes:

1.
Ik had het bestand eerst tst250302.dat genoemd, maar dan kreeg ik de melding database or object is read-only.
Nu heb ik hem hernoemt naar tst250302.txt en dan doet ie het wel. Is er iets speciaals aan een .dat file, dat hij daabij zonodig moet gaan mekkeren!?

Op maandag 25 maart 2002 16:01 schreef Skinny het volgende:
Bestand - Externe gegevens ophalen - Importeren - Tekstbestand importeren - Geavanceerd.

2.
Bovenstaande heb ik kunnen vinden, maar kun jij of iemand anders me vertellen hoe een specificatiebestand er uit zou kunnen zien? Welke syntax gebruik je ervoor? En gaat hij .ini heten?
Zo ja, zou ik onder TransferText ook blabla.ini moeten ingeven namelijk en anders alleen blabla

[Verwijderd]

Een import- of exportspecificatie wordt binnen je .mdb file opgeslagen onder een door jou op te geven naam, en kun je dus binnen Access met die naam benaderen.

[Alfa Novanta]

Het is gelukt mensen, perfect!

Ik heb inmiddels zelfs alweer geëxporteerd ook, m.b.v. docmd.TransferText acExportDelim

thnx guys