用hta与ajax实现的五笔字型编码查询工具

存为hta文件,即可


代码如下:

<html> 
<head> 
<title>五笔字型编码查询工具</title> 
<meta http-equiv="content-type" content="text/html;charset=gb2312" />

<HTA:Application 
    MaximizeButton="No" 
    Icon="http://www.w3cg.net/WuBi/wb.ico" 
    Id="WuBiApp"  
    SingleInstance="Yes"  
    ContextMenu="Yes" 
    Sysmenu="Yes" 
    WindowState="Normal"  
    Border="Thin"  
    MinimizeButton="Yes" 
    ApplicationName=""  
    Version="1.0"  
    InnerBorder="No" 
    Caption="Yes"  
    ShowinTaskBar="No"  
/>

<style type="text/css"> 
<!-- 
body { background:#d4d0c8; } 
* { font-family:Arial,sans-serif;font-size:9pt;color:#333; } 
#main { width:100%;height:100%; } 
textarea { line-height:130%; } 
a:link,a:visited { text-decoration:none; } 
--> 
</style>

<script language="javascript"> 
<!--

var url="http://www.w3cg.net/wubi/"; 
var btv1="您可以通过改变下拉列表框来选择你想要功能"; 
var btv2="谢谢分享,您可以点此提交这些汉字编码信息"; 
var btv3="如果您确定已经写好留言,请点此提交给作者"; 
var btv4="正在向服务器提交数据,请稍候。。。。。。"; 
var xmlhttp;

try { 
    xmlhttp=new ActiveXObject("Microsoft.XMLHTTP"); 

catch(e) { 
    alert("对不起,不能创建系统对象,请检查您的系统设置。   "); 
    xmlhttp=false; 
}

function trim(str){  
    str=str.replace(/^\s*/,""); 
    str=str.replace(/\s*$/,""); 
    return str;  
}

function window.onload() { 
    var awidth,aheight; 
    var swidth,sheight; 
    awidth= 600; 
    aheight= 300; 
    swidth= screen.width; 
    sheight= screen.height; 
    window.resizeTo(awidth,aheight); 
    var left,top; 
    left= (swidth-awidth)/2; 
    top= (sheight-aheight)/2; 
    window.moveTo(left,top); 
    document.getElementById("btsubmit").innerText=btv1; 
    if (xmlhttp) { 
        var rult=document.getElementById("result"); 
        rult.innerText="正在读取公告信息。。。"; 
        xmlhttp.open("get",url+"ResponseNews.asp?number="+Math.random(),true); 
        xmlhttp.send(); 
        xmlhttp.onreadystatechange=function() { 
            if (xmlhttp.readystate==4) { 
                if (xmlhttp.status==200) { 
                    rult.innerText=unescape(xmlhttp.responseText); 
                } 
                else { 
                    rult.innerText="公告读取失败,请检查网络设置并重试一次。"; 
                } 
            } 
        }                     
    } 
}

function ckeyword() { 
    var key=document.getElementById("keyword"); 
    if (key.value=="→ 请输入您要查询编码的汉字的拼音") { 
        key.innerText=""; 
    } 
}

function keywordblur() { 
    var key=document.getElementById("keyword"); 
    if (key.value=="") { 
        key.innerText="→ 请输入您要查询编码的汉字的拼音"; 
    } 
}

function modonchange() { 
    var sMod=document.getElementById("module"); 
    var key=document.getElementById("keyword"); 
    var rult=document.getElementById("result"); 
    var btsub=document.getElementById("btsubmit"); 
    switch(sMod.value) { 
        case "cxmod": 
            location.reload(); 
            break; 
        case "tjmod": 
            key.innerText="→ 您正在进行的是添加新编码信息操作"; 
            key.disabled=true; 
            var str; 
            str="提交新汉字编码信息的格式为:\n\n"; 
            str+="例,li,WGQJ,鸿鹄;\n\n"; 
            str+="其中\"例\"为要添加的汉字;\"li\"为该汉字的拼音;\"WGQJ\"为该汉字的五笔编码,建议使用大写字母;\"鸿鹄\"为您的名字,将会在用户查询时出现。"; 
            str+="如果有多条记录请用分号隔开,所有的标点符号请在英文状态下输入。\n\n"; 
            str+="向所有支持本工具完善的朋友致敬!"; 
            rult.innerText=str; 
            btsub.disabled=false; 
            btsub.innerText=btv2; 
            break; 
        case "lymod": 
            key.innerText="→ 您正在进行的是留言操作"; 
            key.disabled=true; 
            var astr; 
            astr="请告诉我您对本工具的任何意见和建议,或者,作者也愿分享你生活中的愉快和不愉快,记得来信或留言时请一并留下您的姓名、联系方式等信息,以便作者回复,谢谢!\n\n"; 
            astr+="作者姓名:贺  兵\n"; 
            astr+="网    名:十一狼,武陵狂生,飘萍生,等\n"; 
            astr+="QQ:112183883\n" 
            astr+="电子邮箱:112183883@163.com,112183883@qq.com\n"; 
            astr+="原籍地址:四川射洪\n"; 
            astr+="目前住址:浙江杭州  "; 
            rult.innerText=astr; 
            btsub.disabled=false; 
            btsub.innerText=btv3; 
            break; 
    } 
}

function searchkey() { 
    var key=document.getElementById("keyword"); 
    var rult=document.getElementById("result"); 
    if (key.value.length!=0) { 
        if (xmlhttp) { 
            xmlhttp.open("get",url+"Search.asp?py="+escape(trim(key.value))+"&numer="+Math.random(),true); 
            xmlhttp.onreadystatechange=function() { 
                if (xmlhttp.readystate==4) { 
                    if (xmlhttp.status==200) { 
                        rult.innerText=unescape(xmlhttp.responseText); 
                    } 
                    else { 
                        rult.innerText="查询过程出错,请检查网络设置并重试一次。"; 
                    } 
                } 
            //    else { 
            //        rult.innerText="正在查询中。。。"; 
            //    } 
            } 
            xmlhttp.send(); 
        } 
    } 
}

function btsubmitclick() { 
    var sMod=document.getElementById("module"); 
    var rult=document.getElementById("result"); 
    var btrv=document.getElementById("btsubmit"); 
    switch (sMod.value) { 
        case "tjmod": 
            btrv.disabled=true; 
            rult.disabled=true; 
            if (xmlhttp) { 
                var Rstr="newletter="+escape(rult.value); 
                xmlhttp.open("post",url+"Addnew.asp?number="+Math.random(),true); 
                xmlhttp.onreadystatechange=function() { 
                    if (xmlhttp.readystate==4) { 
                        if (xmlhttp.status==200) { 
                            rult.innerText=unescape(xmlhttp.responseText); 
                            btrv.innerText=btv2; 
                            btrv.disabled=false; 
                            rult.disabled=false; 
                        } 
                        else { 
                            alert("添加新编码过程出错,请检查网络设置并重试一次。   "); 
                            btrv.innerText=btv2; 
                            btrv.disabled=false; 
                            rult.disabled=false; 
                        } 
                    } 
                    else { 
                            btrv.innerText=btv4; 
                    } 
                } 
                xmlhttp.setRequestHeader("content-length",Rstr.length); 
                xmlhttp.setRequestHeader("content-type","application/x-www-form-urlencoded"); 
                xmlhttp.send(Rstr); 
            } 
            break; 
        case "lymod": 
            btrv.disabled=true; 
            rult.disabled=true; 
            if (xmlhttp) { 
                var Gstr="gstr="+escape(rult.value); 
                xmlhttp.open("post",url+"Guest.asp?number="+Math.random(),true); 
                xmlhttp.onreadystatechange=function() { 
                    if (xmlhttp.readystate==4) { 
                        if (xmlhttp.status==200) { 
                            rult.innerText=unescape(xmlhttp.responseText); 
                            btrv.innerText=btv3; 
                            btrv.disabled=false; 
                            rult.disabled=false; 
                        } 
                        else { 
                            alert("留言添加过程出错,请检查网络设置并重试一次。   "); 
                            btrv.innerText=btv3; 
                            btrv.disabled=false; 
                            rult.disabled=false; 
                        } 
                    } 
                    else { 
                            btrv.innerText=btv4; 
                    } 
                } 
                xmlhttp.setRequestHeader("content-length",Gstr.length); 
                xmlhttp.setRequestHeader("content-type","application/x-www-form-urlencoded"); 
                xmlhttp.send(Gstr); 
            } 
            break; 
    } 

//--> 
</script> 
</head>

<body scroll="no"> 
    <div id="main"> 
        <fieldset style="width:100%;height:100%;text-align:left;"> 
        <form name="search" style="margin:10"> 
            <input type="text" id="keyword" value="→ 请输入您要查询编码的汉字的拼音" size="40" style="color:#789" onfocus="ckeyword()" onblur="keywordblur()" onkeyup="searchkey()" /> 
            <select id="module" onchange="modonchange()"> 
                <option value="cxmod">查询模式</option> 
                <option value="tjmod">添加模式</option> 
                <option value="lymod">留言模式</option> 
            </select> 
            <br/> 
            <textarea rows="10" cols="100" id="result" style="margin-top:5px;"></textarea> 
            <br/> 
            <input type="button" id="btsubmit" disabled="true" style="width:310px;margin-top:7px" onclick="btsubmitclick()">  
            <a href="#" onclick="location.reload()">刷新</a> 
        </form> 
        </fieldset> 
    </div> 
</body>

</html>

(0)

相关推荐

  • 用hta与ajax实现的五笔字型编码查询工具

    存为hta文件,即可 复制代码 代码如下: <html>  <head>  <title>五笔字型编码查询工具</title>  <meta http-equiv="content-type" content="text/html;charset=gb2312" /> <HTA:Application      MaximizeButton="No"      Icon="

  • AJAX for PHP简单表数据查询实例

    功能介绍:AJAX WebShop 3从Beta2开始支持PHP的开发了,AJAX WebShop集成了PHP5的开发环境,因此不需要额外安装配置PHP,本例将实现一个AJAX for PHP的简单数据查询操作,这个例子是单表操作,也可以实现主从表的数据查询. 一.数据表说明 例子采用了Access数据库,当然你也可以使用mysql 或其他类型数据库,数据库名称为:demo.mdb,表名为product,创建字段分别是PRODUCT_ID, PRODUCT_NAME, PRODUCT_PRICE

  • PHP+Ajax 网站SEO查询工具 提供代码第1/3页

    # Name: PHP+Ajax 网站SEO查询工具 # Author: 年华<nianhua.liu@gmail.com> [Q:4908220] # Homepage:http://master8.net 使用说明:1.服务器必须至少支持allow_url_fopen,curl,fsockopen中的一种,具体请咨询服务器管理员. 2.请尊重别人的劳动成果!你可以任意修改并使用此程序,但不允许修改后公开发布!传播此程序亦应保持此压缩包完整性! 3.如果在使用中遇到任何问题,请访问http:

  • jq.ajax+php+mysql实现关键字模糊查询(示例讲解)

    对于这个功能企业上还算比较实用,推荐给大家: index.html <!DOCTYPE html> <html> <head> <meta charset="utf-8"> </head> <style> *{margin:0;padding:0;} .text{width:200px;height:30px;line-height:30px;font-size:14px;outline:none;} ul{wid

  • js获取通过ajax返回的map型的JSONArray的方法

    复制代码 代码如下: for(var i in datares){ if (datares.hasOwnProperty(i)) { sel.append("<option value='"+datares[i].deptid+"'>"+datares[i].deptname+"</option>"); } }

  • 输入法的一些小技巧

    微软拼音输入法超级技巧 1. 错字修改的技巧 因为微软拼音输入法的基本输入单位为语句,所以在输入语句时,发现有错别字不用忙于修正,而是在确认语句之前对整句一起修改.在输入的过程中,微软拼音输入法会自动根据上下文做出调整,将语句修改为它认为最可能的情形.往往经过它的调整,很多错误就会自动被修正了.在修改句子最好从句首开始. 2. 快速回到句首的技巧 输入完一个句子,按右方向键可以快速回到句首.因为光标移动键的作用是循环的. 3. 零声母与音节切分符 汉语拼音中有一些零声母字,即没有声母的字,例如"

  • 用vbs在 HTA 内对脚本进行编码的方法

    问: 您好,脚本专家!如何在 HTA 内对脚本进行编码? -- LL 答: 您好,LL.您知道,刚看到这个问题时,我们就在想:"这有什么大不了的?难道不能像在 HTML 文件中那样在 HTML 应用程序 (HTA) 中对脚本进行编码吗?"令我们大为吃惊的是,好像不能在 HTA 中对脚本进行编码:每次试图这样做时,都会返回像下面这样的错误消息: Scripting encoder object ("Scripting.Encoder") failed on C:\Sc

  • jquery ajax post提交数据乱码

    在用jquery处理html5的应用的时候,一直在firefox下测试都正常,用户用pad访问的时候说有乱码,自己试验了下果然,后发现chrome和ie内核下都是有此问题,此问题设置了页面属性为utf-8时候,只有firefox是传的charset=utf-8的头文件chrome和ie都没有指定,所以出现乱码问题.解决方法: 复制代码 代码如下: $.ajaxSetup({  contentType: "application/x-www-form-urlencoded; charset=utf

  • 分页技术原理与实现之无刷新的Ajax分页技术(三)

    紧接着上篇-分页技术原理与实现之Java+Oracle代码实现分页(二),本篇继续分析分页技术.上篇讲的是分页技术的代码实现,这篇继续分析一下分页技术的效果控制. 上篇已经用代码简单的实现了一个分页.但是我们都看到,代码中每次通过servlet请求取得结果集后,都会转向到一个jsp页面显示结果,这样每次查询页面都会刷新一下,比如查询出现结果集后要查看第三页,页面就会刷新一下.这样页面给人的效果感觉就会有点不舒服,所以我们希望能够在通过条件查询结果集后无论访问哪一页,页面都不会刷新,而只是结果集变

  • Ajax写分页查询(实现不刷新页面)

    要求: 获取数据库中大量的信息显示在页面上,必然要使用到分页查询: 若不使用Ajax,而是用其他的方法,肯定是要刷新页面的,用户体检很不好, 所以最好使用Ajax的方法写分页查询: 1.先来找一张数据很多的表吧! 一张简单的表 代码,引入jquery包: <script src="jquery-1.11.2.min.js"></script> 写一张表格,显示我们的代号跟名称: <table class="table table-striped&

随机推荐