<%
'==========================================
'文 件 名：MovieDown_Do.asp
'文件用途：下載數據處理
'系統名稱：開良狗狗影視搜索小偷
'系統版本：V1.2
'系統開發：開良網絡
'技術支持：http://www.klcode.com.cn/
'技 術 QQ：973573137
'聯系郵箱：klcde@qq.com
'==========================================

'定義變量
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)
%>