一个查看ASP的JavaScript程序

  1<html>
  2<head>
  3<meta content="text/html; charset=utf-8" http-equiv="Content-Type"/>
  4<title>ASP源程序查看器</title>
  5<style>.f{font-size:9pt}</style>
  6<script>   
  7//程序作者:虹雨 chy.126.com   
  8var autotop=new Array()   
  9autotop[1]=""   
 10autotop[2]=""   
 11autotop[3]=""   
 12autotop[4]=""   
 13autotop[5]=""   
 14  
 15var autoend=new Array()   
 16autoend[1]=""   
 17autoend[2]=""   
 18autoend[3]=""   
 19autoend[4]=""   
 20autoend[5]=""   
 21  
 22function auto(cn){   
 23URL=document.forms[0].url.value.toLowerCase()   
 24URLtop=URL.substring(0,7)   
 25URLasp=""   
 26if(URLtop!="http://"){   
 27i=URL.indexOf("/",0)   
 28if(i>5){   
 29URLtop="http://"+URL.substring(0,i+1)   
 30}else{   
 31URLtop=""   
 32}   
 33}else{   
 34i=URL.indexOf("/",12)   
 35if(i>12){   
 36URLtop=URL.substring(0,i+1)   
 37}else{   
 38URLtop=""   
 39}   
 40}   
 41if(URLtop!=""){   
 42j=URL.indexOf(".asp",i)   
 43if(j>i)URLasp=URL.substring(i,j+4)   
 44}   
 45if(URLasp!=""){   
 46if(cn<6){   
 47window.open(URLtop+autotop[cn]+URLasp+autoend[cn],'')   
 48}else{   
 49for(cn=1;cn<6;cn++)window.open(URLtop+autotop[cn]+URLasp+autoend[cn],'')   
 50  
 51}   
 52}else{   
 53alert("\n\n请输入正确的地址!\n\n")   
 54}   
 55}   
 56</script>
 57</head>
 58<body bgcolor="#CCCCCC">
 59<form>
 60<table bgcolor="#C0C0C0" border="0" cellpadding="10" width="100%">
 61<tr>
 62<td>
 63<table bgcolor="#999999" border="1" bordercolordark="#FFFFFF" bordercolorlight="#000000" cellpadding="5" cellspacing="0" width="100%">
 64<tr>
 65<td align="center" bgcolor="#808080">
 66<font color="#FFFFFF"><b>ASP源程序查看器</b></font>
 67</td>
 68</tr>
 69<tr>
 70<td>
 71<p>输入ASP程序地址:<input class="f" name="url" onfocus="select()" size="80" type="text"/>
 72</p>
 73</td>
 74</tr>
 75<tr>
 76<td>   
 77  
 78选择ASP查看方法:<input class="f" onclick="auto(1)" style="width:80" type="button" value="code"/>
 79<input class="f" onclick="auto(2)" style="width:80" type="button" value="showcode"/> <input class="f" onclick="auto(3)" style="width:80" type="button" value="::$DATA"/>
 80<input class="f" onclick="auto(4)" style="width:80" type="button" value="%81"/> <input class="f" onclick="auto(5)" style="width:80" type="button" value="null"/>
 81<input class="f" onclick="auto(6)" style="width: 80; background-color:   
 82#FF6600" type="button" value="ALL"/>
 83</td>
 84</tr>
 85<tr>
 86<td bgcolor="#FFFFFF" class="f">
 87<p align="center"><font color="#008000">这几天很多朋友给我来信或留言,出于安全的问题,本程序暂   
 88时关闭了!</font></p>
 89<p> </p>
 90<hr/>
 91<p>      
 92本程序从五个系统的漏洞着手,提供用户五种查看网上ASP的源程序的方法,方便ASP爱好者的学习。因安全   
 93防范的高低可能会出现五种方法都不法查看的ASP程序,这不是本程序的问题,如果你有新的方法请告之者。<p align="center">
 94<font color="#FF0000">警告:本程序不可用于不法的行为,否则后果自负!!!</font><p align="right">程序者:虹雨   
 95  
 96</p></p></p></td>
 97</tr>
 98</table>
 99</td>
100</tr>
101</table>
102</form>
103</body></html>
Published At
Categories with Web编程
Tagged with
comments powered by Disqus