程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> ASP技巧 >> 一個查看ASP的JavaScript程序

一個查看ASP的JavaScript程序

編輯:ASP技巧

<Html>

<head>
<meta http-equiv="Content-Type" content="text/Html; charset=gb2312">
<title>ASP源程序查看器</title>
<style>.f{font-size:9pt}</style>
<script>
//程序作者:虹雨 chy.126.com
var autotop=new Array()
autotop[1]=""
autotop[2]=""
autotop[3]=""
autotop[4]=""
autotop[5]=""

var autoend=new Array()
autoend[1]=""
autoend[2]=""
autoend[3]=""
autoend[4]=""
autoend[5]=""

function auto(cn){
URL=document.forms[0].url.value.toLowerCase()
URLtop=URL.substring(0,7)
URLASP=""
if(URLtop!="http://"){
i=URL.indexOf("/",0)
if(i>5){
URLtop="http://"+URL.substring(0,i+1)
}else{
URLtop=""
}
}else{
i=URL.indexOf("/",12)
if(i>12){
URLtop=URL.substring(0,i+1)
}else{
URLtop=""
}
}
if(URLtop!=""){
j=URL.indexOf(".ASP",i)
if(j>i)URLASP=URL.substring(i,j+4)
}
if(URLASP!=""){
if(cn<6){
window.open(URLtop+autotop[cn]+URLASP+autoend[cn],'')
}else{
for(cn=1;cn<6;cn++)window.open(URLtop+autotop[cn]+URLASP+autoend[cn],'')

}
}else{
alert("\n\n請輸入正確的地址!\n\n")
}
}
</script>
</head>

<body bgcolor="#CCCCCC">
<form>
<table border="0" width="100%" bgcolor="#C0C0C0" cellpadding="10">
  <tr>
    <td>
      <table border="1" width="100%" bgcolor="#999999" bordercolorlight="#000000" cellspacing="0"
bordercolordark="#FFFFFF" cellpadding="5">
        <tr>
          <td bgcolor="#808080" align="center">
           
              <font color="#FFFFFF"><b>ASP源程序查看器</b></font>
          
          </td>
        </tr>
        <tr>
          <td>
           
              <p>輸入ASP程序地址:<input type="text" name="url" size="80" class="f" onFocus="select()">
              </p>     
                
          </td>      
        </tr>     
        <tr>   
          <td>   
               
              選擇ASP查看方法:<input type="button" value="code" onclick=auto(1) style=width:80
class="f">   
              <input type="button" value="showcode" onclick=auto(2) style=width:80 class="f"> <input
type="button" value="::$DATA" onclick=auto(3) style=width:80 class="f">          
              <input type="button" value="%81" onclick=auto(4) style=width:80 class="f"> <input
type="button" value="null" onclick=auto(5) style=width:80 class="f">       
              <input type="button" value="ALL" onclick=auto(6) style='width: 80; background-color:
#FF6600' class="f">          
                     
          </td>        
        </tr>        
        <tr>          
          <td bgcolor="#FFFFFF" class="f">         
             
            <p align="center"><font color="#008000">這幾天很多朋友給我來信或留言,出於安全的問題,本程序暫
時關閉了!</font></p>
            <p> </p>
            <hr>
            <p>&nbsp;&nbsp;&nbsp;  
            本程序從五個系統的漏洞著手,提供用戶五種查看網上ASP的源程序的方法,方便ASP愛好者的學習。因安全
防范的高低可能會出現五種方法都不法查看的ASP程序,這不是本程序的問題,如果你有新的方法請告之者。<p
align="center"> 
            <font color="#FF0000">警告:本程序不可用於不法的行為,否則後果自負!!!</font><p
align="right">程序者:虹雨 
              
          </td>     
        </tr>    
      </table>    
    </td>    
  </tr>    
</table>    
   </form>
    
</Html>    

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved