小弟有一個db檔(paradox 5.x),我在Access 用 "檔案->取得外部資料->連結資料表" 可以在Access 裡面修改資料
但我試著再vb 用ADO 連接,但好像不能連結,是有什麼特殊的方式嗎?
my Code:
------------------------------------------------------------
Private Sub Form_Load()
Set cn = New ADODB.Connection
 Set rs = New ADODB.Recordset
 Dim rsSQL As String
 
 cn.CursorLocation = adUseClient
 cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
            "Data Source=c:\test.mdb;Persist Security Info=False;" & _
            "Jet OLEDB:Database"
 cn.Open
 
 rsSQL = "SELECT * From User" '此User為外部資料表 (paradox file)
 rs.Open rsSQL, cn, adOpenDynamic, adLockBatchOptimistic

Set MSHFlexGrid1.DataSource = rs
 
End Sub

全站熱搜

vbqa 發表在 痞客邦 留言(1) 人氣()