<%
sub sel()
set rs=server.CreateObject("adodb.recordset")
n=request.Form("select")
m=request.Form("txtselect")
if n=1 then
sql="select * from zhuanji where geshou like '%"&m&"%'"
rs.open sql,conn,1,1
if rs.recordcount>0 then
response.Write("<table width='786'><tr><td>以下是搜索到的信息</td></tr><tr><td><hr color='#FFFFFF'></td></tr><tr><td>" & rs("geshou") &"的专集:</td></tr>")
do while not rs.eof
response.Write("<tr><td>"& rs("zhuanji")&"</td></tr>")---->添加连接
c=c+1
rs.movenext
if c=rs.recordcount then exit do
loop
response.Write("</table>")
else
response.Write("无相关信息")
end if
end if
end sub
%>
我想在输出的内容上添加连接，
是<a href="show.asp?id=<%=rs("id")%>">的这种:
response.Write("<tr><td>"& rs("zhuanji")&"</td></tr>")
还有啊，就是为什么我的判断语句中response.Write("无相关信息")这条语句，在条件满足是不能输出啊
參考答案:response.Write("<tr><td><font color='#FFFFFF'><a href=""zjshow.asp?id=" & rs("id") & """>"& rs("zhuanji")&"</a></font></td></tr>")
