asp 数据合并 排序 提取 批量查询 超级实用小工具

来源:互联网 发布:mysql syntax 编辑:程序博客网 时间:2024/06/07 07:45
<%strfen=vbcrlf  '制表符切割strzhu="★☆★"  '制表符切割 strNow = Now() strNow0 = Year(strNow) &"-"& Right(("00" & Month(strNow)),2) &"-"& Right(("00" & Day(strNow)),2) strNow1 = Year(strNow) & Right(("00" & Month(strNow)),2) & Right(("00" & Day(strNow)),2) strNow2 =  Right(("00" & Hour(strNow)),2) &":"& Right(("00" &  Minute(strNow)),2) &":"& Right(("00" & Second(strNow)),2)daynowes = strNow0  '&" "&strNow2sfzhs=request.form("yuan")idids=request.form("idid")'替换是为了照顾:关联列增加到首列情况(防止后面还有相等列)。'sfzhs=replace(sfzhs,vbcrlf,vbcrlf&"admin@ewuyi.net")'idids=replace(idids,vbcrlf,vbcrlf&"admin@ewuyi.net")%><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312" /><title>合并、排序、提取、批量查询 超级实用小工具</title><style>/*所有*/*{font-size:14px;margin:0 auto;padding:0;font-family:"microsoft yahei","宋体"; color: #666666;}a{color:#333333;text-decoration:none;}a:hover {text-decoration:none;color:#333333;}.r {text-align:right;}.l {text-align:left;}.span,span{color:green;font-weight:600;}.table {overflow:hidden;width:100%;}.test {width:55%;border-top:1px red solid;border-left:1px red solid; }.test td{width:20%;border-right:1px red solid;border-bottom:1px red solid; }.buts{margin:5px;padding:12px 8px;background-color:#0180CF;color:#FFFFFF;}.laydate{line-height:36px;height:36px;width:468px;font-size:24px;BORDER:#006AA8 1px solid;}/*顶部*/.sub_bod{left:0px;top:38px;position:absolute;height:55px;width:100%;z-index:-100}.sub_top{height:40px;margin-bottom:12px;background-color:#0180CF;width:100%;position:relative;}.sub_top .title{text-align:center;color:#FFFFFF;height:40px;line-height:40px;}.sub_top .back{position:absolute;left:10px;top:10px;width:50px;}.sub_top .menu{position:absolute;right:0px;top:6px;width:35px;padding-left:10px;}.sub_top .menu img{ width:28px;}/*底部*/.foot{margin:0 auto;height:24px;width:100%;border-top:1px #CACACA solid;background:#ddd;}.foot .title{width:100%;text-align:center;line-height:22px;}div {width:100%;margin-right: auto;margin-left: auto;text-align: center;}input,.grey{font-size: 14px;border: 1px solid #FFF;}table{ margin:0px auto;border:1px solid #a2c6d3;margin:0 auto;background:#fff;font-size:14px;}table td{border:1px solid #a2c6d3;padding:5px;min-width:468px;}.tt{background:#e5f2fa;}a:link,a:visited,a:hover {color:#000;text-decoration:none;}h1{line-height:88px;color:#006AA8;font-size:28px;}#sfzh,#idid{ FONT-SIZE:12px;BORDER:#006AA8 1px solid;}#sub,#sube{ FONT-SIZE:26px;font-weight:600;color:white;background:#006AA8;BORDER:#006AA8 1px solid;HEIGHT:35px;}#tishi,#jieguo{ width:100%;font-size:20px;margin:3px 0;}#footer{ width:100%;font-size:14px;line-height:58px;margin:3px 0;}</style><!-- ' ★推荐★1:即时开通免费查询: ' 无需域名 无需空间 无需代码 无需技术人员 无需备案 即开即用 ' 开通后会将网址、用户名、密码以及使用教程发送到你留的邮箱。 ' ★通用查询网页直查版(1-3查询条件版) ' 免费自助开通:http://add.12391.net/  ' ★通用查询公众号多选一直查版(聊天式) ' 免费自助开通:http://new.12391.net/  ' ★通用查询公众号绑定查己版(聊天式) ' 免费自助开通:http://add.96cha.com/  ' ★通用查询登录精准查询本人版(可自助改密) ' 免费自助开通:http://add.dbcha.com/  ' ★通用查询登录精准查询公共版(可自助改密) ' 免费自助开通:http://ada.echafen.com/  ' ★通用查询登录模糊搜索公共版(可自助改密) ' 免费自助开通:http://ade.echafen.com/  ' ★通用查询模糊搜索公共版(多查询模式合一) ' 免费自助开通:http://add.xuelikai.com:1111/  ' ★通用防伪溯源查询系统(网页+扫码+公众号) ' 免费自助开通:http://add.mabida.cn/  ' ★通用发货查询系统(网页+公众号) ' 免费自助开通:http://add.mabida.cn:1111/ ' ★通用进度查询系统(网页+公众号) ' 免费自助开通:http://add.mabida.cn:2222/ ' ★通用证书查询系统(网页+公众号) ' 免费自助开通:http://add.mabida.cn:3333/  另外有上百款源码版供选购:http://aiyaha.taobao.com--><body><div align="center"><p><h1>合并、排序、提取、批量查询 超级实用小工具</h1></p><%if len(sfzhs)=0 then%><table border="0" cellpadding="0" cellspacing="0" ><form name="queryForm" method="post" action="" onsubmit="return startRequest(0);">   <tr>   <td colspan="2">   <span>功能:将表1按表2顺序合并到表2(两表均以第一列为关联)。相当于执行了按表2排序,合并到表2,根据表2首列提取表1等功能</span>   <span></span>   </td></tr><tr  class="tt">  <td >   <span>第一步:</span>复制Excel表1二维表(单元格无回车制表符,关联列放第一列后)复制得下边。   </td> <td >   <span>第二步:</span>复制Excel表2二维表(单元格无回车制表符,关联列放第一列后)复制得下边。   </td></tr><tr>  <td ><textarea name="yuan" cols="20" rows="15" id="sfzh"  style="width:100%;">学号科目1科目2科目3科目4科目5科目.科目N900010056064617173856190001006626977739667829000101072598688638589900010097688919387657790001004828075908764819000100187847591837687900010089195837783667690001002958181716082999000100798726859849292</textarea>   </td> <td ><textarea name="idid" cols="20" rows="15" id="idid"  style="width:100%;">学号姓名90001001李一90001002李二90001003李三90001004李四90001005李五90001007李七90001008李八90001009李九90001010李一零</textarea>   </td></tr>   <tr>   <td colspan="2"><p align="center"><input type="submit" name="button" id="sub" value="   合并:排序:提取  " /></p><span>1.示范数据说明:左边无90001003,右边无90001006,注意结果只根据右侧首列提取,提取不到首列会显示0。</span><br><span>2.注意只放1列且是第1列为关联字段哦,不然会有错误;适合不重复字段作为关联,比如名字会有重名则合并结果首列会大于1。</span>。<br><span>3.用途举例:多科成绩合并。表1学号+语文,表2学号+数学,合并后学号+数学+语文,并按表2学号顺序排列。</span>。<br><span>4.用途举例:按指定表排序。表1按试卷顺序录入的表格(学号+语文),表2按顺序的(学号+姓名),合并后按表2学号顺序排列。</span>。<br><span>5.用途举例:按指定表提取。表1按试卷顺序录入的全年级表格(学号+语文),要得到班级1的成绩表,只需复制该班级的学号列提交。</span><br><span>6.用途举例:批量查询功能。原理同上:表1是首列为学号的全年级成绩表格,表2只有想要查询学号列(一行一个)。</span><br>   </td></tr></form><tr>   <td>  <a href="http://add.12391.net/" target="_blank">通用查询网页直查版(1-3查询条件版)</a>     </td>   <td>  <a href="http://new.12391.net/" target="_blank">通用查询公众号多选一直查版(聊天式)</a>     </td>  </tr>  <tr>   <td>  <a href="http://add.96cha.com/" target="_blank">通用查询公众号绑定查己版(聊天式)</a>     </td>   <td>  <a href="http://add.dbcha.com/" target="_blank">通用查询登录精准查本人版(可自助改密)</a>  </td>     </tr>  <tr><td>  <a href="http://ada.dbcha.com/" target="_blank">通用查询登录精准查公共版(可自助改密)</a>  </td>   <td>  <a href="http://ade.dbcha.com/" target="_blank">通用查询登录模糊搜公共版(可自助改密)</a>  </td>  </tr>  <tr>   <td>  <a href="http://add.xuelikai.com:1111/" target="_blank">通用查询模糊搜索公共版(多查询模式合一)</a>  </td>   <td>  <a href="http://add.mabida.cn:1111/" target="_blank">通用发货查询系统(网页+公众号)</a>  </td>     </tr>  <tr><td>  <a href="http://add.mabida.cn/" target="_blank">通用防伪溯源查询(网页+扫码+公众号)</a>  </td> <td>  <a href="https://aiyaha.taobao.com/" target="_blank">更多简单实用的查询系统解决方案</a>  </td>  </tr></table><%else%><table border="0" cellpadding="0" cellspacing="0" >   <tr class="tt" onclick="location.href='?t='+new Date();">   <td colspan="2"><p align="center"><a href="" id="sube" title="返回继续">返回继续</a></p><p ><span>结果说明:</span> 第一列为1正常,小于1则没有提取到,大于1则提取到多条请判断。 </p><p ><span>结果说明:</span> 得到的内容复制回Excel新表标记即可。处理好表格后可以将第一列多余的内容删除。 </p>   </td></tr><tr><td colspan="2"><%newlist=""if len(sfzhs)>5 and len(idids)>1 thenmystr=split(idids,vbcrlf)for ii=0 to ubound(mystr) linea = mystr(ii)if instr(linea,vbtab)>0 thenlinex = split(linea,vbtab)(0)elselinex = lineaend if'newlist=newlist&linex&vbcrlfif len(linex)>0 thenif instr(sfzhs,linex&""&vbtab)>0 thende1dao = split(sfzhs,linex&""&vbtab)'照顾多条符合:第一列>1请留意for ij=1 to ubound(de1dao) de2dao = de1dao(ij)de3dao = split(de2dao&vbcrlf,vbcrlf)(0)newlist=newlist&ij&vbtab&linea&vbtab&de3dao&vbcrlfnextelse'照顾表2不能从表1找到信息:第一列<1请留意newlist=newlist&"0"&vbtab&linea&vbtab&strzhu&"没有提取到表1信息"&vbcrlfend ifend ifnextif len(newlist)>0 then'newlist=replace(newlist,"admin@ewuyi.net","")response.Write "<textarea cols='130' rows='25' style=""width:99%;"">"&newlist&"</textarea><br><hr>"end ifend if%></td></tr>   <tr class="tt" onclick="location.href='?t='+new Date();">   <td colspan="2"><p align="center"><a href="" id="sube" title="返回继续">返回继续</a></p>   </td></tr><tr>   <td>  <a href="http://add.12391.net/" target="_blank">通用查询网页直查版(1-3查询条件版)</a>     </td>   <td>  <a href="http://new.12391.net/" target="_blank">通用查询公众号多选一直查版(聊天式)</a>     </td>  </tr>  <tr>   <td>  <a href="http://add.96cha.com/" target="_blank">通用查询公众号绑定查己版(聊天式)</a>     </td>   <td>  <a href="http://add.dbcha.com/" target="_blank">通用查询登录精准查本人版(可自助改密)</a>  </td>     </tr>  <tr><td>  <a href="http://ada.dbcha.com/" target="_blank">通用查询登录精准查公共版(可自助改密)</a>  </td>   <td>  <a href="http://ade.dbcha.com/" target="_blank">通用查询登录模糊搜公共版(可自助改密)</a>  </td>  </tr>  <tr>   <td>  <a href="http://add.xuelikai.com:1111/" target="_blank">通用查询模糊搜索公共版(多查询模式合一)</a>  </td>   <td>  <a href="http://add.mabida.cn:1111/" target="_blank">通用发货查询系统(网页+公众号)</a>  </td>     </tr>  <tr><td>  <a href="http://add.mabida.cn/" target="_blank">通用防伪溯源查询(网页+扫码+公众号)</a>  </td> <td>  <a href="https://aiyaha.taobao.com/" target="_blank">更多简单实用的查询系统解决方案</a>  </td>  </tr></table><%end if%><div id="footer">&copy;<%=year(now())%>  Powered By <a href="http://add.12391.net/" target="_blank">通用查分系统</a>&<a href="http://aiyaha.taobao.com/" target="_blank">aiyaha</a></div></div></body></html>


