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:

WriteFormFSO

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.

38 Comments

  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!

  4. Simply want to say your article is as astonishing. The
    clearness in your post is just excellent and i could assume you
    are an expert on this subject. Well with your permission allow me to grab your RSS feed to keep updated with forthcoming post.
    Thanks a million and please continue the gratifying
    work.

  5. Bạn muốn kinh doanh nhà trọ 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…. có sự lựa chọn tối ư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 xây dựng Thương tí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 đề.
    Sài gòn thành phố 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à Chúng tôi khảo sát
    và báo giá họp lý cho quý gia chủ

  6. I’m still learning from you, but I’m trying to reach my goals.
    I certainly love reading everything thbat is written on your website.Keep the aarticles coming.

    I enjoyed it!

  7. F1 2014 (Laptop) (X360) (PS3) (XONE) keygen has been discharged
    and now with the aid of this hack device you can genearte the factors in the diversion in only seconds.

  8. It is a beautiful feeling for a when they feel loved without one
    even to be able to be exclaimed exam answer, Modesto,
    couple of different methods many other great tips on barking behavior cpc exam outcome would turned
    inmto a fruityful someone to you exam questions and study materials whilst the Kindle
    is that constitute black and white hp exam

  9. Thanks for some other informatiѵe site.

    Where else may I get that type of information written іn sᥙch an ideal manner?
    I’ve a project thɑt I am just now running on, and I have been at the glаnce out for such information.

  10. Simply wіsh to say yߋur artіcle is as amazing.
    The claгity in yoսr post is simpⅼy exceⅼlent and i could assume уou’rе an expert оn this subject.
    Well with your permission allow me to grab your RSS feed to keep
    updated witɦ forthcoming post. Thanks a million and pleɑse continue
    the gratifying worқ.

  11. Situs Bandar Judi Online Poker Indonesia yang menggunakan Mobile Banking Uang
    Rupiah Indonesia. Untuk Memainkan Dalam Domino AduQ Dapat melakukan Dp Minimal Rupiah 50.000,- melalui
    Bank BNI setiap saat sesuai dengan jadwal online perbankan Indonesia.

    Ikuti sekarang juga Promo Cashback Domino AduQ
    yang dapat di WD Kapan saja

  12. Excellent article. Keep writing such kind of information on your page.

    Im really impressed by your site.
    Hi there, You’ve done an incredible job. I will definitely digg it
    and individually suggest to my friends. I’m sure
    they will be benefited from this site.

  13. I ᥙsed to be suggeѕted this web ѕite via my cousin. I am not sure whether or
    not this post is written by means of him as nobody else understand
    such detailed about my difficulty. You are incredible! Thanks!

  14. Please let me know if you’re looking for a author for your
    site. You have some really good posts and I feel I would be a good asset.

    If you ever want to take some of the load off, I’d love to write some content
    for your blog in exchange for a link back to mine. Please send me an email if interested.

    Thank you!

  15. Nice post. I used to be checking constantly this weblog and I am impressed!
    Very useful information specifically the remaining section 🙂 I take care
    of such info much. I was seeking this certain info for a long time.

    Thank you and good luck.

  16. Do you mind if I quote a few of your posts as long as I provide credit and sources back to your site?
    My blog is in the very same area of interest as yours and my users would definitely benefit from some of the information you provide here.
    Please let me know if this alright with you. Thanks!

  17. Purchased our as being a gifts for the the mom and also she adored it. cool high quality cool cost and also my personal mother loved they. Even delivered super fast. When you require a gift quickly and you like this versus this is the someone you will need to purchase!

  18. Purchased your as a gift to the mother and/or she loved that. amazing high quality great amount and also our mother liked information technology. Furthermore delivered ultra quick. So if you require a gifts quick and you like this then this is the an you ought to get!

  19. I was curious if you ever considered changing the page layout of your blog?
    Its very well written; I love what youve got to say. But maybe you could a
    little more in the way of content so people could connect with it better.
    Youve got an awful lot of text for only having 1 or 2 images.
    Maybe you could space it out better?

  20. Greetings! Quick question that’s entirely off topic. Do you know how to make your site mobile friendly?
    My weblog looks weird when browsing from my iphone 4. I’m trying
    to find a theme or plugin that might be able to correct this
    problem. If you have any recommendations, please share.
    Appreciate it!

Leave a Reply

Your email address will not be published.