这个怎么办
我想把下面的这一段：
<p align="right">总共<%=sumpage%> 页 当前是第<%=currentpage%> 页 <% if CLng(currentpage)=<1 then %>上一页<% else %> <A href="OrderList.asp?page=<%=CLng(currentpage)-1%>&keyword=<%=keyword%>&type=<%=utype%>" >上一页</a><%end if%>
<% if currentpage=sumpage then %> 下一页<%else%><A href="OrderList.asp?page=<%=clng(currentpage)+1%>&keyword=<%=keyword%>&type=<%=utype%>" > 下一页</a><%end if%></p>
html文档用
vbsript 的response.write 打出来该怎么办？
问题点数：100、回复次数：7Top
1 楼sstower（幽幽）回复于 2002-11-28 14:04:39 得分 0
我打出来发现，它的if then 语句没有执行，
我是这样打的：
Response.Write "<p align=right>总共" & sumpage & " 页 当前是第" & currentpage & " 页"
Response.Write "<% if " & currentpage & "=<1 then %\>上一页<% else %\><A >上一页</a><%end if%\>"
怎么回事呢？Top
2 楼piaomiao_jxz（黑心鱼）回复于 2002-11-28 14:05:15 得分 20
sub ShowBody(Str)
dim result
dim l
l=len(str)
result=""
dim i
for i = 1 to l
select case mid(str,i,1)
case "<"
result=result+"<"
case ">"
result=result+">"
case chr(34)
result=result+"""
case "&"
result=result+"&"
case chr(13)
result=result+"<br>"
case chr(9)
result=result+" "
case chr(32)
'result=result+" "
if i+1<=l and i-1>0 then
if mid(str,i+1,1)=chr(32) or mid(str,i+1,1)=chr(9) or mid(str,i-1,1)=chr(32) or mid(str,i-1,1)=chr(9) then
result=result+" "
else
result=result+" "
end if
else
result=result+" "
end if
case else
result=result+mid(str,i,1)
end select
next
response.write result
end subTop
3 楼redimpresscsdn（绯红之王）回复于 2002-11-28 14:06:04 得分 20
老兄，太……
这样
response.write "<p align='right'>总共:" & sumpage & "页 当前是第" & urrentpage & "页"
……
依此类推，遇到"换成'，遇到<%=currentpage%>换成" & currentpage & "
Top
4 楼arclala（呱呱）回复于 2002-11-28 14:06:54 得分 20
response.write "<p align=right>总共"&sumpage&"页 当前是第"¤tpage&"页"
if CLng(currentpage)=<1 then
response.write "上一页"
else
response.write "<A href=OrderList.asp?page="&CLng(currentpage)-1&"&keyword="&keyword&"&type="&utype&" >上一页</a>
end if
if currentpage=sumpage then
response.write "下一页"
else
response.write "<A href=OrderList.asp?page="&CLng(currentpage)+1&"&keyword="&keyword&"&type="&utype&" >下一页</a>
end ifTop
5 楼redimpresscsdn（绯红之王）回复于 2002-11-28 14:09:50 得分 20
if then 之类的怎么还放在response.write 中，应当是并列的
response.write "<p align='right'>总共:" & sumpage & "页 当前是第" & urrentpage & "页"
if CLng(currentpage)=<1 then
response.write "上一页"
else
response.write "<A href='OrderList.asp?page=" & CLng(currentpage)-1 & "&keyword=" & keyword & "&type=" & utype &"'>上一页</a>"
end if
……Top
6 楼tdl982324（最爱宝宝的笨熊）回复于 2002-11-28 14:10:10 得分 20
何必呢，何苦呢..~~~~~
<%
Response.write "<p align=right>总共"&sumpage&"页，当前是第"¤tpage&"页"
if CLng(currentpage)=<1 then
response.write "上一页"
else
response.write "<A href='OrderList.asp?page="&CLng(currentpage)-1&"&keyword="&keyword&"&type="&utype&"'>上一页</a>"
end if
if currentpage=sumpage then
response.write"下一页"
else
response.write "<A href='OrderList.asp?page="&clng(currentpage)+1&"&keyword="&keyword&"&type="&utype&"'>下一页</a>"
end if
response.write "</p>"
%>Top
7 楼sstower（幽幽）回复于 2002-11-28 14:12:48 得分 0
哎，我怎么糊涂了Top
