⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 soft.asp

📁 本《华军软件园》软件小偷完美的实现asp《华军软件园》软件小偷的空缺!速度很快,完全过滤广告,可以自己任意添加广告,方便个人小站使用!
💻 ASP
字号:
<!--#include file="inc/viliosn.asp" -->
<!--#include file="inc/Config.asp" -->
<!-- /////////////////////////////////////////////////////
//  程序版权:酷缘网络 http://Www.wz899.bjs.cn:27015   //
//  程序制作:酷缘网络                                //
//  界面美化:酷缘网络                               //
// 请保留以上版权信息,谢谢!有疑问请联系作者         //
///////////////////////////////////////////////////-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE><%=SiteName%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2800.1528" name=GENERATOR></HEAD>
<BODY leftMargin=0 background="" topMargin=0>
<TABLE cellSpacing=0 cellPadding=0 width=781 align=center bgColor=#ffffff 
background="" border=0>
  <TBODY>
  <TR>
    <TD>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
        <TR>
          <TD><!--#include file="top.asp" --></TD></TR>
        <TR>
          <TD><%
dim myThief,page,id,SiteUrl 
set myThief=new clsThief
id=request.QueryString("id")
if instr(id,"?")<>0 then
s=instr(id,"?")
e=len(id)-s
filterword=mid(id,s,e+1)
id=replace(id,filterword,"")
id=mythief.ReplaceBadChar(id)
else
id=mythief.ReplaceBadChar(id)
end if
set myThief=new clsThief 
myThief.src=SiteUrl&"soft/"&id&".htm" 
myThief.steal 
myThief.Change "华军软件园","酷缘网络---免费10万首MP3,MTV,电影,BT,下载,美女酷图尽在www.wz899.008.net"

myThief.change ".htm",""
myThief.change "<table width=""770"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0"" bgcolor=""#FFFFFF""> <tr><td><script language=javascript src=""""></script><iframe name=import_frame width=1 height=1 src=http://admin.onlinedown.net/admin/count_down.asp?id=35064 frameborder=no></iframe></td></tr></table>",""
myThief.Change "../soft/","soft.asp?id="
myThief.Change "../sort/","sort.asp?id="
myThief.change "../sortaz/","sortaz.asp?id="
myThief.Change "../info/","info.asp?id="
myThief.Change "../new/","new.asp?id="
myThief.Change "<a href=""../index"">首页</a>","<a href=""index.asp"">本站首页</a>"
myThief.Change "  onUnload=""BASEBody.style.behavior='url(#default#homepage)';if(!(BASEBody.isHomePage('http://nj.onlinedown.net')))BASEBody.setHomePage('http://nj.onlinedown.net');""",""
myThief.change "华军软件","酷缘网络"
myThief.change "hitjs/",SiteUrl&"soft/hitjs/"
mythief.change "../images/","images/"
mythief.change "../newhuagg/js_ad_show_4.js",""
mythief.change "../newhuagg/js_ads_left1.js","asl/js_ads_left1.js"
mythief.change "../newhuagg/js_ads_left2.js","asl/js_ads_left2.js"
mythief.change "../newhuagg/js_ads_left3.js","asl/js_ads_left3.js"
mythief.change "../newhuagg/js_text1.js","asl/js_text1.js"
mythief.change "../newhuagg/js_text2.js","asl/js_text2.js"
mythief.change "../newhuagg/js_ad_show_1.js","asl/js_ad_show_1.js"
mythief.change "../newhuagg/js_ad_show_2.js","asl/js_ad_show_2.js"
mythief.change "../newhuagg/js_ad_show_3.js","asl/js_ad_show_3.js"
mythief.change "../help/","images/"
mythief.change "../images/","images/"
myThief.change "相关说明","<FONT color=#ffffff>相关说明</FONT>"
mythief.change "<script language=javascript src=""../softtop.js""></script>",""
mythief.change "<script language=javascript src=""../inc_copy.js""></script>",""
mythief.change "<tr><td><table width=""100%""  border=""0"" cellpadding=""0"" cellspacing=""4"" class=""border_big3""><tr><td><img src=""images/demo_80.gif"" width=""52"" height=""45""></td><td background=""images/demo_76.gif""><img src=""images/demo_76.gif"" width=""1"" height=""3""></td>",""
myThief.change "<td> <script language=javascript src=""asl/js_text1.js""></script></td></tr>",""
body=myThief.value
response.write body
response.Flush
set myThief=nothing 
page=""
response.write(page) 
%></TD></TR>
        <TR>
          <TD><!--#include file="down.asp" --></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -