Question

求大虾们帮忙改一段asp代码。

下面这段代码的中括号里的字段(就是【"&rs("BigClassName")&"】这个字段 )我想也搞成有链接,可是我怎么做都不对.望大虾们能帮我解决下.万分感谢.在线等....
<%
Response.Write "<table width=99% border=0 align=right cellspacing=1 cellpadding=0>"

sql="select BigClassID,BigClassName from BigClass order by BigClassID"
rs.open sql,conn,1,1
set rs1=server.createobject("adodb.recordset")
while not rs.EOF

Response.Write "<tr>"&_
"<td valign=top>【"&rs("BigClassName")&"】 </td>"&_
"<td valign=top align=left>"
sql="select * from SmallClass where BigClassName='"&rs("BigClassName")&"' order by SmallClassID"
rs1.open sql,conn,1,1
while not rs1.EOF
Response.Write "<a Class=MainContentS href='SmallClass.asp?BigClassID=" & rs("BigClassID") & "&BigClassName="& rs("BigClassName") & "&SmallClassID=" & rs1("SmallClassID")& "&SmallClassName="& rs1("SmallClassName") &"&SmallClassType="& rs1("SmallClassType") &"'>" & rs1("SmallClassName")&"</a> "
rs1.MoveNext
wend
rs1.close
Response.Write "</td></tr>"

rs.MoveNext
wend
'Response.Write "<tr><td valign=top>【企业信息】</td><td valign=top align=left><a Class=MainContentS href=zc_list.asp>整车信息 </a><a Class=MainContentS href=pj_list.asp>配件信息 </a><a Class=MainContentS href=hy_list.asp>货运信息 </a><a Class=MainContentS href=fw_list.asp>服务信息</a><td></tr>"
rs.Close
set rs1=nothing
Response.Write "</table>"
%>

Answer 1

aa="bb"
Response.Write " <a href='http://www.baidu.com>【"&aa&"】</a> "
这样是可以啊!
你试试!

Answer 2

"<td valign=top>【"&rs("BigClassName")&"】 </td>"&_

改成

"<td valign=top><a href=""链接地址"">【"&rs("BigClassName")&"】</a></td>"&_

Answer 3

哈，现在电脑没IIS测试不了。
response.write"<a href="""&""&rs("BigClassName")&""&""">"&""&rs("BigClassName")&""&"</a>"

Answer 4

<%
Response.Write "<table width=99% border=0 align=right cellspacing=1 cellpadding=0>"

sql="select BigClassID,BigClassName from BigClass order by BigClassID"
rs.open sql,conn,1,1
set rs1=server.createobject("adodb.recordset")
while not rs.EOF

Response.Write "<tr>"&_
"<td valign=top>【<a href=""BigClass.asp?BigClassID="&Rs(0)&"&BigClassName="&Rs(1)&""">"&rs("BigClassName")&"</a>】 </td>"&_
"<td valign=top align=left>"
sql="select * from SmallClass where BigClassName='"&rs("BigClassName")&"' order by SmallClassID"
rs1.open sql,conn,1,1
while not rs1.EOF
Response.Write "<a Class=MainContentS href='SmallClass.asp?BigClassID=" & rs("BigClassID") & "&BigClassName="& rs("BigClassName") & "&SmallClassID=" & rs1("SmallClassID")& "&SmallClassName="& rs1("SmallClassName") &"&SmallClassType="& rs1("SmallClassType") &"'>" & rs1("SmallClassName")&"</a> "
rs1.MoveNext
wend
rs1.close
Response.Write "</td></tr>"

rs.MoveNext
wend
'Response.Write "<tr><td valign=top>【企业信息】</td><td valign=top align=left><a Class=MainContentS href=zc_list.asp>整车信息 </a><a Class=MainContentS href=pj_list.asp>配件信息 </a><a Class=MainContentS href=hy_list.asp>货运信息 </a><a Class=MainContentS href=fw_list.asp>服务信息</a><td></tr>"
rs.Close
set rs1=nothing
Response.Write "</table>"
%>

有错找165368576

Answer 5

"<td valign=top><a href='你的链接'>【"&rs("BigClassName")&"】 </a></td>"

Answer 6

【<a href=www.baidu.com>"&rs("BigClassName")&"</a>】