📄 postcodesearch.asp
字号:
<!--#INCLUDE FILE="../HXINCLUDE/HXINCLUDEHEAD.ASP"-->
<%HX_Conn 4:ColumnName="":Tablename="HX_PostCode":action=request("action")%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel=stylesheet type=text/css href="../HXinclude/HX_Style.css">
<script src="../HXinclude/HX_Function.js"></script>
</head>
<body topmargin="20" leftmargin="0" bottommargin="0">
<table width="596" border="0" cellspacing="1" cellpadding="0" align=center bgcolor="#115F8F">
<tr>
<td colspan="2" bgcolor=ffffff><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25" background="../hximages/titleline.gif" class=td4><font class="fontmenu">邮编及区号查询</font> 快速通道：
<a href="postcodesearch.asp?action=search&WS_Province=亚洲"><font color=white>亚 洲</font></a>
<a href="postcodesearch.asp?action=search&WS_Province=欧洲"><font color=white>欧 洲</font></a> <a href="postcodesearch.asp?action=search&WS_Province=美洲"><font color=white>美 洲</font></a>
<a href="postcodesearch.asp?action=search&WS_Province=大洋洲"><font color=white>大洋洲</font></a>
<a href="postcodesearch.asp?action=search&WS_Province=非洲"><font color=white>非 洲</font></a>
<a onclick="javascript:window.print();" style="cursor:hand; "><font color="#FF0000">打 印</font></a> </td>
</tr>
</table><%
if action="search" then
WS_Province=request("WS_Province")
WS_City=request("WS_City")
WS_PostCode=request("WS_PostCode")
WS_TelPhone=request("WS_TelPhone")
Orderby=" where 1=1"
if WS_Province<>"" then
Orderby=Orderby&" and WS_Province like '%"&WS_Province&"%'"
end if
if WS_City<>"" then
Orderby=Orderby&" and WS_City like '%"&WS_City&"%'"
end if
if WS_PostCode<>"" and isnumeric(WS_PostCode) then
Orderby=Orderby&" and WS_PostCode like %"&WS_PostCode&"%"
end if
if WS_TelPhone<>"" and isnumeric(WS_TelPhone) then
Orderby=Orderby&" and WS_TelPhone like %"&WS_TelPhone&"%"
end if
%><table width="100%" border="0" cellpadding="3" cellspacing="1" bgcolor=A1BBE0>
<tr bgcolor="#f1f1f1">
<td width="16%" height=22 align="center"> 省洲名称 </td>
<td width="40%" height=22 align="center"> 地区名称 </td>
<td width="21%" align="center"> 邮政编码 </td>
<td width="23%" align="center"> 电话区号 </td>
</tr>
<%set rs=WS_S.HX_SetRSD(ColumnName,Tablename,Orderby)
if rs.recordcount<=0 then
response.write "<tr><td height=25 colspan=4 bgcolor=ffffff>没有搜索到你要的数据！</td></tr>"
else
ii=0
do until rs.eof%>
<tr <%if ii mod 2=0 then response.write "bgcolor='#FFFFFF'" else response.write "bgcolor='#f1f1f1'"%>>
<td height=22><%=rs("WS_Province")%></td>
<td><%=rs("WS_City")%></td>
<td><%=rs("WS_PostCode")%></td>
<td><%=rs("WS_TelPhone")%></td>
</tr>
<%ii=ii+1
rs.movenext
loop
end if%>
</table>
<br><%
end if%>
<table width="100%" border="0" cellpadding="3" cellspacing="1" bgcolor=A1BBE0>
<form method="post" action="?action=search"><tr bgcolor="#f1f1f1">
<td width="19%" height=22 align="center"> <div align="right">省洲名称： </div></td>
<td width="30%" bgcolor="#FFFFFF"><input name="WS_Province" type="text" size="20" maxlength="10"> </td>
<td width="23%"> <div align="right">邮政编码： </div></td>
<td width="28%" bgcolor="#FFFFFF"><input name="WS_PostCode" type="text" size="10" maxlength="6" style="ime-mode:disabled" onKeyPress="event.returnValue=IsDigit();"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height=22 align="right" bgcolor="#f1f1f1"><div align="right">地区名称：</div></td>
<td height=22><input name="WS_City" type="text" size="20" maxlength="15"></td>
<td bgcolor="#f1f1f1"><div align="right">电话区号： </div></td>
<td><input name="WS_TelPhone" type="text" size="10" maxlength="4" style="ime-mode:disabled" onKeyPress="event.returnValue=IsDigit();"></td>
</tr>
<tr bgcolor="#f1f1f1">
<td height=22 colspan="4" align="right">
<input type="submit" value="查 询" name="B1"> </td>
</tr></form>
</table></td>
</tr>
</table>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -