alixixi runcode.asp的代码不错的应用

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title></title>
</head>

<STYLE>
BODY {
SCROLLBAR-FACE-COLOR: #E8F5FE;
 SCROLLBAR-HIGHLIGHT-COLOR: #AAC7E9;
 SCROLLBAR-SHADOW-COLOR: #fcfcfc;
 SCROLLBAR-3DLIGHT-COLOR: #fcfcfc;
 SCROLLBAR-ARROW-COLOR: #240024;
 SCROLLBAR-TRACK-COLOR: #fcfcfc;
 SCROLLBAR-DARKSHADOW-COLOR: #AAC7E9;
 SCROLLBAR-BASE-COLOR: #fcfcfc
}
</STYLE>
<script>
function click(e) {
   if (document.all) {
   if (event.button==1||event.button==2||event.button==3) {
    oncontextmenu='return false';
   }
   }
   if (document.layers) {
   if (e.which == 3) {
    oncontextmenu='return false';
   }
   }
  }
  if (document.layers) {
   document.captureEvents(Event.MOUSEDOWN);
  }
  document.onmousedown=click;
  document.oncontextmenu = new Function("return false;")

  var travel=true
  var hotkey=17  /* hotkey即为热键的键值,是ASII码,这里99代表c键 */
  if (document.layers)
  document.captureEvents(Event.KEYDOWN)
  function gogo(e)
  { if (document.layers) {
  if (e.which==hotkey&&travel){
   //alert("操作错误.或许是您按错了按键!"); 
} }
  else if (document.all){
  if (event.keyCode==hotkey&&travel){ 
//alert("操作错误.或许是您按错了按键!");
}}
  }

document.onkeydown=gogo 
</script>
<link id="css" href="style1.css" type="text/css" rel="stylesheet">
<script src="common.js" language="javascript" type="text/javascript"></script>
<div style="margin-left:8px;">欢迎光临我们网页脚本特效中心,点击运行按钮演示特效:<br/>
<br /><TEXTAREA id="temp57711" class="htmlarea"><html>
<title>网页特效代码|JsCode.CN|---全选并复制表单中内容</title>
<head>
<style>
.highlighttext{
background-color:yellow;
font-weight:bold;
}
</style>

</head>
<form name=test>
<input type="button" value="全选并复制"  onclick="javascript:HighlightAll('test.select1')" >

<textarea name="select1" rows=3 cols=46 >你好,欢迎光临网页特效观止http://www.jscode.cn<&#47textarea>
</form> 
<script language="Javascript">         
<!--

var copytoclip=1

function HighlightAll(theField) {         
var tempval=eval("document."+theField)         
tempval.focus()         
tempval.select()         
if (document.all && copytoclip==1){         
therange=tempval.createTextRange()         
therange.execCommand("Copy")         
window.status="Contents highlighted and copied to clipboard!"         
setTimeout("window.status=''",1800)         
}         
}         
//-->         
</script>
</head>
</html>
<a href="http://www.jb51.net/">欢迎访问我们网页特效集</a></TEXTAREA><br/><INPUT onclick="runEx('temp57711')" type="button" value="运 行" class="submit1"/> <INPUT onclick="doCopy(temp57711)" type="button" value="复 制" class="submit1"/> <INPUT onclick="doSave(temp57711)" type="button" value="保 存" class="submit1"/> <input type=button onclick="parent.window.neatDialog.close()" class=submit1 value="关闭" /> <span class="fontgray12"> [提示:Ctrl+A 全部选择,可先修改部分代码后运行]</span></div>
<body>
</body>
</html>
打包文件下载

(0)

相关推荐

  • alixixi runcode.asp的代码不错的应用

    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-

  • 简单的asp采集代码教程

    采集开始 第一步是分析要采集的页面. 使用浏览器打开要采集的页面(如:http://sports.sina.com.cn/k/2008-09-15/04593948756.shtml,你可以其他页面),打开后,点击右键,查源文件. 第二步,找到要采集的内容所在位置. 假如我要采集这个页面上的标题和内容所在的位置: 标题在<h1 id="artibodyTitle" style="color:#03005C;">和</h1>之间 内容在<

  • ASP程序代码执行时间统计类

    第一次写ASP类,实现功能:分段统计程序执行时间,输出统计表等. 复制代码 代码如下: Class ccClsProcessTimeRecorder '程序作者:明月星光 '作者主页:http://www.5iya.com/blog 'http://www.kuozhanming.com 'ASP程序代码执行时间统计类 Private ccInti,ccIntNonceTime,ccIntDecimal   Private ccIntStartTime,ccIntEndTime,ccIntNow

  • asp木马代码解密的随机加密webshell

    随机加密webshell,解密还不错,应当免杀 加密源码 复制代码 代码如下: <%@ LANGUAGE = VBScript.Encode %> <%#@~^3A4CAA==@#@& jdDhl/k'r1v2FX!ZFE~,PP,~P,@#@&sHC:'r随机加密 J~P~~@#@&jkDnj"SxE4YY2lJzAhS 4l^0+MRmK:r~P,P~P,P~@#@&ZWazDbotDxEbUn木马随机加密器 rP~P~~,P~P,~P,

  • ASP vbs 代码大小写规范

    ASP vbs 代码大小写规范-我们 function aspvbs() { var ss=document.getElementById("aspvbs").value; var vbs0="函数关键字|Function|Sub|"; var vbs1="保留关键字|And|As|ByRef|Call|Case|Class|Const|Dim|Do|Each|Else|ElseIf|Empty|End|Eqv|Erase|Execute|ExecuteG

  • asp.net 代码隐藏的编码模型

    一.内联代码与代码隐藏 代码隐藏模型相对内联代码的优势: 1.逻辑代码和html的分离,使得我们可以更专注于业务逻辑的处理. 2.使业务逻辑更加清晰. 3.可以将后置代码编译成dll,使得程序更加安全. 二.后置代码与页面的关系和机制 与代码后置模型相关的三个类. 1.基页面类 page类 .net类库中的page类,page类定义了页面的基本功能.例如:允许存放其他控件.呈现html.提供对asp.net对象的访问(如request.response.session等). 2.代码后置类 在编

  • 微信抢红包ASP.NET代码轻松实现

    群里都在玩抢红包,抢了再发,发了再抢,简直是无聊,程序员感兴趣是的如何实现,这里简单说说实现思路,附上dome,代码有点low,好在是实现了,具体内容如下 正文 100块发30个红包 50块发13个红包 1块发10个红包 发红包需要满足以下几个条件 1.总金额不变 2.每个红包都必须有钱 3.尽量的均匀点,不然抢红包没什么意思了 实现思路 1.首先要确定最小单位,这里是精确到分,我这里以int类型进行计算,得出的结果也全是int类型 2.数据均匀,这里以  1<n<(剩余金额/剩余红包数)*2

  • 简单的ASP分页代码(测试正确)第1/2页

    本文匆匆已经全面测试,支持ASP+ACCESS以及ASP+SQL,请修改相关部分就可以了. 注意,匆匆谢绝基础问题回答,已经本代码已经很简单,如果还不懂可以参阅本站其他栏目. <!--#include file="conn.asp"--> <% '以上为包含数据库衔接文件 '--------------------------------------------查询开始数据库 set rs=server.CreateObject("adodb.records

  • 判断dll文件是否已经注册的ASP函数代码

    asp判断服务器是否安装了某个组件,也就是是否安装了某个dll文件,判断某个组件是否在服务器注册了,asp组件很多,它的判断可以减少很多asp错误,主要是用下面的函数: 复制代码 代码如下: <% '功能:检查是否存在系统组件或组件是否安装成功 '参数:组件名 Function IsObjInstalled(strClassString) On Error Resume Next IsObjInstalled = False Err = 0 Dim xTestObj Set xTestObj =

  • 一段ASP 伪静态代码

    发现好多asp的系统在调用文章的时候如果不生成静态,输出的都是类似 http://www.xxx.com/show.asp?id=26 这种格式的. 如果可以换成  http://www.xxx.com/show/?26 这种格式,感觉清减了不少,当然对于支持伪静态的空间 还可以设置成  http://www.xxx.com/show/26  据说着杨可以增加搜索引擎收录的几率. 代码如下: 首先建立一个show目录,建立一个index.asp文件,就是系统默认的那个文件 然后把以前如果是 sh

随机推荐