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菜单一样的生成器

相关阅读: 五个简单措施增强IIS安全性; uni-app基础知识数组形式的数据绑定; 连云港智慧树旅游; 绝对让你长见识：200个骗人的创业项目！; 删除程序页面代码中的注释标签; 旅行社线路主题默认模板5; ASP留言板IP或IP段限制与限制留言次数; ASP.NET中文乱码问题的解决。

更多信息>>栏目类别选择: 百度小程序开发; 微信小程序开发; 微信公众号开发; 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还有其它的吗

更多>>随机抽取信息: 利用javascript鼠标经过表格，行与列变色; 一个非常不错的程序编辑工具--PSPad editor; 深山行者留言系统V2.3; IE6不支持png24的解决办法(png24做为css的背景); python加Appium判断滑动是否到达屏幕底部; 双击文字后实现编辑文本功能

更多标签热门标签

客户端淘宝 2003 设为首页自适应游览器 optgroup Request window 增高多选状态栏数字 265 等待失效商城 DW 左右蓝色理想 button 模仿鼠标动画分页教程 tags eof 转换留言板模版 slectindext open 正则 CSS滤镜例子默认高度动态变大想繁体 visite 深山旅游网站管理系统V1.0 变色无限右键复选框服务器 png24 常用缓冲