【问题标题】：VBScript For Loop not executing if statement?VBScript For Loop不执行if语句？
【发布时间】：2013-09-02 00:55:45
【问题描述】：

不完全确定如何搜索我在 VBScript 中遇到的这个问题，所以如果这是重复的，请原谅。

我有一个在页面上打印分页的函数，该函数采用 2 个参数 totalpgs 和 active。我的问题是 active 页面仅在变量 pg 设置为 NOT 时应用链接上的样式。我很确定这是一个逻辑问题，但我已经盯着这个问题看了 7 天了。

这里是函数：

'======= Print Pagination links
function print_pagination (totalpgs,active)
    p = "<div class=""row"">"
    p = p & "<div class=""pagination pagination-right"">"
    p = p & "<ul>"
    for x = 1 to totalpgs
        if x = active then
            li = "<li class=""active"">"  '<- Set class for current page
        else
            li = "<li>" '<- else regular link
        end if
        p = p & li & "<a href='?pg="& x &"'>"& x &"</a></li>"
    next 
    p = p & "</ul></div></div>"
    print_pagination = p
end function

这是页面上的代码：

pg = request.querystring("pg")
if pg = "" then
    pg = 1
end if

<%=print_pagination(totalpages,pg) %>

这是想要的结果：

我希望当前的 <li> 包含一个名为 active 的类。

这是正在发生的事情：

active 类永远不会应用于<li> 标记。当 url 包含 pg 的 get 变量时，不会分配活动类。如果没有，则将其应用于第一个链接。

【问题讨论】：

标签： for-loop asp-classic vbscript conditional-statements

【解决方案1】：

更改与此进行比较的行：

    if cstr(x) = cstr(active) then

【讨论】：

就是这样！！谢谢。