高手帮忙看下这个out.asp代码问题出现在哪？
<!--#include file="conn.asp"--><%
dim username
username=hx.checkstr(request("username"),10)
if username="" then
CloseDatabase
Response.write "QQ号码不能为空"
Response.End
end if
dim rs,sql
dim siteurl
set rs=server.createobject("adodb.recordset")
sql="select TOP 1 siteurl,outc,outj,fromdate from iqzonei_cn_Link where username='"&username&"'"
rs.open sql,conn,1,2
if not rs.eof then
siteurl="http://"&rs("siteurl")&".qzone.qq.com/?url=qzone/moveTips.html"
If not hx.isrec(1) then
rs("outc")=rs("outc")+1
rs("outj")=rs("outj")+1
rs.update
end if
else
siteurl=WebUrl
end if
rs.close
set rs=nothing
CloseDatabase
Response.Redirect siteurl
%>
追问：我做的是风云榜的跳转代码，直接用用户的QQ号转过去，但转不了
