<% shouji=trim(request("shouji")) if shouji<>"" then if isshouji(shouji) then mier_shouji=left(shouji,7) rs.open " select * from shouji where num='"& mier_shouji &"'" ,conn,1,1 if rs.bof or rs.eof then mess="没有此用号码信息!" shouji="" else mier_dq=rs("area") mier_lx=rs("t") end if rs.close else mess="请正确输入手机号!" shouji="" end if end if function isshouji(shouji) isshouji=true if len(shouji)>11 or len(shouji)<7 then isshouji=false else n=len(shouji) for i=1 to n if instr("0123456789",cstr(mid(cstr(shouji),i,1)))<1 then isshouji=false end if next if instr(shouji,"13")<>1 then isshouji=false end if end if end function %>
当前位置 >> 千年阳光健康生活网 >> 健康生活实用查询 >> 手机位置查询
   手机号码位置查询  
 
 
请输入手机号码:
 
<%=mess%>
 
 手机号码查询结果
  查询号码: <%=shouji%>   
  卡号归属地: <%=mier_dq%>   
  卡类型: <%=mier_lx%>