Parsing Input File

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:
Heading photo, Metadata.

What is Metadata?

What is metadata? Well, It’s an odd concept to wrap your head around. Metadata is essentially the secondary layer of data that tracks details about the “regular” data. The regular

XDR solutions

The Benefits of Using XDR Solutions

Cybercriminals constantly adapt their strategies, developing newer, more powerful, and intelligent ways to attack your network. Since security professionals must innovate as well, more conventional endpoint detection solutions have evolved

AI is revolutionizing fraud detection

How AI is Revolutionizing Fraud Detection

Artificial intelligence – commonly known as AI – means a form of technology with multiple uses. As a result, it has become extremely valuable to a number of businesses across

AI innovation

Companies Leading AI Innovation in 2023

Artificial intelligence (AI) has been transforming industries and revolutionizing business operations. AI’s potential to enhance efficiency and productivity has become crucial to many businesses. As we move into 2023, several