Parsing Input File

I am developing a VB3 app. I want to update an ACCESS 2.0 table weekly, in code, with a text file that is down-loaded from a VM mainframe. I know how to down-load the file but how do I import the data into the table in code?

I’m sure you know this already, but basically you have to “parse” the input file from the mainframe before you can load it. VB is pretty good about this…let’s say you have a line that is comma delimited (which I would assume is the case for you) and there are five fields. Here’s how you would do it:

Dim sLine as StringDim sChar as StringDim iField as IntegerDim sFields(5) as String * 50  ‘ or whatever maximum field length you readOpen “Filename.ext” for input as #1do while not eof(1)   sChar = Input$(1, 1)   if sChar = “,” then      iField = iField + 1   elseif Asc(sChar) = 10 then      ‘ Do nothing…end of line character   elseif Asc(sChar) = 13 then      ‘ Just hit end of line…need to process the fields somehow      ‘ and then clear holding variables      For iField = 1 to 5         sFields(iField) = “”      Next iField         iField = 1   else      sFields(iField) = sFields(iField) & sChar   End ifloopClose #1
Where the code processes the character #13, you will have all five input fields in this example, and you should insert them into your database. The field counter gets reset, and you go on reading fields. This same code should work well in VB4.0. Bear in mind though, if you want your code to be compatible with NT as well as Win95 you should avoid integers and use longs instead. NT (for some reason) doesn’t like integers as well as it does longs. In the case of the above code it should work fine changing the integer to a long.

Share the Post:
Share on facebook
Share on twitter
Share on linkedin


The Latest

homes in the real estate industry

Exploring the Latest Tech Trends Impacting the Real Estate Industry

The real estate industry is changing thanks to the newest technological advancements. These new developments — from blockchain and AI to virtual reality and 3D printing — are poised to change how we buy and sell homes. Real estate brokers, buyers, sellers, wholesale real estate professionals, fix and flippers, and beyond may

man on floor with data

DevX Quick Guide to Data Ingestion

One of the biggest trends of the 21st century is the massive surge in internet usage. With major innovations such as smart technology, social media, and online shopping sites, the internet has become an essential part of everyday life for a large portion of the population. Due to this internet

payment via phone

7 Ways Technology Has Changed Traditional Payments

In today’s digital world, technology has changed how we make payments. From contactless cards to mobile wallets, it’s now easier to pay for goods and services without carrying cash or using a checkbook. This article will look at seven of the most significant ways technology has transformed traditional payment methods.