<!--#include file="articleconn.asp"--> ‘包含的数据链接’ <% Response.Expires=0 dim sql dim rs ‘定义变量’ articleid=request("film2") ‘获取两项访问者信息:一为影片名称,一为集数’ urlid=request("film1") if articleid="" or urlid="" then response.write"非法操作" response.end end if set rs=server.createobject("adodb.recordset") sql="select serverip,canlook,movietype,title from learning where articleid="&articleid rs.open sql,conn,1,1 serverip=rs("serverip") okip=Request.Servervariables("HTTP_X_FORWARDED_FOR") If okip="" Then okip=Request.Servervariables("REMOTE_ADDR") set rst8=server.createobject("adodb.recordset") sql="select okip,testok,endtimes from okip where okip='"&okip&"'" rst8.open sql,conn,1,1 if rst8.eof and rst8.bof then if request.cookies("userid")="" or request.cookies("password")="" then %> <script language="JavaScript"> <!-- function checkinput() { if (document.search.userid.value=="") { alert("请输入用户名!"); document.search.userid.focus(); return false; }
if (document.search.password.value=="") { alert("请输入密码!"); document.search.password.focus(); return false; } return true; } --> </script> <title></title> 这是我要修改的一个电影网站,这段可能是IP验证吧 谢谢了!
[此贴子已经被作者于2005-6-6 10:22:35编辑过]