合并、排序、提取、批量查询 超级实用小工具

asp超级小巧实用的小工具,会计类、办公人员必备、程序员、小数据分析必备。主功能只有11KB大小。

如何使用:

1. 放asp虚拟主机即可执行,也可以本地电脑运行(双击netbox,这样无需网络无需服务器空间)。

如何操作:

访问功能页面后:

第一步:复制Excel表1二维表(单元格无回车制表符,关联列放第一列后)复制得下边。

第二步:复制Excel表2二维表(单元格无回车制表符,关联列放第一列后)复制得下边。

第三步:点查询页面的按钮(合并、排序、提取)。

第四步:得到的结果复制到Excel新表编辑,比如第一列内容不是1的行,分析处理。

处理异常行完成后,可以删除新加的辅助列:第一列。

注意事项:

得是二维表:Excel首行列标题,以后一行一条数据。

单元格无回车换行,无制表符。如果有想办法先替换。

首列是关联字段,建议不重复的内容比如学号,准考证号,身份证号等。

关联字段只放第一列。

得到的结果你的特别关注第一列不等于1的行,分析其可靠性。

用途举例:

用途举例:多科成绩合并。表1学号+语文,表2学号+数学,合并后学号+数学+语文,并按表2学号顺序排列。。

用途举例:按指定表排序。表1按试卷顺序录入的表格(学号+语文),表2按顺序的(学号+姓名),合并后按表2学号顺序排列。。

用途举例:按指定表提取。表1按试卷顺序录入的全年级表格(学号+语文),要得到班级1的成绩表,只需复制该班级的学号列提交。

用途举例:批量查询功能。原理同上:表1是首列为学号的全年级成绩表格,表2只有想要查询学号列(一行一个)。

其他很多用途。特别是网站技术员/管理员对数据的管理与分析:合并、排序、提取、批量查询。

其他很多用途。会计人员、办公室人力资源管理员也是必备。

更多好易用的小工具软件:

1. 请访问:http://test.96448.cn/



原创粉丝点击