asp分页问题

Question

嗨，我在这个 asp 分页方面遇到了问题。它似乎将所有链接放在一行中，所以我认为这可能与 int i 的检查有关... 但我对asp不太熟悉。谁能解释一下这个问题。

文件夹包含该月每一天的 pdf，名为 A08P2.pdf A09P2.pdf 等...

谢谢

i = 1
Set fc = f.Files 
Set ff = f.SubFolders 
For Each f1 in fc
intPage =  cint(mid(f1.name,2,2))

chrEdition = mid(f1.name,1,1)

if chrEdition = "A" then
    if i = 1 then
        Response.Write "<tr>"
    end if
        Response.Write "<td width='40' align='center'><a href=" & sUP & f1.name & " class='blue_11px'>" & intPage & "</a></td>"
    if i = 10 then
        Response.Write "</tr>"
        i = 0
    end if
end if

i = i + 1
Next  

Answer 1

您应该将 i (i=i+1) 的递增移动到 if...end if 内，因为如果 i 是 9 并且您遇到两个不是“A”的 chrEditions，那么 i 将变为 11 并且永远不会匹配结束条件 i=10:

if chrEdition = "A" then
    if i = 1 then
            Response.Write "<tr>"
    end if
            Response.Write "<td width='40' align='center'><a href=" & sUP & f1.name & " class='blue_11px'>" & intPage & "</a></td>"
    if i = 10 then
            Response.Write "</tr>"
            i = 0
    end if

    i = i + 1
end if