高校问答阿拉丁游戏机报价:ASP函数问题~！
来源：百度文库 编辑：高校问答 时间：2024/05/04 09:25:53
<%sub userlink()
sql="select * from userlink where userid="&userid
set linkrs=conn.execute (sql)
dim j
j=1
do while not(linkrs.bof or linkrs.eof)
Response.Write" <a href='"&linkrs("zhuye")&"' target=_aprent"&_
"/><img src='"&linkrs("logourl")&"' border=0 width=88 height=31 /></a>"
if j=8 then
response.Write "<br>"
end if
j=j+1
loop
end sub
call userlink()
%>
错误类型：
Microsoft VBScript 编译器错误 (0x800A0400)
缺少语句
/rlby/boke/u.asp, line 310
end sub
sql="select * from userlink where userid="&userid
set linkrs=conn.execute (sql)
dim j
j=1
do while not(linkrs.bof or linkrs.eof)
Response.Write" <a href='"&linkrs("zhuye")&"' target=_aprent"&_
"/><img src='"&linkrs("logourl")&"' border=0 width=88 height=31 /></a>"
if j=8 then
response.Write "<br>"
end if
j=j+1
loop
end sub
call userlink()
%>
错误类型：
Microsoft VBScript 编译器错误 (0x800A0400)
缺少语句
/rlby/boke/u.asp, line 310
end sub
这一页中应该不只有这一段代码,请检查前面的 if 和 sub 等语句是否结束，建议使用asp制作工具检查！
另外，loop上面应该加一行
linkrs.movenext