快速业务通道

vbs实现的下拉框对应键入值

作者 佚名 来源 ASP编程 浏览 发布时间 2013-07-09
vbs实现的下拉框对应键入值选择自gu1dai的Blog
关键字vbs实现的下拉框对应键入值
<TITLE>selectcenter</TITLE>
<linkrel="stylesheet"type="text/css"href="style.css">
<METANAME="Generator"CONTENT="EditPlus">
<METANAME="Author"CONTENT="">
<METANAME="Keywords"CONTENT="">
<METANAME="Description"CONTENT="">
<head>
<SCRIPTLANGUAGE="vbScript">
<!--
functionkeypress()
tname=mainform.tname.value
''alert(mainform.tname.value)
foreachtninmainform.tablename

allvalue=tn.value
ifleft(allvalue,len(tname))=tnamethen
''alert(allvalue)
mainform.tablename.value=allvalue
exitfor
endif

next
endfunction
//-->
</SCRIPT>
<style>
body{text-align:left;font:12px#000080;}
#main{float:left;width:750px;border:#dddddd1pxsolid;margin:5px10px;padding:10px5px;}
#maintable{width:700;padding:1px;border:1pxsolid#dddddd;font:12px;color:#000080;}
#maintabletd{border:0pxsolid#008000;padding-left:4px;padding-right:4px;
padding-top:1px;padding-bottom:1px;background:#dddddd}
#search{float:left;width:600px;border-bottom:#0000ff1pxsolid;margin:0px;padding:2px10px;}
#result{float:left;width:600px;border:#dddddd0pxsolid;margin:2px1px;padding:2px10px;}
#test{float:left;width:750px;border:#dddddd1pxsolid;margin:5px10px;padding:10px100px;}
#mainp{}
</style>
<BODY>
<divid="test">
<AHREF="classtrn.asp"target="blank">classtrn</A>
</div>
<divid="main">
<tableid=maintable>selecttop10*fromadjust<TR><TD>ad_emno</TD>
<TD>ad_seqno</TD>
<TD>ad_date</TD>
<TD>ad_date1</TD>
<TD>ad_csno1</TD>
<TD>ad_dpno1</TD>
<TD>ad_date2</TD>
<TD>ad_csno2</TD>
<TD>ad_dpno2</TD>
<TD>ad_type</TD>
<TD>ad_type2</TD>
<TD>updid</TD>
<TD>upddate</TD>
</tr></table><FORMMETHOD=POSTid=mainformACTION=mtable.asp>
selectthetable:<selectname=tableName><optionvalue=a_prwork>a_prwork</option>
<optionvalue=account>account</option>
<optionvalue=adjustselected>adjust</option>
<optionvalue=applica1>applica1</option>
<optionvalue=aprwork>aprwork</option>
<optionvalue=backb>backb</option>
<optionvalue=clothes>clothes</option>
<optionvalue=meal>meal</option>
<optionvalue=mealdept>mealdept</option>
<optionvalue=nosh>nosh</option>
<optionvalue=ostockb>ostockb</option>
<optionvalue=ostockh>ostockh</option>
<optionvalue=palletc>palletc</option>
<optionvalue=worktoholb>worktoholb</option>
<optionvalue=worktoholh>worktoholh</option>
<optionvalue=xcard>xcard</option>
<optionvalue=zv01>zv01</option>
<optionvalue=zv02>zv02</option>
</select>
tableame:<inputtype=textname=tnameonkeyup=''vbscript:keypress()''>topnum:<inputtype=textname=topnumsize=5><INPUTTYPE=submitname=actionvalue=submit><INPUTTYPE=resetvalue=reset></FORM>thetimeused0.203125
</div>
</body>
</html>


凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号