订阅本栏目 RSS您所在的位置: 深山工作室 > HTML > 正文

一个运行HTML文件的代码

网页教学网 2008/3/19 20:40:55 深山行者 字体: 浏览 6749

以下是引用片段:

<style type="text/css">
<!--
.sumit1 {width:98%;height:100%;background:#FFFFFF;border:1px solid red;color:red;font-weight:bold;font-size:14px;}
.sumit2 {width:98%;height:100%;background:#FFFFFF;border:1px solid green;color:green;font-weight:bold;font-size:14px;}
.sumit3 {width:98%;height:100%;background:#FFFFFF;border:1px solid blue;color:blue;font-weight:bold;font-size:14px;}
.sumit4 {width:98%;height:100%;background:#FFFFFF;border:1px solid #000;color:#000;font-weight:bold;font-size:14px;}
.sumit5 {width:98%;height:100%;background:#FFFFFF;border:1px solid blue;color:blue;font-weight:bold;font-size:14px;}
.sumit6 {width:98%;height:100%;background:#FFFFFF;border:1px solid #000;color:#000;font-weight:bold;font-size:14px;}
-->
</style>
<script>
//获取一个对象
function getByid(id) {
 if (document.getElementById) {
  return document.getElementById(id);
 } else if (document.all) {
  return document.all[id];
 } else if (document.layers) {
  return document.layers[id];
 } else {
  return null;
 }
}


//运行框操作
function creatID(DivID){
var objs=getByid(DivID).getElementsByTagName('textarea');
var inps=getByid(DivID).getElementsByTagName('input');
var buts=getByid(DivID).getElementsByTagName('button');
var labs=getByid(DivID).getElementsByTagName('label');
 for (i=0; i<objs.length; i++) {
  objs[i].id="runcode"+i;
  inps[i].id=i
  buts[i].id=i
  labs[i].id=i
 }
}
function runCode(obj){  //定义一个运行代码的函数,
   var code=getByid("runcode"+obj).value;//即要运行的代码。
   var newwin=window.open('','','');  //打开一个窗口并赋给变量newwin。
   newwin.opener = null // 防止代码对论谈页面修改
   newwin.document.write(code);  //向这个打开的窗口中写入代码code,这样就实现了运行代码功能。
   newwin.document.close();
}

//复制代码
function doCopy(obj) {
 if (document.all){
   textRange = getByid("runcode"+obj).createTextRange();
   textRange.execCommand("Copy");
   alert("代码已经复制到剪切板");
 }else{
   alert("此功能只能在IE上有效\n\n请在文本域中用Ctrl+A选择再复制")
 }
}
//另存代码
function saveCode(obj) {
        var winname = window.open('','','width=0,height=0,top=200,left=200px');
        winname.document.open('text/html', 'replace');
        winname.document.write(obj.value);
        winname.document.execCommand('saveas','','纯CSS简洁TAB.html');
        winname.close();
}

//剪切代码
function cut(obj) {
 if (document.all){
   textRange = getByid("runcode"+obj).createTextRange();
   textRange.execCommand("cut");
   alert("代码已经剪切到剪切板");
 }else{
   alert("此功能只能在IE上有效\n\n请在文本域中用Ctrl+A选择再剪切")
 }
}

//粘贴代码
function paste(obj) {
 if (document.all){
   textRange = getByid("runcode"+obj).createTextRange();
   textRange.execCommand("paste");
   alert("粘贴代码");
 }else{
   alert("此功能只能在IE上有效\n\n请在文本域中用Ctrl+v选择再粘贴")
 }
}
</script>

 <table width="100%" border="0" cellpadding="0" cellspacing="0">
 <form name=form1>
   <tr>
     <td height="530" colspan="6"><textarea name="text" id="runcode0" cols="72" rows="9" style="width:100%;height:98%;"> </TEXTAREA></td>
    </tr>
   <tr>
     <td height="53"><input type="button" value="运行代码" id="0" onClick="runCode(this.id)" class="sumit1"></td>
     <td><input type="button" value="保存代码" id="0" onClick="saveCode(runcode0)" class="sumit2"></td>
     <td><input type="button" value="复制代码" id="0" onClick="doCopy(this.id)" class="sumit3"></td>
     <td><input type="button" value="剪切代码" id="0" onClick="cut(this.id)" class="sumit4"></td>
     <td><input type="button" value="粘贴代码" id="0" onClick="paste(this.id)" class="sumit5"></td>
     <td><input type="button" value="清空代码" id="0" onClick="document.form1.text.value='';" class="sumit6"></td>
   </tr>
  </form>
 </table>
 

 

 

 


相关阅读
uni-app微信小程序分享微信好友与分享到朋友圈功能
如何让百度、Google收录你的站点
正则表达式全部符号解释
硕思闪客精灵破解版下载
ASP实现不打开直接下载txt,jpg...类文件
一个美化了的alert效果,非常不错。
连云港党建门户网站
把以前的做的个人网站程序提供下载,程序大了点,不过全
共有0条关于《一个运行HTML文件的代码》的评论
发表评论
正在加载评论......
返回顶部发表评论
呢 称:
表 情:
内 容:
评论内容:不能超过 1000 字,需审核,请自觉遵守互联网相关政策法规。
验证码: 验证码 
网友评论声明,请自觉遵守互联网相关政策法规。

您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。

更多信息>>栏目类别选择
百度小程序开发
微信小程序开发
微信公众号开发
uni-app
asp函数库
ASP
DIV+CSS
HTML
更多>>同类信息
查询某个字符在字符串中出现的位置数组
jQuery设置提交表单disabled属性所有input、button、extarea、select、checkbox、radio都生效
window.location.href跳转无反应不跳转解决
window.location.href和setTimeout结合时间错误
Object.assign的一些用法
各种钱货币字母转换对应的符号
更多>>最新添加文章
呼伦贝尔市北天草原旅行社有限公司
四川悠旅地旅游有限公司
连云港五洲旅行社有限公司
邓州市途鸿旅行社
连云港华夏国际旅行社有限公司
重庆长航江山国际旅行社
松原市海航商务旅行社
广西亚太国际旅行社有限公司
更多>>随机抽取信息
国内组团社旅游服务商建站解决方案
微信小程序发送给朋友与分享到朋友圈显示灰色的但是按钮分享可以使用
JS+CSS实现图片放大预览效果(购物时放在产品上面预览图片)
深山留言板母亲节效果
asp在线把整站打包成为.mdb形式文件
本站出现验证码问题