怎么可以选择打开本页面和打开新页面,大家看看
<%
rs.Open "Select * From list where addid="&listid, conn, 1,1
if rs.eof and rs.bof then
rs.close
else
%>
<div align="center"><br>
<font color="#FF0000">本层下级分类:</font><br>
<%
i=0
do while not rs.eof
listid1=rs("id")
i=i+1
Set rs1= Server.CreateObject("ADODB.Recordset")
rs1.Open "Select * From list where addid = "&listid1&" order by id", conn, 1,1
Set rs2= Server.CreateObject("ADODB.Recordset")
rs2.Open "Select * From content where addid = "&listid1&" order by id", conn, 1,1
if rs1.eof and rs1.bof and rs2.eof and rs2.bof then
rs1.close
rs2.close
listlink="golink.asp"
else
rs1.close
rs2.close
listlink="show.asp"
end if
%>
<font color="#FF0000">-<a href=<%=listlink%>?id=<%=rs("id")%> target=_blank><%=rs("listname")%></a>- <br>
</font>
<%
rs.movenext
loop
rs.close
end if
%>
<br>
<br>
<%
rs.Open "Select * From content where addid="&listid&" order by id desc", conn, 1,1
if rs.eof and rs.bof then
%>
此分类下没有内容
<%rs.close%>
<%
else
if rs.recordcount=1 then
%>
<%
rs1.Open "Select * From content where addid="&listid, conn, 1,1
displaycontenttitle=rs1("title")
displaycontentpic=rs1("pic")
displaycontentpicintroduce=rs1("picintroduce")
displaycontent=rs1("content")
rs1.close
%>
</div>
<center>
<br>
<span style="font size:14px"><b><%=displaycontenttitle%></b></span>
原代码大概这样,怎么在选择show.asp是本页面打开,而golink.asp是打开一个新页面?