?
Solved

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

Posted on 2010-11-27
2
Medium Priority
?
823 Views
Last Modified: 2012-05-10
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.
0
Comment
Question by:daneburr
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
2 Comments
 
LVL 76

Accepted Solution

by:
GrahamSkan earned 1500 total points
ID: 34224966
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
 

Author Closing Comment

by:daneburr
ID: 34230121
It worked.
0

Featured Post

Prepare for your VMware VCP6-DCV exam.

Josh Coen and Jason Langer have prepared the latest edition of VCP study guide. Both authors have been working in the IT field for more than a decade, and both hold VMware certifications. This 163-page guide covers all 10 of the exam blueprint sections.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Make the most of your online learning experience.
In this article, I’ll look at how you can use a backup to start a secondary instance for MongoDB.
An introduction to basic programming syntax in Java by creating a simple program. Viewers can follow the tutorial as they create their first class in Java. Definitions and explanations about each element are given to help prepare viewers for future …
Starting up a Project

771 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question