javascript_vb_asp代码转换器 -- [代码生成]─ 深山工作室提供网络投票系统|微信公众号投票|微信公众号小程序|抖音小程序|百度小程序|微信公众号开发|企业网站建设

javascript_vb_asp代码转换器

深山行者个人网站 2009/7/23 22:25:11 深山行者字体:大中小浏览 12572

以下为详细代码

<HTML><HEAD><TITLE>javascript_vb_asp代码转换器</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>
BODY {MARGIN-TOP: 24px; BACKGROUND-COLOR: white}
H1 {FONT: 20px '黑体'; COLOR: black; TEXT-ALIGN: center}
TD {FONT: 12px 'Courier New'; COLOR: black}
TEXTAREA {FONT: 12px 'Courier New'; COLOR: black}
INPUT {FONT: 12px 'Courier New'; COLOR: black}
SELECT {FONT: 12px 'Courier New'; COLOR: black}
</STYLE>
<SCRIPT language=JavaScript>
function paste() { //粘帖
    var clipboard = window.clipboardData.getData('text');
    clipboard == null ? alert('您的剪切板中没有任何文本内容') : source.value = clipboard;
}
function make() { //转换
    if (source.value == '') { alert('文本框中没有代码'); return; }
    switch (type.value) {
        case 'ASP':
            var hStr = 'Response.Write(_\n';
            var sStr = '"';
            var eStr = '" & _';
            var tStr = '"")';
            var reExp = /\"/g;;
            var reTxt = '""';
            break;
        case 'VBScript':
            var hStr = 'document.write _\n';
            var sStr = '"';
            var eStr = '" & _';
            var tStr = '""';
            var reExp = /\"/g;
            var reTxt = '""';
            break;
        default:
            var hStr = 'document.write(\n';
            var sStr = '\'';
            var eStr = '\' +';
            var tStr = '\'\');';
            var reExp = /((\')|(\\))/g;
            var reTxt = '\\$1';
    }
    var code = source.value.replace(/(^\s*)|(\s*$)/g, '').split("\r\n");
    result.value = hStr;
    for (var i=0; i<code.length; i++)
    result.value += '\t' + sStr + code[i].replace(reExp, reTxt) + eStr + '\n';
    result.value += tStr
}
function preview() { //预览
    if (type.value == 'JavaScript' || type.value == 'VBScript') {
        var win = window.open();
        win.document.open('text/html', 'replace');
        win.document.writeln('<script language="' + type.value + '">\n' + result.value + '\n<\/script>');
        win.document.close();
    }
    else { alert('无法直接预览'); }
}
function copy() { //复制
    result.value == '' ? alert('没有需要复制的代码') : window.clipboardData.setData('text', result.value);
}
</SCRIPT>
<META content="MSHTML 6.00.2800.1276" name=GENERATOR></HEAD>
<BODY>
<TABLE width=750 align=center>
  <TBODY>
  <TR>
    <TD>
      <H1>代码转换器</H1>
      <HR>
<INPUT onclick=paste(); type=button value=1.粘帖>（将需要进行转换的代码粘帖到下面的文本框中） <TEXTAREA id=source style="WIDTH: 750px; HEIGHT: 180px"></TEXTAREA><BR><BR>
      <HR>
<INPUT onclick=make(); type=button value=2.转换> <SELECT id=type 
      onchange=make();><OPTION value=JavaScript 
        selected>JavaScript</OPTION><OPTION 
        value=VBScript>VBScript</OPTION><OPTION 
      value=ASP>ASP</OPTION></SELECT>（点击转换按钮将完成从HTML代码到相应代码的转换） <TEXTAREA id=result style="WIDTH: 750px; HEIGHT: 180px"></TEXTAREA><BR><BR>
      <HR>
<INPUT onclick=preview(); type=button value=3.预览>（查看转换后的效果） <IMG height=1 
      width=100> <INPUT onclick=copy(); type=button value=4.复制>（复制转换后的代码到剪贴板中） 
      <BR></TD></TR></TBODY></TABLE></BODY></HTML>

前一页:没有了

后一页:可以生成跟QQ菜单一样的生成器

相关阅读: asp金额数字转换为大小写汉字; 海韵幼儿园网站; blog式日历控件; 深山行者留言板V2.2版本; 利用正则替换生成html，经典的，可以用数组进行替换; 超简洁版式留言板模板; python里面requests.post返回的res.text还有其它的吗; 126邮箱TAB效果(同一页面可多次使用)

更多信息>>栏目类别选择: 百度小程序开发; 微信小程序开发; 微信公众号开发; uni-app; asp函数库; ASP; DIV+CSS; HTML; python

更多>>同类信息: javascript_vb_asp代码转换器; 可以生成跟QQ菜单一样的生成器; 13种样式检测QQ是否在线的代码; 复制信息给好友代码; JS压缩; web版的js正则工具

更多>>最新添加文章: dw里面查找替换使用正则删除sqlserver里面的CONSTRAINT; Android移动端自动化测试：使用UIAutomatorViewer与Selenium定位元素; 抖音直播音挂载小雪花懂车帝小程序; javascript获取浏览器指纹可以用来做投票; 火狐Mozilla Firefox出现：无法载入您的Firefox配置文件它可能已经丢失或是无法访问问题解决集合处理办法; 在Android、iOS、Windows、MacOS中微信小程序的文件存放路径; python通过代码修改pip下载源让下载库飞起; python里面requests.post返回的res.text还有其它的吗

更多>>随机抽取信息: asp简繁体转换函数（含3500汉字对照表）; asp利用fso中的二进制数据流方式读取任意文件，并且在网页上下载保存文件; 安康蓝天旅行社官网; 利用java使图片左右上下循环连续滚动不出现空白; 网页调用msn/qq/email记录，淘宝，skype挂在网页上; asp加载xml 用于验证目标网站是否更新

更多标签热门标签

黑白格式访问量 border 滚动 text css 网易许愿 vista 弹窗高对联闭合论坛用户体验编辑进度 Response 县 onload 万年历 hidden 不对齐 max 框移改变关于我们过滤右键失效鎯排版 filter 省略 ie 效果三级 em 定制 windows asp.net 展示 table 留言板硬件快捷展开滑动眼睛 ResponseXML