vb怎样向Paradox表更新或添加记录

Question

我现在有一个小程序，需要操作一个Paradox表，并向其中添加更新记录，现在我已经正常连接了这个数据库，并能够读取数据，但是我无法进行添加更新：我的连接如下：Set lJcn = New ADODB.Connection
Set lJrs = New ADODB.Recordset'连接数据库
  With lJcn
    .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=" & app.path & "\ ;Mode=ReadWrite;Extended Properties=Paradox 7.x;"
    .CursorLocation = adUseClient
    .ConnectionTimeout = 30
    .Open
  End With
  
  
  Ss = "select Piao from Stations "
    lJrs.Open Ss, lJcn, adOpenDynamic, adCmdText
With lJrs
     If Not .EOF Then
         .MoveFirst
         If .Fields(0) <> Piao1 Then
         .Fields(0).Value = Piao1
         .Update
         End If
     End If
     .Close
End WithlJcn.Close请问我该怎样处理

Answer 1

VB用ADO连接Paradox数据库，好象只能查询，不更新和添加数据。改用Delphi吧。

Answer 2

请问如果用odbc连接或是dao连接可以吗？如果可以的话怎么连呢

Answer 3

VB用ADO连接Paradox数据库是可以添加记录的.我做过的
这是我的连接字符串
"Provider=MSDASQL.1;Persist Security Info=False;DRIVER=Microsoft Paradox Driver (*.db );DBQ=" & DatabasePath & "

Answer 4

我试了一下，按 linkinwork(白菜) 连接字符串没能连接上数据库，我是这样连接的：  
    cn.Open "Driver={Microsoft Paradox Driver (*.db )};" & _
        "DriverID=538;Fil=Paradox 5.X;" & _
        "DefaultDir=" & App.Path & "\;Dbq=" & App.Path & _
        "\;CollatingSequence=ASCII;" & _
        "pwd=123"
不支持更新，和楼主一样的问题，郁闷。
装有Paradox 7.X驱动的话，可以试试：
"Provider=MSDASQL.1;Persist Security Info=False;Mode=Read;Extended　Properties='DSN=Paradox;DBQ=C:\myDb;DefaultDir=C:\myDb;DriverId=538;FIL=Paradox 7.X;MaxBufferSize=2048;PageTimeout=600;';Initial Catalog=C:\myDb"