做一个自己可以编译网页的编译器,我总结了前辈们的代码,自己修改了下
<
script
>
<!--
var i = 0 ;
var ie = (document.all) ? 1 : 0 ;
var ns = (document.layers) ? 1 : 0 ;
// 预览
function preview()
{
if (document.pad.text.value.length > 0 )
{
pr = window.open( "" , " Preview " , " scrollbars=1,menubar=1,status=1,width=480height=320,left=10,top=10 " );
pr.document.write(document.pad.text.value);
}
else alert( ' 没有代码可预览! ' )
}
// 保存
function savetxt() {
if (document.pad.text.value.length > 0 )
{
var newwin = window.open( ' about:blank ' , '' , ' top=10000 ' );
newwin.document.write(document.pad.text.value);
newwin.document.execCommand( ' saveas ' , '' , ' hx66.html ' )
newwin.window.close();
}
else alert( ' 没有代码可保存! ' )
}
// -->
</ script >
< body style ='cursor:url(skin/mouse.cur)' >
< FORM method =post name =pad >
< table width ='700' border ='0' cellspacing ='1' align ='center' >
< tr >
< td Valign ='TOP' style ="LINE-HEIGHT:150%;padding:5;" align ='center' >
< TEXTAREA cols =95 name =text rows =25 >
</ TEXTAREA >
</ td >
</ tr >
< tr >
< td align ='center' >
< INPUT name =view onclick =preview() type =button value =运行 onmouseover ="this.className='boton'" onmouseout ="this.className='botoff'" class ="botoff" >
< INPUT name =retur onclick =savetxt() type =button value =保存 onmouseover ="this.className='boton'" onmouseout ="this.className='botoff'" class ="botoff" >
< INPUT name =clear type =reset value =还原 onmouseover ="this.className='boton'" onmouseout ="this.className='botoff'" class ="botoff" >
</ form >
</ body >
<!--
var i = 0 ;
var ie = (document.all) ? 1 : 0 ;
var ns = (document.layers) ? 1 : 0 ;
// 预览
function preview()
{
if (document.pad.text.value.length > 0 )
{
pr = window.open( "" , " Preview " , " scrollbars=1,menubar=1,status=1,width=480height=320,left=10,top=10 " );
pr.document.write(document.pad.text.value);
}
else alert( ' 没有代码可预览! ' )
}
// 保存
function savetxt() {
if (document.pad.text.value.length > 0 )
{
var newwin = window.open( ' about:blank ' , '' , ' top=10000 ' );
newwin.document.write(document.pad.text.value);
newwin.document.execCommand( ' saveas ' , '' , ' hx66.html ' )
newwin.window.close();
}
else alert( ' 没有代码可保存! ' )
}
// -->
</ script >
< body style ='cursor:url(skin/mouse.cur)' >
< FORM method =post name =pad >
< table width ='700' border ='0' cellspacing ='1' align ='center' >
< tr >
< td Valign ='TOP' style ="LINE-HEIGHT:150%;padding:5;" align ='center' >
< TEXTAREA cols =95 name =text rows =25 >
</ TEXTAREA >
</ td >
</ tr >
< tr >
< td align ='center' >
< INPUT name =view onclick =preview() type =button value =运行 onmouseover ="this.className='boton'" onmouseout ="this.className='botoff'" class ="botoff" >
< INPUT name =retur onclick =savetxt() type =button value =保存 onmouseover ="this.className='boton'" onmouseout ="this.className='botoff'" class ="botoff" >
< INPUT name =clear type =reset value =还原 onmouseover ="this.className='boton'" onmouseout ="this.className='botoff'" class ="botoff" >
</ form >
</ body >