帮忙看一下这段asp代码的超链接传值错在那里
<%dimstartime,conn,connstr,db,rs,rs_s,rs_s1startime=timer()db="DataBase/###EC0703.V60...
<%
dim startime,conn,connstr,db,rs,rs_s,rs_s1
startime=timer()
db="DataBase/###EC0703.V6017#.asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
'connstr = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Password=123456;Persist Security Info=False;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
set rs=server.createobject("adodb.recordset")
rs.open "select * from EC_smallclass where E_BigClassID=15 ",conn,1,1
do while not rs.eof
Response.Write("<table><tr><td><a href=""E_SmallClass.asp?E_typeid="&trim(rs("E_typeid")")&""E_BigClassID="&trim(rs("E_bigclassid"))&""E_SmallClassID="&trim(rs("E_smallclassid"))&""">"&TRIM(rs("smallclasszs"))&"</a></td></tr></table>")
rs.movenext
loop
%>
在线等,就是超链接那个地方的语法错误 展开
dim startime,conn,connstr,db,rs,rs_s,rs_s1
startime=timer()
db="DataBase/###EC0703.V6017#.asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
'connstr = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Password=123456;Persist Security Info=False;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
set rs=server.createobject("adodb.recordset")
rs.open "select * from EC_smallclass where E_BigClassID=15 ",conn,1,1
do while not rs.eof
Response.Write("<table><tr><td><a href=""E_SmallClass.asp?E_typeid="&trim(rs("E_typeid")")&""E_BigClassID="&trim(rs("E_bigclassid"))&""E_SmallClassID="&trim(rs("E_smallclassid"))&""">"&TRIM(rs("smallclasszs"))&"</a></td></tr></table>")
rs.movenext
loop
%>
在线等,就是超链接那个地方的语法错误 展开
4个回答
展开全部
你好,你那可能是对于链接的符号有点问题,你把那个超链接改成这样再试试,
<a href="E_SmallClass.asp?E_typeid='&trim(rs("E_typeid")")&'+E_BigClassID='&trim(rs("E_bigclassid"))&'+E_SmallClassID='&trim(rs("E_smallclassid"))&'"><%=TRIM(rs("smallclasszs"))%></a>
<a href="E_SmallClass.asp?E_typeid='&trim(rs("E_typeid")")&'+E_BigClassID='&trim(rs("E_bigclassid"))&'+E_SmallClassID='&trim(rs("E_smallclassid"))&'"><%=TRIM(rs("smallclasszs"))%></a>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
Storm代理
2023-08-29 广告
2023-08-29 广告
"StormProxies是全球大数据IP资源服务商,其住宅代理网络由真实的家庭住宅IP组成,可为企业或个人提供满足各种场景的代理产品。点击免费测试(注册即送1G流量)StormProxies有哪些优势?1、IP+端口提取形式,不限带宽,I...
点击进入详情页
本回答由Storm代理提供
展开全部
<%
dim startime,conn,connstr,db,rs,rs_s,rs_s1
startime=timer()
db="DataBase/###EC0703.V6017#.asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
'connstr = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Password=123456;Persist Security Info=False;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
set rs=server.createobject("adodb.recordset")
rs.open "select * from EC_smallclass where E_BigClassID=15 ",conn,1,1
do while not rs.eof
Response.Write("<table><tr><td><a href=""E_SmallClass.asp?E_typeid="&trim(rs("E_typeid"))&"&E_BigClassID="&trim(rs("E_bigclassid"))&"&E_SmallClassID="&trim(rs("E_smallclassid"))&""">"&TRIM(rs("smallclasszs"))&"</a></td></tr></table>")
rs.movenext
loop
%>
覆盖保存。刷新看程序。
dim startime,conn,connstr,db,rs,rs_s,rs_s1
startime=timer()
db="DataBase/###EC0703.V6017#.asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
'connstr = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Password=123456;Persist Security Info=False;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
set rs=server.createobject("adodb.recordset")
rs.open "select * from EC_smallclass where E_BigClassID=15 ",conn,1,1
do while not rs.eof
Response.Write("<table><tr><td><a href=""E_SmallClass.asp?E_typeid="&trim(rs("E_typeid"))&"&E_BigClassID="&trim(rs("E_bigclassid"))&"&E_SmallClassID="&trim(rs("E_smallclassid"))&""">"&TRIM(rs("smallclasszs"))&"</a></td></tr></table>")
rs.movenext
loop
%>
覆盖保存。刷新看程序。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
<%
dim startime,conn,connstr,db,rs,rs_s,rs_s1
startime=timer()
db="DataBase/###EC0703.V6017#.asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
'connstr = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Password=123456;Persist Security Info=False;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
set rs=server.createobject("adodb.recordset")
rs.open "select * from EC_smallclass where E_BigClassID=15 ",conn,1,1
do while not rs.eof
Response.Write("<table><tr><td><a href=""E_SmallClass.asp?E_typeid="&trim(rs("E_typeid"))&"E_BigClassID="&trim(rs("E_bigclassid"))&"E_SmallClassID="&trim(rs("E_smallclassid"))&">"&TRIM(rs("smallclasszs"))&"</a></td></tr></table>")
rs.movenext
loop
%>
dim startime,conn,connstr,db,rs,rs_s,rs_s1
startime=timer()
db="DataBase/###EC0703.V6017#.asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
'connstr = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Password=123456;Persist Security Info=False;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
set rs=server.createobject("adodb.recordset")
rs.open "select * from EC_smallclass where E_BigClassID=15 ",conn,1,1
do while not rs.eof
Response.Write("<table><tr><td><a href=""E_SmallClass.asp?E_typeid="&trim(rs("E_typeid"))&"E_BigClassID="&trim(rs("E_bigclassid"))&"E_SmallClassID="&trim(rs("E_smallclassid"))&">"&TRIM(rs("smallclasszs"))&"</a></td></tr></table>")
rs.movenext
loop
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
trim(rs("E_typeid")")多了个双引号,改成trim(rs("E_typeid"))应该就好了
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询