<!--#INCLUDE FILE="../HXINCLUDE/HXINCLUDEHEAD.ASP"-->
<%HX_Conn 4:ColumnName="":Tablename="HX_Mobile"%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel=stylesheet type=text/css href="../HXinclude/HX_Style.css">
</head>
<body topmargin="20" leftmargin="0" bottommargin="0">
<table width="596"  border="0" cellspacing="1" cellpadding="0" align=center bgcolor="#613c25">
  <tr>
    <td colspan="2" bgcolor=FFFBE8><table width="100%"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="25" background="../hximages/titleline.gif"><font class="fontmenu">手机查询</font></td>
  </tr>
</table><%
if request.form("searchsj")="search" then
  d=request.form("num1")
 if len(d)>=7 then
  c=left(d,7)
 set rs=WS_S.HX_SetRSD(ColumnName,Tablename," where start<="&c&" and mid(start,3,1)="&mid(c,3,1)&" and  mid(start,4,1)="&mid(c,4,1)&" and mid(start,5,1)="&mid(c,5,1)&" and mid(start,6,1)="&mid(c,6,1)&"")
 if rs.recordcount>0 then
    a=rs("city")
    b=rs("city1")
    e=rs("url")
    call WS_S.HX_RSClose(rs)
 else
  set rs=WS_S.HX_SetRSD(ColumnName,Tablename," where start<="&c&" and end>="&c&" and mid(start,3,1)="&mid(c,3,1)&" and  mid(end,3,1)="&mid(c,3,1)&" and mid(start,4,1)="&mid(c,4,1)&" and  mid(end,4,1)="&mid(c,4,1)&" and mid(start,5,1)="&mid(c,5,1)&" and  mid(end,5,1)="&mid(c,5,1))
 if rs.recordcount>0 then
 a=rs("city")
 b=rs("city1")
  e=rs("url")
  call WS_S.HX_RSClose(rs)
else
 set rs=WS_S.HX_SetRSD(ColumnName,Tablename," where  start<="&c&" and end>="&c&" and mid(start,3,1)="&mid(c,3,1)&" and  mid(end,3,1)="&mid(c,3,1)&" and mid(start,4,1)="&mid(c,4,1)&" and  mid(end,4,1)="&mid(c,4,1))
 if rs.recordcount>0 then
 a=rs("city")
 b=rs("city1") 
 e=rs("url")
  call WS_S.HX_RSClose(rs)
  else
 set rs=WS_S.HX_SetRSD(ColumnName,Tablename," where start<="&c&" and end>="&c&" and mid(start,3,1)="&mid(c,3,1)&" and  mid(end,3,1)="&mid(c,3,1))
 if rs.recordcount>0 then
  a=rs("city")
  b=rs("city1")
  e=rs("url")
  call WS_S.HX_RSClose(rs)
  else
 set rs=WS_S.HX_SetRSD(ColumnName,Tablename," where start<="&c&" and end>="&c)
 if rs.recordcount>0 then
 a=rs("city")
 b=rs("city1")
 e=rs("url")
  call WS_S.HX_RSClose(rs)
else
a="找不到地址，如果你知道，请与本站联系，谢谢！"
end if
end if
  end if  
  end if
  end if
  else
  a="错误:请确保你输入的是大于7位的数字！"
  end if  
   %>    <table width="100%"  border="0" cellpadding="3" cellspacing="1" bgcolor=BF9B73>
    <tr>
      <td colspan="2" align="center" background="b1.gif" height="22"1>搜 索 结果</td>
    </tr>
    <tr bgcolor="#FFFBE8">
      <td width="36%" align="right" height="22">你要搜索的手机号码：</td>
      <td width="64%" align="left" height="22"><%=d%></td>
    </tr>
    <tr bgcolor="#FFFBE8">
      <td width="36%" align="right" height=22>所在地址：</td>
      <td width="64%" align="left" height=22><%=a%> <%=b%> </td>
    </tr>
    <tr bgcolor="#FFFBE8">
      <td width="36%" align="right" height=22>区号和描述：</td>
      <td width="64%" align="left" height=22><%=e%></td>
    </tr>
  </table><br><%
 end if%>
<table width="100%"  border="0" cellpadding="3" cellspacing="1" bgcolor=BF9B73>
   <tr>
         <td align="center" height="22" colspan="2">
      搜索手机号码对应的地理位置</td>
    </tr>
    <tr bgcolor="#FFFBE8">
      <td width="37%" align="right" height=22>请输入要搜索的号码：</td>
      <form method="post" action="">   
    <td width="63%" height=22>
    <input type="text" name="num1" size="30" style="ime-mode:disabled"> 
    <input type="hidden" name="searchsj" size="20" value="search">
    <input type="submit" value="查 询" name="B1"> </td> </form></tr> 
</table></td>
  </tr>
</table>

