回 帖 发 新 帖 刷新版面

主题:这段代码老是报说少了一个end,

dim i,page,pagesize
    pagesize=5

    if request("page") <> "" then
        page=int(request("page"))    
        if page<1 then
            page=1
        if page>rs.pagecount then
            page=rs.pagecount
    else
        page=1
    end if
    rs.absolutepage=page

这段代码老是报说少了一个end,
是哪里错了呀。

回复列表 (共1个回复)

沙发

dim i,page,pagesize
    pagesize=5

    if request("page") <> "" then
        page=int(request("page"))    
        if page<1 then    page=1
        if page>rs.pagecount then     page=rs.pagecount
    else
        page=1
    end if
    rs.absolutepage=page 

我来回复

您尚未登录,请登录后再回复。点此登录或注册