asp:response.write怎么输出连接

<%

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>")