问题已解决
KS_Cls\Kesion.Label.CommonCls.asp
1404行左右
For p=startpage To TotalPage
If p= I Then
PageStr=PageStr & " <a href=""#"" class=""curr""><font color=red>" & p &"</font></a>"
Else
PageStr=PageStr & " <a class=""num"" href=""" & LinkUrlFname & "_" & TotalPage-p+1 & FExt &""">" & p &"</a>"
End If
n=n+1
if n>=10 then exit for
Next
改成:
For p=startpage To TotalPage
if p=1 Then
If (P=I) Then
PageStr=PageStr & "<a href=""" & HomeLink & """ class=""curr""><font color=red>" & P & "</font></a>"
else
PageStr=PageStr & "<a href=""" & HomeLink & """ class=""num"">" & P & "</a>"
End If
else
If p= I Then
PageStr=PageStr & " <a href=""#"" class=""curr""><font color=red>" & p &"</font></a>"
Else
PageStr=PageStr & " <a class=""num"" href=""" & LinkUrlFname & "_" & TotalPage-p+1 & FExt &""">" & p &"</a>"
End If
end if
n=n+1
if n>=10 then exit for
Next
哎,还是靠自己!