|
 |
access thread: Import/Open Text and dBASE data (ADO)
Message #1 by "David Garcia" <dgarci@b...> on Wed, 7 Nov 2001 21:46:20
|
|
I'm trying to skin a problem I have with RefreshDatabaseWindow from an
ACCESS Project, by trying a different approach.
How do you open text and dbase data using ADO (can't use
TransferText/Database- since these are the root of my refresh problem)?
I've been able to open ACCESS MDBs tables with the following code. I'm
hoping that it will only require minor modifications to achieve the same
for text and dbase data HELP!!
Dim cnn1 As ADODB.Connection
Dim rst1 As ADODB.Recordset
Set cnn1 = New ADODB.Connection
cnn1.Open "Provider=Microsoft.Jet.OLEDB.4.0; " & _
"DataSource=D:\Data\test.mdb;"
Set rst1 = New ADDDB.Recordset
rst1.Open "Temptable", cnn1
Message #2 by "Pardee, Roy E" <roy.e.pardee@l...> on Thu, 08 Nov 2001 07:27:24 -0800
|
|
I don't have it on hand, but there was an article in last month's Visual
Studio magazine that had a pretty comprehensive list of connect strings to
use to get at various file formats via the Jet provider. I bet it's still
on newsstands now (the cover story is about using Passport). Sorry not to
be more directly helpful...
-Roy
Roy Pardee
Programmer/Analyst
SWFPAC Lockheed Martin IT
Extension 8487
-----Original Message-----
From: David Garcia [mailto:dgarci@b...]
Sent: Wednesday, November 07, 2001 1:46 PM
To: Access
Subject: [access] Import/Open Text and dBASE data (ADO)
I'm trying to skin a problem I have with RefreshDatabaseWindow from an
ACCESS Project, by trying a different approach.
How do you open text and dbase data using ADO (can't use
TransferText/Database- since these are the root of my refresh problem)?
I've been able to open ACCESS MDBs tables with the following code. I'm
hoping that it will only require minor modifications to achieve the same
for text and dbase data HELP!!
Dim cnn1 As ADODB.Connection
Dim rst1 As ADODB.Recordset
Set cnn1 = New ADODB.Connection
cnn1.Open "Provider=Microsoft.Jet.OLEDB.4.0; " & _
"DataSource=D:\Data\test.mdb;"
Set rst1 = New ADDDB.Recordset
rst1.Open "Temptable", cnn1
|
|
 |