lockyou.asp

修改迅易在线评选管理系统,,功能能用,下载的迅易功能不全,

<!--#include file="lockipfun.asp"-->
<%
dim stop_ip,un_ip,rs_ip
un_ip=0

stop_ip= Request.ServerVariables("HTTP_X_FORWARDED_FOR") 
If stop_ip="" Then  stop_ip= Request.ServerVariables("REMOTE_ADDR")
call fiship(stop_ip)

if un_ip=0 then

    set rs_ip=conn.execute("select viw From ameav_stopip where viw<>0 and ("&fishcip(stop_ip)&" between oneip and endip)",0,1)
	if not rs_ip.eof then

	        if rs_ip("viw")=1 then Response.write"瀵逛笉璧