<%
domain=lcase(request.servervariables("HTTP_HOST"))
domain=md5(domain)
no=request.QueryString("no")
if no="tc" then
Session("yhm")=""
Session("jinyong")=""
Session("yue")=""
Session("dqrq")=""
Session("cxcs")=""
Session("kjdx")=""
Session("huodong")=""
Session("yykjdx")=""
Session("wtscx")=""
Session("yykjbl")=""
Session("wykjbl")=""
Session("sqjh")=""
Session("tcid")=""
Session("kqsy")=""
Session("xswjs")=""
Session("mrllms")=""
Session("mrscfs")=""
Session("wenzi")=""
Session("zuoyi")=""
Session("youyi")=""
Session("yanse")=""
Session("ziti")=""
Session("zihao")=""
Session("cuti")=""
Session("wzqxd")=""
Session("xdm")=""
end if
set rs=server.CreateObject("adodb.recordset")
sql="select * from system where zcm='"&domain&"'"
rs.open sql,conn,1,1
if rs.eof then
Response.Write "<script language=javascript>location.href='xtzc.asp';</script>"
Response.End
end if
rs.close
set rs=nothing
这段代码里边'xtzc.asp'这一页是输注册码的页码，不输注册码永远在这一页，无法进入另外页面。sql="select * from system where zcm='"&domain&"'"从这里让我认为这个注册码是从system表的zcm字段来的，但这个字段下面的加密数值输进去，虽提示正确，但事实并未注册通过。从domain=lcase(request.servervariables("HTTP_HOST"))
)来看，domain是域名的小写，domain=md5(domain) 这一句是不是可以理解为小写的域名MD5加密，sql="select * from system where zcm='"&domain&"'"从这里是不是可以认为，此注册码是一个加密后的域名，此数据表ZCM字段下的数值是随域名的不同而改变的。那么此注册码就是上传的域名了。请教高手，如需更完整的代码请联系我。谢谢！我总共只有8分，但这里没有8，那我只能给5了。