Solved

Access 2002 connection to Paradox using ADO

Posted on 2003-12-07
11
423 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
[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
  • 5
  • 5
11 Comments
 
LVL 23

Expert Comment

by:heer2351
ID: 9893267
0
 
LVL 26

Accepted Solution

by:
Alan Warren earned 200 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
Migrating Your Company's PCs

To keep pace with competitors, businesses must keep employees productive, and that means providing them with the latest technology. This document provides the tips and tricks you need to help you migrate an outdated PC fleet to new desktops, laptops, and tablets.

 
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

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

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

Suggested Solutions

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.
AutoNumbers should increment automatically, without duplicates.  But sometimes something goes wrong, and the next AutoNumber value is a duplicate.  This article shows how to recover from this problem.
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
In Microsoft Access, learn different ways of passing a string value within a string argument. Also learn what a “Type Mis-match” error is about.

740 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