<% key=trim(request("key")) sm=trim(request("sm")) %> 邮编、区号查询
网站首页 | 综合资讯 | 电脑教程 | 成功人生 | 美丽服饰 | 流行时尚 | 汽车频道 | 游戏专区
生活点滴 | I T 资讯 | 软件前沿 | 自我测试 | 体育赛事 | 免费资源 | Q Q 技巧 | 保健养生
华夏旅游
| 创业指南 | 天天美食 | 常用软件 | 生财之道 | 查询大全 | 超级搜索 | 繁體中文
汉字转换拼音 | 关键字密度查询 | 在线拼音输入 | 在线五笔输入 | 弹出窗口生成器 | 网页颜色配色
HTML/JS代码互转 | ESCAPE加密/解密 | GB2312/BIG5互转 | JS/VB加密 | 字符/ASCII码转换 | 字符串MD5加密
EnCode加密/解密 | 常用电话号码列表 | 各地邮编区号查询 | 妇女生理安全期 | 省市简称及省会 | 行业地区代码表
多功能转贴工具 | 字体简繁转化 | 机票航班查询 | 世界万年历查询 | 少数民族分布表 | 各地车牌查询表
..:::世界各地邮编、区号查询:::..
关键字: 输入一个省名、地区名、邮编、区号或其拼音首字母或其中一部分
 
 
 
<% if sm<>"" then connstr="DBQ="+server.mappath("post.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" set conn=server.createobject("ADODB.CONNECTION") conn.open connstr set rst=server.createobject("adodb.recordset") rst.open "select * from ybqh where sm='"&sm&"'",conn,1,1 do while (not rst.eof) %> <% rst.movenext loop rst.close conn.close end if %>
省洲名称
地区名称
邮政编码
电话区号
<%=rst("sm")%>
<%=rst("dq")%>
<% tmp=rst("yb") if tmp="" then tmp="★★★" response.write tmp %>
<%=rst("qh") %>

Copyright ©2006-2009 hhee88.com All Rights Reserved.
湖南第一网 2006-2009 版权所有 
湖南第一网实用工具