• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 2189
  • Last Modified:

Connect to Paradox database from VB.

It is necessary to me to work with a database 'Paradox' from VB 6.0 and ADO.
What connection string me need for it?


0
kuzub
Asked:
kuzub
  • 3
  • 2
1 Solution
 
Anthony PerkinsCommented:
From this site:

http://www.able-consulting.com/ADO_Conn.htm

ODBC Driver for Paradox

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

Note: MDAC 2.1 (or greater) requires the Borland Database Engine (BDE) to update Paradox ISAM fDBF files. (Q230126).

For more information, see:  Paradox Driver Programming Considerations

0
 
Anthony PerkinsCommented:
0
 
wsh2Commented:
Courtesy of Dave_Greene

ADO Connection Strings
http://www.able-consulting.com/ADO_Conn.htm#RDSConnectProperty

ODBC Driver for Paradox

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

0
 
wsh2Commented:
For the jet Engine use:

<----- Code Begin ----->

Sub OpenParadox(strDBPath As String)

   Dim cnnDB As ADODB.Connection
   Set cnnDB = New ADODB.Connection

'  Specify Paradox by using the Extended Properties
'  Paradox 3.x
'  Paradox 4.x
'  Paradox 5.x

   With cnnDB
      .Provider = "Microsoft.Jet.OLEDB.4.0"
      .Properties("Extended Properties") = "Paradox 5.x"
      .Open strDBPath
      Debug.Print .ConnectionString
      .Close
   End With

   Set cnnDB = Nothing

End Sub

<----- Code Begin ----->

0
 
wsh2Commented:
kuzub.. why the "B"?.. What was lacking in acperkin's response that was not worthy of an Excellent "A" grade?
0

Featured Post

Industry Leaders: 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!

  • 3
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now