Link to external dbase III file

  • Thread starter Thread starter Pierre
  • Start date Start date
P

Pierre

Hi all,

I have

Public Function OpenForSeekDbf(Tablename As String) As Recordset

Set Openforseek = DBEngine.Workspaces(0).OpenDatabase _
("dBase III;HDR=NO;IMEX=2;" +
Mid(CurrentDb().TableDefs(Tablename).Connect, 25) _
, False, False, "").OpenRecordset(Tablename,
dbOpenTable)
End Function

if i call set rst=openforseek("01employe")
i have an error message invalid file name

Any clue why?

regards,
Pierre
 
Hi all,

I have

Public Function OpenForSeekDbf(Tablename As String) As Recordset

Set Openforseek = DBEngine.Workspaces(0).OpenDatabase _
("dBase III;HDR=NO;IMEX=2;" +
Mid(CurrentDb().TableDefs(Tablename).Connect, 25) _
, False, False, "").OpenRecordset(Tablename,
dbOpenTable)
End Function

if i call set rst=openforseek("01employe")
i have an error message invalid file name
Click to expand...
your name has 9 Digits, I think only 8 are allowed, you have to use
the DOS-shortname

If you expect an answer to a personal mail, add the word "manfred" to the first 10 lines in the message
MW
 
Hi Pierre,

I'm not sure about dBase III but FoxPro doesn't like table names that begin
with anything other than an alpha character or underscore.
 
Back
Top