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

时间:2021-05-22

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

<HTA:Application
MaximizeButton="No"
Icon="http://\n";
astr+="原籍地址:四川射洪\n";
astr+="目前住址:浙江杭州";
rult.innerText=astr;
btsub.disabled=false;
btsub.innerText=btv3;
break;
}
}

functionsearchkey(){
varkey=document.getElementById("keyword");
varrult=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();
}
}
}

functionbtsubmitclick(){
varsMod=document.getElementById("module");
varrult=document.getElementById("result");
varbtrv=document.getElementById("btsubmit");
switch(sMod.value){
case"tjmod":
btrv.disabled=true;
rult.disabled=true;
if(xmlhttp){
varRstr="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){
varGstr="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>

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

</html>

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章