Asp搜索並面對問題

應該是妳沒有創建記錄集對象。請嘗試以下方法:

& lt%

Dim shuju_total

Dim shuju_first

Dim shuju_last

SQL = " SELECT * FROM Shu ju WHERE fa _ min cheng like ' % MMColParam % '

設置rs =服務器。CreateObject("ADODB。記錄集”)

康涅狄格州，1，1

如果rs.eof或rs.bof，則

shuju_total=0

其他

shuju_total =rs。記錄計數

如果…就會結束

設置本頁顯示的行數

if(Shu ju _ numRows & lt；0)然後

shuju_numRows = shuju_total

Elseif (shuju_numRows = 0)然後

shuju_numRows = 1

如果…就會結束

設置第壹條和最後壹條顯示的記錄

shuju_first = 1

shuju _ last = shuju _ first+shuju _ numRows-1

如果我們有正確的記錄計數，檢查其他統計

if(Shu ju _ total & lt；& gt-1)那麽

if(Shu ju _ first & gt；shuju_total)那麽

舒居_第壹=舒居_總計

如果…就會結束

if(Shu ju _ last & gt；shuju_total)那麽

舒居_last =舒居_total

如果…就會結束

if(Shu ju _ numRows & gt；shuju_total)那麽

shuju_numRows = shuju_total

如果…就會結束

如果…就會結束

% & gt