Writing to Sequential Files with Microsoft Access VBA and the FileSystemObject

This is the companion code listing and description for the video:
Writing to Sequential Files with Microsoft Access VBA:
The FileSystemObject

In this article we will look at two methods of writing to text files by using the FileSystemObject.  Again, I’ve built a form to provide input to our text files:


The top textbox will determine what folder will hold our new text file, and the textbox below that will provide the name for the file.  The next two textboxes will provide the strings we will write.  The left button will use the FileSystemObject’s OpenTextFile method.  The right button will use the FileSystemObject’s CreateTextFile method and the File object’s OpenAsTextStream method.

The “Write It ‘1’!” button:

After making sure we have folder and file name, we assemble a complete file and path name using string concatenation and storing that in the filename variable.  Next we create our FileSystemObject called fso.  The next statement opens or creates our text file, the format is:

This statement yields a TextStreamObject you can write to.  The parameters are:

  • filename:  the file to create or open
  • iomode:  ForReading, ForWriting or ForAppending
  • create:  boolean value to determine whether to create the file if it does not exist
  • format:  TristateUseDefault, TristateTrue or TristateFalse

If you open an existing file “ForWriting”, you will destroy the data that was in the original file, and replace it with the data from your current session.  If you open an existing file “ForAppending”, you will add to the end of the file in our current session.  You can open a new file “ForAppending” just fine.

TristateTrue set the format of the text file as Unicode; TristateFalse set the format of the file to be ASCII.  TristateUseDefault uses the system default.

After we have opened or created our text file, we write to it using the WriteLine method.  The WriteLine method takes a string variable as input and writes the variable content to the file and then moves the record pointer to the next record in the file – it gives you a new line automatically.

The above code and form produces a text file with this content:

The “Write It ‘2’!” button:

The button on the right uses the FileSystemObject’s CreateTextFile method and the File object’s OpenAsTextStream method.  The code is below:

This code starts exactly as the previous code did.  After assembling the name for our new file, we try to create a new text file by using the FileSystemObject’s CreateTextFile method.  If the file you are trying to create already exists, this will destroy it and create a new empty file.  I have put this statement inside an “if” that tests if the file already exists.  Next, we get a reference to the file and set it equal to the object named “fil”.

Next, we create a TextStream object by calling the file object’s OpenAsTextStream method.  This method takes the same iomode and format arguments as the previous code did.  After getting a TextStream object, we call it’s Write method.  The Write method does not advance the record pointer, so you will continue to write to the same “line” or record until you write a carriage return character.  The above code and form produce a file containing this:


Posted in Code Listings for Videos.


  1. Bạn muốn 1 giải pháp hiệu quả cho ngôi
    nhà của bạn Bạn có thấy tuyệt vời không?
    Mấu chốt ở đây mà tôi muốn nhắc đi nhắc lại đó là tính rõ ràng minh bạch trước khi ký kết để chắc chắn rằng cả bạn và nhà thầu
    đã yên tâm về nhau…. giải pháp hựu
    hiệu nhất Tuy nhiên, với một thị trường xây dựng hỗn độn thì
    việc tìm kiếm một nhà thầu uy tín khiến bạn đau đầu lo
    lắng, những lời nói xuôi tai và chắc như đinh đóng cột
    nhưng sau đó là khiến bạn mất thời gian và tiền bạc
    do thiếu tính minh bạch và rõ ràng ngay từ lúc ký kết…
    công ty nguyễn Hoàn Tại “Xây Sửa Nhà Hà Nội” tôi muốn bạn phải nắm thật rõ từng chi tiết của các gói
    dịch vụ mà công ty cung cấp cho bạn và bạn phải thật sự
    yên tâm về điều đó. Nếu chưa rõ chúng ta
    sẽ tiếp tục thảo luận đến khi cảm thấy hài lòng mới chuyển sang bước đi sâu hơn vào
    vấn đề. Bến phà cần thơ củ chi Tính
    hiệu quả và tiện lợi khi bạn chọn dịch
    vụ xây nhà trọn gói đó là bạn chỉ cần mất
    thời gian đầu làm việc với nhà thầu một cách rõ ràng và minh bạch nhất có thể, sau đó bạn an tâm đi làm việc riêng
    của bạn và chờ ngày nhận nhà Gía xây dựng phụ thuộc vào chất liệu vật tư
    xay nha binh duong

  2. you are truly a just right webmaster. The web site loading speed is amazing.

    It sort of feels that you are doing any
    unique trick. In addition, The contents are masterpiece.

    you’ve done a wonderful process in this subject!

  3. What i don’t realize is in truth how you are not really a lot
    more smartly-preferred than you might be right now.

    You are so intelligent. You understand thus significantly when it comes to this subject,
    made me personally consider it from so many varied angles.
    Its like women and men don’t seem to be involved unless it’s one thing to do with Girl gaga!
    Your personal stuffs excellent. All the time maintain it up!

Leave a Reply

Your email address will not be published.