主题:总是显示缺少语句
<%
if page>1 then
response.Write" <a href='AdminNews.asp?selectclass="&selectclass&"&page=1' title='首页'><font face=webdings>"&9&"</font></a>"
response.write" <a href='AdminNews.asp?selectclass="&selectclass&"&page="&page-1&"' title='上一页'><font face=webdings>"& 7 &"</font></a>"
end if
if rs1.pagecount<=5 then
for j=1 to rs1.pagecoun
response.write" <a href='AdminNews.asp?selectclass="&selectclass&"&page="&j&"'>"& j &"</a>"
next
else
for j=1 to 5
response.write" <a href='AdminNews.asp?selectclass="&selectclass&"&page="&j&"'>"& j &"</a>"
if page<rs1.pagecount then
response.write" <a href='AdminNews.asp?selectclass="&selectclass&"&page="&page+1&"' title='下一页'><font face=webdings>"& 8 &"</a>"
response.write" <a href='AdminNews.asp?page=rs1.pagecount&selectclass="&selectclass&"' title='尾页'><font face=webdings>:</font></a>"
end if
end if%>(此处总是显示缺少语句) </td>
</tr>
<% rs1.close
set rs1=nothing
end if
%>
if page>1 then
response.Write" <a href='AdminNews.asp?selectclass="&selectclass&"&page=1' title='首页'><font face=webdings>"&9&"</font></a>"
response.write" <a href='AdminNews.asp?selectclass="&selectclass&"&page="&page-1&"' title='上一页'><font face=webdings>"& 7 &"</font></a>"
end if
if rs1.pagecount<=5 then
for j=1 to rs1.pagecoun
response.write" <a href='AdminNews.asp?selectclass="&selectclass&"&page="&j&"'>"& j &"</a>"
next
else
for j=1 to 5
response.write" <a href='AdminNews.asp?selectclass="&selectclass&"&page="&j&"'>"& j &"</a>"
if page<rs1.pagecount then
response.write" <a href='AdminNews.asp?selectclass="&selectclass&"&page="&page+1&"' title='下一页'><font face=webdings>"& 8 &"</a>"
response.write" <a href='AdminNews.asp?page=rs1.pagecount&selectclass="&selectclass&"' title='尾页'><font face=webdings>:</font></a>"
end if
end if%>(此处总是显示缺少语句) </td>
</tr>
<% rs1.close
set rs1=nothing
end if
%>