you need to go
Set FoxFreeDb = NEW DAO.Database
Then
FoxFreeDb = DAO.Database(blah...blah...blah)
or it might need another SET in front of the above.
Than MIGHT work....its off the top of my head tho.
if you still have probs, email me priv. and I will see if I can help more.
Jeremy
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
Behalf Of Neven MacEwan
Sent: Tuesday, July 25, 2000 3:43 PM
To: Multiple recipients of list delphi
Subject: [DUG]: Offtopic: DAO/Excel - Please Don't laugh
Hiya
Has anyone out there used DAO from Excel 97 VB
Sub test()
Dim FoxFreeDB As DAO.Database
Dim FoxFreeRS As Recordset
Set FoxFreeDB = DBEngine.OpenDatabase("C:\Projects", False, _
False, "FoxPro 2.6;")
all I get is error 429
dim is the most germain VB statement
Regards Neven
N.K. MacEwan B.E. E&E
[EMAIL PROTECTED]
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz