我正在嘗試從 vb6 中的查詢中列印選定的值，這是我的代碼
dim query as string
dim stsstring as string
dim rs as adobd.recordset
query = "select status from x where y='"& randomString &"'"
set rs = mainmodule.dbutils.dbconnection.connection.execute(query)
set rs = nothing
stsstring = rs.fields("status")
msgbox stsstring
我在這里收到錯誤
stsstring = rs.fields("status")
帶有訊息：物件變數或未設定塊變數
提前致謝！
uj5u.com熱心網友回復：
做這個
dim query as string
dim stsstring as string
dim rs as adobd.recordset
query = "select status from x where y='"& randomString &"'"
set rs = mainmodule.dbutils.dbconnection.connection.execute(query)
if not rs.EOF then
stsstring = rs("status").value
end if
msgbox stsstring
uj5u.com熱心網友回復：
在嘗試從中讀取狀態欄位之前，您已將 rs 設定為空。重新排序您的代碼以閱讀：
'...
stsstring = rs.fields("status")
set rs = nothing
msgbox stsstring
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/436629.html
上一篇：使用映射表時獲取未映射記錄的計數
下一篇：使用json資料創建動態輸入欄位