請問前輩們,我使用DAO開啟資料庫,但程式跑到箭頭那一行就會出錯,錯誤訊息為:13, 型態不符,請教前輩,這個問題該如何克服呢?謝謝
Dim DB As Database, rs1 As Recordset
Set DB = DBEngine.Workspaces(0).OpenDatabase("C:\Test\DataBase\Test.mdb")
Set rs1 = DB.OpenRecordset("Test")----＞出現錯誤訊息
Dim DB As Database, rs1 As Recordset
Set DB = DBEngine.Workspaces(0).OpenDatabase("C:\Test\DataBase\Test.mdb")
Set rs1 = DB.OpenRecordset("Test")----＞出現錯誤訊息
文章標籤
全站熱搜
對不起,補充一點,我發現rs1=nothing,請前輩提供建議,謝謝!!
稛?觳賤賸,?2001/08/28,陝祩腔賤源楊狟 哫豢蜊傖 Dim DB As DAO.Database, rs1 As DAO.Recordset 憩褫眕賸,筍岆竭墅腔岆,眕?腔最宒飲岆蚚Dim DB As Database, rs1 As Recordset,珩飲褫眕變,筍岆祥眭耋?妦稛棒猁蚚Dim DB As DAO.Database, rs1 As DAO.Recordset,彆衄?眭耋?妦,?祥醞硌諒,珴珴!!
您檢查一下【設定引用項目】，一定同時引用了 ADO 及 DAO，而且 ADO 一定是排在 DAO 前面， ADO 如果是排在 DAO 前面就會出現型態不符合 (錯誤 13) 原因很簡單，就是 ADO 及 DAO 都有 Recordset，宣告引用時，ADO 若排在前面，VB 會認定 Recordset 指的是排在前面那一個(ADO)的 Recordset
謝謝紀大哥,正如紀大哥所言,我同時引用了ADO及DAO!! 謝謝囉~~~