Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Access 2002 connection to Paradox using ADO

Posted on 2003-12-07
11
Medium Priority
?
431 Views
Last Modified: 2008-02-26
Okay, I am trying to connect to a Paradox table with Access 2002 and would like to use ADO to do it, but I am not to familiar with ADO and can not find many sources of very useful information on ADO.  

First of all the folder that I am using is: P:\ForACC and the folder and file that I am trying to connect to is: P:\Fleet\Fleet.db  and another table I need to connect to is:  P:\Fleet\lert.db.  Can someone show me some sample code for connecting, copying records from these two tables, and then closing the connection?  The records I need are from the Fleet table: VIN, Agency, Year, and lert and from the lert they are: Index and lert.  

These two tables are on a Novel Network.  Is it possible for me to create a user with access rights to all of the above folders and then have the ado connection use the username and password to gain access to the tables and records that I need brought in?  Thanks for the help...
0
Comment
Question by:cpopham
  • 5
  • 5
11 Comments
 
LVL 23

Expert Comment

by:heer2351
ID: 9893267
0
 
LVL 26

Accepted Solution

by:
Alan Warren earned 800 total points
ID: 9893312
Hi cpopham


http://www.able-consulting.com/MDAC/ADO/Connection/ODBC_DSNLess.htm#ODBCDriverForParadox

Set up your connection string as depicted in the link above.


Private Sub Somesub()
'Reference: Microsoft ActiveX data objects 2.xx Library

dim oConn as adodbb.connection
set oconn = new adodb.connection
dim rs as adodb.recordset
set rs = new adodb.recordset

' Copied from the link above
oConn.Open "Driver={Microsoft Paradox Driver (*.db )};" & _
           "DriverID=538;" & _
           "Fil=Paradox 5.X;" & _
           "DefaultDir=c:\dbpath\;" & _
           "Dbq=c:\dbpath\;" & _
           "CollatingSequence=ASCII"

oConn.CursorLocation = adUseClient

dim sql as string
sql = "select yourfield from yourtable"
Rs.CursorLocation = adUseClient
Rs.Open sql, oConn, adOpenStatic, adLockOptimistic, adCmdText

End Sub

Alan :)
0
 
LVL 23

Expert Comment

by:heer2351
ID: 9893338
He Alan since when do you have access to my favorites :)
0
Veeam Disaster Recovery in Microsoft Azure

Veeam PN for Microsoft Azure is a FREE solution designed to simplify and automate the setup of a DR site in Microsoft Azure using lightweight software-defined networking. It reduces the complexity of VPN deployments and is designed for businesses of ALL sizes.

 
LVL 26

Expert Comment

by:Alan Warren
ID: 9893380
Hi Hans,

Able-consulting are good resource, in my favourites too.
Also number 1 find in google when searching for connection strings

I think originally it may have been you who put me onto able-consulting.

Regards

Alan :)
0
 
LVL 23

Expert Comment

by:heer2351
ID: 9893437
Alan,

I was just smiling when I saw that you posted exactly the same link, could not resist to post a little joke.

However you took the time to hack up an example which is probably required when I read the question.

OT: Have you already found a store to buy a Sage costume, I might also be needing it in some time ....

Hans
0
 
LVL 26

Expert Comment

by:Alan Warren
ID: 9893457
LOL

No just budgeting for it at the moment...Still don't know if I need a horse too!

:)
0
 
LVL 23

Expert Comment

by:heer2351
ID: 9893485
I hope the store accepts EE points for payment if we also need a horse.

However I think a beard and grey hair will suffice.

\Sage\, n. A wise man; a man of gravity and wisdom; especially, a man venerable for years, and of sound judgment and prudence; a grave philosopher.

0
 
LVL 26

Expert Comment

by:Alan Warren
ID: 9893598
I reckon EE should provide them, required resources to fulfill our duty and all that stuff. I got both beard and long grey hair naturally, bit of an old hippie from the 70's.

Alan :)
0
 
LVL 23

Expert Comment

by:heer2351
ID: 9893624
So I guess you are a real Sage!

No beard, no grey hair (well a few), I guess I have to stay an apprentice for a while.
0
 

Author Comment

by:cpopham
ID: 9896309
Thanks guys,

When I ran it, the compiler did not like the statement:

rs.Open sql, oConn, adOpenStatic, adLockOptimistic, adCmdText

It gave me a runtime error and said invalid sql statement.  Expected 'INSERT', 'DELETE', blah, blah.

Also, if I put a network user ID and password in the code liek this will it work to let it basically sign on?

oConn.Open "Driver={Microsoft Paradox Driver (*.db )};" & _
           "DriverID=538;" & _
           "Fil=Paradox 5.X;" & _
           "DefaultDir=p:\fleet\;" & _
           "Dbq=p:\fleet\;" & _
           "Exclusive=False" & _
           "PARADOXNETPATH=P:\Pdata" & _
           "PARADOXUSERNAME=teamptr" & _
           "PWD=redrum101" & _
           "CollatingSequence=ASCII"
0
 
LVL 26

Expert Comment

by:Alan Warren
ID: 9900123
thats good news, you have a connection then!

What was the sql you contructed, can you post it here?

Alan :)
0

Featured Post

Ask an Anonymous Question!

Don't feel intimidated by what you don't know. Ask your question anonymously. It's easy! Learn more and upgrade.

Question has a verified solution.

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

Access custom database properties are useful for storing miscellaneous bits of information in a format that persists through database closing and reopening.  This article shows how to create and use them.
In a use case, a user needs to close an opened report by simply pressing the Escape (Esc) key. This can be done by adding macro code in Report_KeyPress or Report_KeyDown event.
Using Microsoft Access, learn some simple rules for how to construct tables in a relational database. Split up all multi-value fields into single values: Split up fields that belong to other things into separate tables: Make sure that all record…
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…
Suggested Courses

824 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