|
|
|
|
|
 |
|
 |
等级:  城镇农民 |
| 发贴: 1 |
| 积分: 3 |
| 经验: 0 |
| 体力: 0 |
| 货币: 0 金币 |
| 注册: 2005-05-20 |
|
|
|
 GOVODURL.asp该怎么修改？ |
HelixApp IIS-Web防盗插件VER3.0免费版
如果修改GOVODURL.asp文件也，下面是我GOVODURL.asp文件的代码
<!--#include file="articleconn.asp"-->
<% if request.cookies(""&request("urlid")&"")="" then response.end
set rst=server.createobject("adodb.recordset")
sql="select url from movieurl where id="&request("urlid")
rst.open sql,conn,1,1
real=rst("url")
set rst=server.createobject("adodb.recordset")
sql="select * from movie where id="&request("serverip")
rst.open sql,conn,1,1
response.write rst("ipsip")&real
%>
|
|
| -------------------------------------------------------- |
|
|
|
|
|
| 管理员 |
 |
|
|
|
 |
等级:  德鲁伊 |
勋章:  |
| 发贴: 141 |
| 积分: 3084 |
| 经验: 2912 |
| 体力: 2762 |
| 货币: 0 金币 |
| 注册: 2004-10-28 |
|
| 浏览“大个子”的博客圈 |
|
|
|
| |
我们免费版里就有啊，大家可以看看一模一样的。
<!--#include file="articleconn.asp"-->
<%
'************HelixApp加密URL****************************************
CONST KEY = "101325" '加密因子，试用版固定为101325
'免费版调用代码 -- URL加密方法简单，注意时区和服务器时间对齐
Function UrlEnc_evaluate(orgurl , EncKey)
DIM ts
ts = DateDiff("s", "1970-1-1 8:0:0" , Now) 'unix time_t格式的时间，北京时间是东八区，所以这里是8:00,假如服务器时区是东6区，这里就是6:00
ts = ts xor EncKey
UrlEnc_evaluate = orgurl & "?pxd=" & ts
End Function
'正式版,绑定Real/IIS服务器的域名或者IP
Function UrlEnc_REAL(orgurl , EncKey)
dim ins
set ins = CreateObject("UrlEnc.BaseEnc")
dim EncUrl
UrlEnc_REAL = ins.UrlTsEnc( url , EncKey )
End Function
'正式版,绑定主页URL的域名或者IP
Function UrlEnc_WEB(orgurl , EncKey)
dim ins
set ins = CreateObject("UrlEnc.BaseEnc")
dim EncUrl
UrlEnc_WEB = ins.WebUrlEnc( url , EncKey )
End Function
'************HelixApp加密URL****************************************
%>
<% if request.cookies(""&request("urlid")&"")="" then response.end
set rst=server.createobject("adodb.recordset")
sql="select url from movieurl where id="&request("urlid")
rst.open sql,conn,1,1
real=rst("url")
set rst=server.createobject("adodb.recordset")
sql="select * from movie where id="&request("serverip")
rst.open sql,conn,1,1
'response.write rst("ipsip")&real
dim url
url=rst("ipsip")&real
dim EncUrl
EncUrl = UrlEnc_evaluate( url , key )
response.write EncUrl
%> |
|
| -------------------------------------------------------- |
使用有问题可以和我们群里交流联系：5184216[满]、4478658[新]、15474778[新]
～～～～～～～～～～～～～～～～～～～～～～～～～
你们的支持就是我们最大的动力！
专业流媒体防盗 真正天下无贼 |
|
|
2006-1-29 19:10:23
