您的位置: 首页-> 电脑文摘-> 网站开发-> 其它-> 正文

html->javascript->jsp(out.println())
作者佚名 来源InterNet 加入时间:2005-4-1
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>html转js转jsp(或servlet)</title>
<style type="text/css">
<!--
body {
font-size: 12px;
text-align: center;
margin: 0px;
border: none;
background-color: #CCCCCC;
}
-->
</style>
</head>

<body scroll=no>
<script>
function html2js(codestr){
var codes=codestr.split("\n");
var jscode="";
var tcode="";
for(var a=0;a<codes.length;a++){
if(codes[a].replace(/\s+/,"")!=""){
tcode="";
tcode+=codes[a].replace(/\"/ig,"\\\\\\\"").replace(/(\s+)</ig,"<").replace(/\//ig,"\/");
tcode="out.println(\"document.write(\\\""+tcode+"\\\");\");\n";
jscode+=tcode.replace(/\r/ig,"");
//alert(jscode);
}
}
jscode="out.println(\"<script language=\\\"javascript\\\">\");\n"+jscode+"out.println(\"<\/script>\");";
return jscode;
}
function runcode(){
var mywin=window.open("","测试窗口","")
mywin.document.open();
mywin.document.write(jscode.value);
mywin.document.close();
}
</script>
<textarea name="htmlcode" style="width:100%" rows="15" id="htmlcode"></textarea>
<input type="button" name="Submit" value=" 转 换 " onClick="jscode.value=html2js(htmlcode.value)">
<input type="button" name="Submit2" value=" 测 试 " onClick="runcode()">
<br>
<textarea name="jscode" style="width:100%" rows="15" id="jscode"></textarea>
<br>
</body>
</html>



[文章录入员:nancy]

相关文章
  • 每24小时弹一次的HTML代码
  • HTML编写小经验
  • HTML-加速、再加速
  • HTML-加速、再加速(下)
  • HTML-加速、再加速(上)
  • 网页设计中HTML常范的五个错误
  • HTML中小meta的大作用
  • 相关软件:
  • DHTML 手册
  • ASP与DHTML资料集锦
  • HTML4.0 参考手册
  • HTML 4.0说明书
  • ::PCBOOKCN'ADS::


    ::其它::
    ASP/ASP.NET
    PHP技术
    JSP技术
    XML技术
    CGI/PERL
    WEB服务器
    其它
    ::阅读排行::
    ·VBScript 函数集
    ·网站建设步骤
    ·网上建站论坛的选择和安装(菜鸟版...
    ·关于SQL语句中的引号问题(VB...
    ·用ASP动态生成JavaScri...
    ·Apache+PHP+MySQL...
    ·用VBScript实现对Wind...
    ·VBScript和JavaScr...
    ·一个简单的javascript菜...
    ·VBScript函数补习课