Too Many Fields defined. How to load a dbf file with more than 255 fields? Visual Basic 6 pro, vb6

I am using this line to open a dbf file:

Dim db As Database
Dim rs As Recordset
Set db = OpenDatabase("Z:\aloha\vb\dbf\", True, False, "dBASE IV;")
Set rs = db.OpenRecordset("Select * From ITM.DBF Order By ID")

Do While Not rs.EOF
rs.Fields("SHORTNAME")

ETC....ETC....ETC...

The code works great if the database has 255 or less Fields.  How can I load a dbf file that has more than 255 fields.  

I am using VB6pro

Thanks in advanced.
daneburrAsked:
Who is Participating?
 
GrahamSkanConnect With a Mentor RetiredCommented:
Does it work if you list the only some of fields in the Select?

e.g. "Select Field1, Field2  From ITM.DBF Order By ID"


Have you tried ADO instead of DAO?

0
 
daneburrAuthor Commented:
It worked.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.