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
var tabs=''
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(/rn/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(/rn/g, 'rt')
code = code.replace(/rn/g, 'rt')
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)
for (var i=0; tmp.text.match(/^[t]+/g) && i<tmp.text.match(/^[t]+/g)[0].length; i++) tabs += 't'
sel.text = 'rn'+tabs
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: nn';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)) return;
var obj = document.getElementById('txt_main');
var rng = obj.createTextRange();
var arr = obj.value.replace(/r/, '').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+1);
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'><br />
<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'><br />
<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>
*************************************************************
TAB键在文本域中的体现
程序代码:<script> function editTab() { var code, sel, tmp, r var tabs='' 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) sel.setEndPoint('startToStart', tmp) sel.text = sel.text.replace(/^t/gm, '') code = code.replace(/^t/gm, '').replace(/rn/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) sel.setEndPoint('startToStart', tmp) sel.text = 't'+sel.text.replace(/rn/g, 'rt') code = code.replace(/rn/g, 'rt') 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) tmp.setEndPoint('endToEnd', sel) for (var i=0; tmp.text.match(/^[t]+/g) && i<tmp.text.match(/^[t]+/g)[0].length; i++) tabs += 't' sel.text = 'rn'+tabs sel.select() break default : event.returnValue = true break } } </script> <textarea cols=75 rows=20 onkeydown='editTab()'> <script> alert('ok') </script></textarea>
*************************************************************
获取input的非value值,而是显示文本值
程序代码:
<select name='sss' onChange='alert(this.options[this.selectedIndex].text)'>
<option value='1'>asdf</option>
<option value='2'>bbbb</option>
<option value='3'>ccc</option>
</select>
*************************************************************
select里的option进行分类列表
程序代码:
<span style='position:absolute;border:1px inset #d3d6d9'><select style='margin:-2px; width:200px'>
<option selected>------------请选择------------</option>
<optgroup label='JavaScript&VBScript区'>
<option>原 创
<option>经 典
<optgroup label='后台区'>
<option>asp&sql
<option>php&mysql
</select></span>
*************************************************************
动态添加
程序代码:<form name='myForm' method='post'> <select name='dept_company' size='10' multiple id='dept_company' class='mySelect'> <option value=''>Please Select...</option> <option value='a'>AA</option> <option value='b'>BB</option> <option value='c'>CC</option> </select><input name='dept_company_list' type='hidden'> <input name='button' type='button' class='myButton' onClick='addItem('dept_company','dept_company2')' value='添加-->>'> <input name='button' type='button' class='myButton' onClick='deleteItem('dept_company2','dept_company')' value='<<--删除'> <select name='dept_company2' size='10' multiple id='dept_company2' class='mySelect'> </select> </form> <script> function addItem(fromName,toName){ eval('var obj1=myForm.'+fromName); eval('var obj2=myForm.'+toName); obj1.options[0].selected=false; if(obj1.selectedIndex == -1) return false; var tempValue; var tempText; for(var i=1;i<obj1.length;i++){ //begin from 1 if(obj1.selectedIndex == -1)break; tempValue=obj1.options[obj1.selectedIndex].value; tempText=obj1.options[obj1.selectedIndex].text; obj1.options[obj1.selectedIndex]=null; obj2.add(new Option(tempText,tempValue),0); } } function deleteItem(fromName,toName){ eval('var obj1=myForm.'+fromName); eval('var obj2=myForm.'+toName); if(obj1.selectedIndex == -1) return false; var tempValue; var tempText; for(var i=0;i<obj1.length;i++){ //begin from 0 if(obj1.selectedIndex == -1)break; tempValue=obj1.options[obj1.selectedIndex].value; tempText=obj1.options[obj1.selectedIndex].text; obj1.options[obj1.selectedIndex]=null; obj2.add(new Option(tempText,tempValue),1); //addItem index is 1 } } </script>
*************************************************************
提示限制输入的字符数
程序代码:
<script language='JavaScript'>
<!--
function SymError()
{
return true;
}
window.onerror = SymError;
function strlength(str){
var l=str.length;
var n=l
for (var i=0;i<l;i++)
{
if (str.charCodeAt(i)<0||str.charCodeAt(i)>255) n++
}
return n
}
function changebyte(value,length){
var l=strlength(value)
if (l<=length) {
if (document.all!=null) document.all('byte').innerText='还可以输入'+(length-l)+'字节'
}
else
{
document.all('byte').innerText='输入字节数超出范围'
}
return true
}
function changebyte1(value,length){
var l=strlength(value)
if (l<=length) {
if (document.all!=null) document.all('byte1').innerText='还可以输入'+(length-l)+'字节'
}
else
{
document.all('byte1').innerText='输入字节数超出范围'
}
return true
}
function changebyte2(value,length){
var l=strlength(value)
if (l<=length) {
if (document.all!=null) document.all('byte2').innerText='还可以输入'+(length-l)+'字节'
}
else
{
document.all('byte2').innerText='输入字节数超出范围'
}
return true
}
</script>
<form method='post' name=test onSubmit='return checkdata()' action=''>
<TEXTAREA onkeydown='return changebyte1(document.test.icqcontent.value,198)' onkeyup='return changebyte1(document.test.icqcontent.value,198)' name=icqcontent cols=40 rows='3'></TEXTAREA>
<SPAN id=byte1><SCRIPT language=JavaScript>changebyte1(document.test.icqcontent.value,198);</SCRIPT></SPAN>
</form>
*************************************************************
判断填写字数的限制
程序代码:
<script language=javascript>
function gbcount(message,total,used,remain)
{
var max;
max&n, bsp;= total.value;
if(message.value.length > max){
message.value = message.value.substring(0,max);
used.value = max;
remain.value = 0;
alert('留言不能超过规定的字数!');
}
else{
used.value = message.value.length;
remain.value = max - used.value;
}
}
</script>
<form name='myform' >
<textarea name='GuestContent' cols='59' rows='6' onkeydown=gbcount(this.form.GuestContent,this.form.total,this.form.used,this.form.remain); onkeyup=gbcount(this.form.GuestContent,this.form.total,this.form.used,this.form.remain);></textarea>
最多字数:<INPUT disabled maxLength=4 name=total size=3 value=20>
已用字数:<INPUT disabled maxLength=4 name=used size=3 value=0>
剩余字数:<INPUT disabled maxLength=4 name=remain size=3>
</form>