1樓：匿名使用者
我很負責的告訴你即使你用一樓的方法修改了仍然會出問題!
因為對於你說的這個問題：
microsoft vbscript 執行時錯誤 (0x800a01a8)
缺少物件: 'rs'
不是rs.open "select * from news where title like \'%ss%\'",conn,1,2
這一句引起的，但是仍然要按一樓的方法修改為：
rs.open "select * from news where title like '%" & ss & "%'",conn,1,2
； (這裡如果出錯只會提示是語法錯誤或查詢表示式錯誤，而不是提示缺少物件！)
你說的錯誤是由於你的條件語句引起的，這是一個邏輯錯誤；
你的第一個條件語句if request("do")="submit" then ，我設為a條件，
第二個條件語句if request.form("tx")="" then response.end()
我設為b條件;
我先說第一種情況：
如果a條件滿足的話就會執行：
ss = request.form("tx")
if request.form("tx")="" then response.end() ，
然後如果b條件滿足,也就是request.form("tx")等於空，那麼
response.end() 整個程式就結束了，下面的程式也都不會執行了，
所以就沒有問題；
第二種情況:
如果a條件滿足了，執行：
ss = request.form("tx")
if request.form("tx")="" then response.end()，
但是b條件沒有滿足也就是request.form("tx")不為空，那麼下面的『else』到第二個『end if』的語句會因為a條件的滿足而不會執行；
主要也就是關鍵的這一句set rs=server.createobject("adodb.recordset")沒有執行，但是你的第二個「end if」卻在
rs.close
set rs=nothing
之前就結束了所以
rs.close
set rs=nothing
這兩句都會執行，但是你前面並沒有執行set rs=server.createobject("adodb.recordset")來建立一個資料集，所以執行rs.
close 的時候就會提示你
「缺少物件: 'rs' 」 了
。 所以你的第二個「end if」應該出現在
rs.close
set rs=nothing
之後；還有就是
rs.open "select * from news where title like \'%ss%\'",conn,1,2
改為 rs.open "select * from news where title like '%" & ss & "%'",conn,1,2
希望你看懂了
所以二樓的你說「最佳答案已產生! 」有點為時過早!
三樓你其實還沒來晚，呵呵！
我的答案也不一定是最佳的，但希望能幫上忙！
大家都新年快樂！牛起來！
2樓：
rs.open "select * from news where title like \'%ss%\'",conn,1,2
這句有錯，改成：
rs.open "select * from news where title like '%" & ss & "%'",conn,1,2
excel vba提示424錯誤“要求物件”
這樣可否？不是很清楚你的要求。private sub commandbutton1 click textbox2.text 清空文字框2dim txt1len as integerdim str1 as string,str2 as stringtxt1len len textbox1.value ...
執行VBA提示錯誤 應用程式定義或物件定義錯誤
這一句有問題 setrng sheets 3 range cells 1 i,1 cells 3 i,4 在你的語句裡，range 的母物件是sheets 3 而cells 的母物件是當前活動工作表，當sheets 3 不是活動表裡，cells 和range 的母物件交叉混亂了，在vba裡是非法 在...
E Prime執行時出現指令碼錯誤，求大神們幫忙
你好 這個應該是你某個語句有問題，這是語句報錯，恩。做e prime程式，執行時遇到了指令碼問題，該如何解決 e prime程式設計執行出現錯誤，求大神指導 你好，這是語句行報錯，建議你檢查報錯位置的具體情況，可能 是語句不全，或者物件錯誤版。另權外需要e prime程式示例可以參考 請教執行e p...