moviedown_do.asp

狗狗影视搜索小偷

<%
'==========================================
'文 件 名：MovieDown_Do.asp
'文件用途：下载数据处理
'系统名称：开良狗狗影视搜索小偷
'系统版本：V1.2
'系统开发：开良网络
'技术支持：http://www.klcode.com.cn/
'技 术 QQ：973573137
'联系邮箱：[e-mail]
'==========================================

'定义变量
Dim M_Url '偷的链接
Dim M_Title '标题
Dim M_MovieUrl '链接
Dim Url_Xunlei '迅雷链

'获取链接
M_Url=Request.QueryString("Url")

'获取页面源码
PageCode=GetHttpPage(M_Url)

'获取下载标题
PageCodes=PageCode
M_Title=Down_Process1(PageCodes)

'获取下载链接
PageCodes=PageCode
M_MovieUrl=Down_Process2(PageCodes)

'转换链接
Url_Xunlei=ThunderEncode(M_MovieUrl)
%>