主站
经典论坛
家园
作品集
Think.Pages
维基
桌面
聚合
注册
登录
专长会员
帮助
客服QQ:6650171
经典论坛
»
前台制作与脚本专栏
» -=Debug Textarea =-
‹‹ 上一主题
|
下一主题 ››
发新话题
发布投票
发布商品
发布悬赏
发布活动
发布辩论
发布视频
打印
-=Debug Textarea =-
coy
[楼主]
初级会员
帖子
33
体力
105
威望
0
离线
1528 天
发短消息
加为好友
1
#
大
中
小
发表于 2004-3-22 21:19
<HTML> <HEAD> <TITLE>Debug Textarea</TITLE> <meta http-equiv='Content-Type' content='text/html; charset=gb2312'> </HEAD> <style> * { font-size: 12px } body { margin: 10px; padding: 0px } table.list{ cursor: default; border:1px solid #cccccc background-color: #cccccc; border-collapse: collapse; border-Color: #cccccc; } </style> <script language="javascript"> // Coded by windy_sk <windy_sk@126.com> 20040205 function reportError(msg,url,line) { var str = "You have found an error as below: \n\n"; str += "Err: " + msg + " on line: " + line; alert(str); return true; } window.onerror = reportError; document.onkeydown = function() { if(event.ctrlKey){ switch(event.keyCode) { case 82: //r runcode(); break; case 83: //s savecode(); break; case 71: //g goto(prompt('Please input the line number', '1')); break; case 65: //a document.execCommand("SelectAll"); break; case 67: //c document.execCommand("Copy"); break; case 88: //x document.execCommand("Cut"); break; case 86: //v document.execCommand("Paste"); break; case 90: //z document.execCommand("Undo"); break; case 89: //y document.execCommand("Redo"); break; default: break; } event.keyCode = 0; event.returnValue = false; } return; } function show_ln(){ var txt_ln = document.getElementById('txt_ln'); var txt_main = document.getElementById('txt_main'); txt_ln.scrollTop = txt_main.scrollTop; while(txt_ln.scrollTop != txt_main.scrollTop) { txt_ln.value += (i++) + '\n'; txt_ln.scrollTop = txt_main.scrollTop; } return; } function editTab(){ var code, sel, tmp, r; event.returnValue = false; sel =event.srcElement.document.selection.createRange(); r = event.srcElement.createTextRange(); switch (event.keyCode){ case (8) : if (!(sel.getClientRects().length > 1)){ event.returnValue = true; return; } code = sel.text; tmp = sel.duplicate(); tmp.moveToPoint(r.getBoundingClientRect().left, sel.getClientRects()[0].top); if(sel.parentElement() != tmp.parentElement()) return;; sel.setEndPoint('startToStart', tmp); sel.text = sel.text.replace(/^\t/gm, ''); code = code.replace(/^\t/gm, '').replace(/\r\n/g, '\r'); r.findText(code); r.select(); break; case (9) : if (sel.getClientRects().length > 1){ code = sel.text; tmp = sel.duplicate(); tmp.moveToPoint(r.getBoundingClientRect().left, sel.getClientRects()[0].top); if(sel.parentElement() != tmp.parentElement()) return; sel.setEndPoint('startToStart', tmp); sel.text = '\t'+sel.text.replace(/\r\n/g, '\r\t'); code = code.replace(/\r\n/g, '\r\t'); r.findText(code); r.select(); }else{ sel.text = '\t'; sel.select(); } break case (13) : tmp = sel.duplicate(); tmp.moveToPoint(r.getBoundingClientRect().left, sel.getClientRects()[0].top); if(sel.parentElement() != tmp.parentElement()) return; tmp.setEndPoint('endToEnd', sel); sel.text = '\r\n' + tmp.text.replace(tmp.text.replace(/^[\t ]+/g, ""),""); sel.select(); break; default : event.returnValue = true; break; } return; } function runcode() { var str = document.getElementById("txt_main").value; var code_win = window.open('about:blank'); code_win.document.open(); code_win.document.writeln("<script>"); code_win.document.writeln("function reportError(msg,url,line){\nline-=14;\nvar str='You have found an error as below: \\n\\n';\nstr+='Err: '+msg+' on line: '+(line);\nalert(str);\nopener.goto(line);\nopener.focus();\nwindow.onerror=null;\nsetTimeout('self.close()',10);\nreturn true;\n}"); code_win.document.writeln("window.onerror = reportError;"); code_win.document.writeln("<\/script>"); code_win.document.writeln(str); code_win.document.close(); return; } function savecode() { var str = document.getElementById("txt_main").value; var code_win = window.open('about:blank','_blank','top=10000'); code_win.document.open(); code_win.document.writeln(str); code_win.document.close(); code_win.document.execCommand('saveas','','code.html'); code_win.close(); return; } function goto(ln) { if(!/^\d+$/.test(ln) || ln==0) return; var obj = document.getElementById("txt_main"); var rng = obj.createTextRange(); var arr = obj.value.split(/\n/); if(ln>arr.length) ln = arr.length; var str_tmp = ""; for(var i=0; i<ln-1; i++) { str_tmp += arr[i]; } rng.moveStart('character',str_tmp.length); str_tmp = ""; for(i=ln; i<arr.length; i++) { str_tmp += arr[i]; } rng.moveEnd('character',-str_tmp.length); rng.select(); return; } window.onload = function() {document.getElementById("txt_main").value = "<script>\nalert(')\n<\/script>";} </script> <BODY> <table width='600' class='list' border='1' bgcolor='#eeeeee' bordercolorlight='#000000' bordercolordark='#FFFFFF' cellpadding='0' cellspacing='0'> <tr bgcolor='#cccccc'> <td colspan='2' height='20' align='center'>[B]Debug Textarea[/B]</td> </tr> <tr> <td colspan='2'> <table width='95%' border='0' align='center' > <tr> <td align='center'> <textarea id='txt_ln' name='content' rows='10' style='width:40px;overflow:hidden;height:200px;border-right:0px;text-align:right;line-height:14px' onselectstart='this.nextSibling.focus();return false' readonly></textarea><textarea id='txt_main' name='content' rows='10' cols='80' onkeydown='editTab()' onkeyup='show_ln()' onscroll='show_ln()' wrap='off' style='overflow:auto;height:200px;padding-left:5px;border-left:0px;line-height:14px'></textarea> <script>for(var i=1; i<=20; i++) document.getElementById('txt_ln').value += i + '\n';</script> </td> </tr> <tr> <td align='center'> <input type='button' value=' 运 行 ' onclick='runcode()' accesskey='r'> <input type='button' value=' 保 存 ' onclick='savecode()' accesskey='s'> <input type='button' value=' 跳 转 ' onclick="goto(prompt('Please input the line number', '1'))" accesskey='g'> </td> </tr> </table> </td> </tr> </table> </BODY> </HTML>
提示:您可以先修改部分代码再运行
我相信只要坚持去做一件事情就一定会成功的!
请大家坚持到底吧!
----- -=ZB=-
积分
105
阅读权限
20
在线时间
0 小时
注册时间
2004-3-20
最后登录
2004-9-28
查看详细资料
TOP
做西部数码代理.Cn1元国际45元
|
微软开发者工具互动网站
‹‹ 上一主题
|
下一主题 ››
版块跳转
内部交流区
网站开发区
前台制作与脚本专栏
后台数据库编程
WEB标准化专栏
WAP 技术专栏
平面设计区
艺术与设计论坛
Adobe Photoshop 专栏
Fireworks 专栏
矢量图形专栏
插画手绘交流
交互设计区
用户体验综合版
UI图形设计
RIA设计与应用
Flash 8 及之前版本
Flash CS3 及 AS3
Silverlight 专版
Director 专栏
其它技术讨论区
计算机技术
英语学习和技术翻译
摄影欣赏与技术交流
无线通讯与数码设备
信息平台
企业招聘
学习工作交流区
体育运动、线下活动与游戏
创业版