For loop 循环的VBScript不执行if语句?

For loop 循环的VBScript不执行if语句?,for-loop,asp-classic,vbscript,conditional-statements,For Loop,Asp Classic,Vbscript,Conditional Statements,不完全确定如何搜索这个问题,我与VBScript,所以请原谅,如果这是一个重复 我有一个函数,可以在带有两个参数的页面上打印分页,totalpgs和active。我的问题是active页面仅在变量pg设置为未设置时应用链接上的样式。我很确定这是一个逻辑问题,但我已经盯着它看了7天了 以下是函数: ”=======打印分页链接 功能打印分页(totalpgs,活动) p=“” p=p&“ p=p&“” 对于x=1至总PGS 如果x=激活,则 li=“”将进行比较的行更改为: if cstr

不完全确定如何搜索这个问题,我与VBScript,所以请原谅,如果这是一个重复

我有一个函数,可以在带有两个参数的页面上打印分页,
totalpgs
active
。我的问题是
active
页面仅在变量
pg
设置为未设置时应用链接上的样式。我很确定这是一个逻辑问题,但我已经盯着它看了7天了

以下是函数:
”=======打印分页链接
功能打印分页(totalpgs,活动)
p=“”
p=p&“
p=p&“
    ” 对于x=1至总PGS 如果x=激活,则
    li=“
  • ”将进行比较的行更改为:

        if cstr(x) = cstr(active) then
    

    就这样!!非常感谢。
    pg = request.querystring("pg")
    if pg = "" then
        pg = 1
    end if
    
    <%=print_pagination(totalpages,pg) %>
    
        if cstr(x) = cstr(active) then