ADO存取資料庫 .RecordCount返回值問題
- 帖子
- 1018
- 主題
- 15
- 精華
- 0
- 積分
- 1058
- 點名
- 0
- 作業系統
- win7 32bit
- 軟體版本
- Office 2016 64-bit
- 閱讀權限
- 50
- 性別
- 男
- 來自
- 桃園
- 註冊時間
- 2012-5-9
- 最後登錄
- 2022-9-28
|
ADO存取資料庫 .RecordCount返回值問題
不好意思 , 想請教一下我在Excel VBA裡用ADODB存取Access資料庫
代碼如下 , 可是RecordCount返回值卻是-1而不是查詢到的筆數
請問要如何修改才對?- Sub test()
- Dim adoConnect As New ADODB.Connection
- Dim oRS As New ADODB.Recordset
-
- With adoConnect
- .Provider = "Microsoft.ACE.OLEDB.12.0"
- .Mode = adModeReadWrite
- .ConnectionTimeout = 15
- .Open "G:\stock\DB_Stock_0926.accdb"
- End With
- Set oRS = adoConnect.Execute("SELECT * FROM MyTable")
- Debug.Print oRS.RecordCount
-
- adoConnect.Close
- Set oRS = Nothing
- Set adoConnect = Nothing
- End Sub
|
|
|
|
|
|
|
|
- 帖子
- 472
- 主題
- 5
- 精華
- 0
- 積分
- 485
- 點名
- 0
- 作業系統
- Windows
- 軟體版本
- MS Office
- 閱讀權限
- 100
- 性別
- 男
- 來自
- 香港
- 註冊時間
- 2010-7-4
- 最後登錄
- 2014-12-28
|
2#
發表於 2012-10-23 18:13
| 只看該作者
回復 1# stillfish00
試試多加一行
.CursorLocation = adUseClient
在.Provider 之下 |
|
|
|
|
|
|
|
- 帖子
- 1018
- 主題
- 15
- 精華
- 0
- 積分
- 1058
- 點名
- 0
- 作業系統
- win7 32bit
- 軟體版本
- Office 2016 64-bit
- 閱讀權限
- 50
- 性別
- 男
- 來自
- 桃園
- 註冊時間
- 2012-5-9
- 最後登錄
- 2022-9-28
|
3#
發表於 2012-10-23 19:53
| 只看該作者
回復 2# kimbal
哇 ~ 謝謝 , 這樣值就正確了:D |
|
|
|
|
|
|
|
