Append query of tabel waarden naar txt-file

  • Onderwerp starter Onderwerp starter K2M
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.

K2M

Gebruiker
Lid geworden
5 jul 2006
Berichten
81
Ik will graag de waarden in mijn tabel of query toevoegen naar een txt-file.
Ik weet dat ik iets met myFile.writeline moet doen.

Const ForReading = 1, ForWriting = 2, ForAppending = 8
Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
Dim fso, MyFile, FileName, TextLine

Set fso = CreateObject("Scripting.FileSystemObject")

' Open the file for output.
FileName = "C:\Bestand.txt"

Set MyFile = fso.OpenTextFile(FileName, ForAppending, True)

' Write to the file.
MyFile.WriteLine .................
MyFile.Close

Kan iemand mij hierbij helpen?
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan