⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 searquick.asp

📁 来自中国老乡录的一套交友系统
💻 ASP
字号:
🔍 
<%@ Language=VBScript %>
<%
Set Con = Server.CreateObject("ADODB.Connection")
set rs=server.CreateObject("adodb.recordset")       '老乡的信息
set rs1=server.CreateObject("adodb.recordset")      '原籍的ID
set rs2=server.CreateObject("adodb.recordset")      '现籍的ID

Con.Open "laoxiang","lx","mailyard"

city_id=Request.Form("selCity1")           '原籍城市的ID
xcity_id=Request.Form("selCity2")          '现籍城市的ID


sql="select * from Addr where Addr_Type=1 and ID='"&city_id&"'"
set rs1=Con.Execute(sql)
prov_id=rs1("Parent_ID")               '原籍省的ID

sql="select * from Addr where Addr_Type=1 and ID='"&xcity_id&"'"
set rs2=Con.Execute(sql)
xprov_id=rs2("Parent_ID")              '现籍省的ID



sql="select * from customer where user_yg_s='"&prov_id&"'and user_yg_c='"&city_id&"'and user_xg_s='"&xprov_id&"'and user_xg_c='"&xcity_id&"'" 
rs.Open sql,Con,3,3                            '搜索符合条件的老乡



%>
<HTML><HEAD><TITLE>中国老乡录</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<STYLE type=text/css>TD {
	FONT-SIZE: 12px
}
.p1 {
	FONT-SIZE: 12px
}
P {
	FONT-SIZE: 12px; LINE-HEIGHT: 130%
}
DIV {
	FONT-FAMILY: "宋体"; FONT-SIZE: 12px; LINE-HEIGHT: 130%
}
.p2 {
	FONT-SIZE: 12px; LINE-HEIGHT: 130%
}
.p3 {
	FONT-SIZE: 14px
}
.p4 {
	FONT-SIZE: 14px; LINE-HEIGHT: 130%
}
.p5 {
	COLOR: #000000; FONT-FAMILY: "宋体"; FONT-SIZE: 12px
}
.p6 {
	LINE-HEIGHT: 160%
}
.p7 {
	LINE-HEIGHT: 180%
}
.hot {
	COLOR: #ff3300; TEXT-DECORATION: none
}
.title {
	COLOR: #ffffff; TEXT-DECORATION: none
}
A:link {
	COLOR: #000066; TEXT-DECORATION: none
}
A:visited {
	COLOR: #000066; TEXT-DECORATION: none
}
A.lb:link {
	COLOR: #78793C; TEXT-DECORATION: none
}
A.title:link {
	COLOR: white; TEXT-DECORATION: none
}
A.title:hover {
	COLOR: white; TEXT-DECORATION: none
}
A.ln:hover {
	COLOR: #a70404; TEXT-DECORATION: none
}
A.title:visited {
	COLOR: white; TEXT-DECORATION: none
}
A.lb:visited {
	COLOR: #D9CEA6; TEXT-DECORATION: none
}
A:hover {
	COLOR: red; ; TEXT-DECORATION: none
}
A.lb:hover {
	COLOR: #990000; ; TEXT-DECORATION: none
}
.pw {
	COLOR: white; TEXT-DECORATION: none
}
A.lw:link {
	COLOR: white; TEXT-DECORATION: none
}
A.lw:visited {
	COLOR: white; TEXT-DECORATION: none
}
A.ch:link {
	COLOR: #697111; TEXT-DECORATION: none
}
A.ch:visited {
	COLOR: #697111; TEXT-DECORATION: none
}
.intext {
	BORDER-BOTTOM: 1px solid; BORDER-LEFT: 1px solid; BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; FONT-SIZE: 12px
}
TABLE {
	FONT-FAMILY: "宋体"; FONT-SIZE: 12px; TEXT-DECORATION: none
}
.ln {
	FONT-FAMILY: "宋体"; FONT-SIZE: 12px; TEXT-DECORATION: none
}
.searchinput {
	BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM: 1px inset; BORDER-LEFT: 1px inset; BORDER-RIGHT: 1px inset; BORDER-TOP: 1px inset; FONT-SIZE: 9pt; VERTICAL-ALIGN: text-bottom
}
.buttoninput {
	BACKGROUND-COLOR: #cccccc; BORDER-BOTTOM: 1px ridge; BORDER-LEFT: #ffffff 1px ridge; BORDER-RIGHT: 1px ridge; BORDER-TOP: #ffffff 1px ridge; FONT-SIZE: 9pt
}
.searchtable {
	BACKGROUND: #f0f0f0; BORDER-BOTTOM: #000000 1px solid; BORDER-LEFT: #000000 1px solid; BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid
}
</STYLE>
<script language="JavaScript">
<!--
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>

<META content="MSHTML 5.00.2920.0" name=GENERATOR>
</HEAD>
<BODY aLink=#000000 bgColor=#ffffff leftMargin=0 link=#000000 text=#000000 topMargin=0 vLink=#000000 marginwidth="0" marginheight="0" onLoad="MM_preloadImages('../map/laot1-2-1.gif','../map/laot1-3-1.gif','../map/laot1-4-1.gif')">
<table align=center bgcolor=#ffffff border=0 cellpadding=0 cellspacing=0 width=775 height="72">
  <tr> 
    <td align=middle width=381 height="78"> 
      <div align="center"><img src="../map/t5.jpg" width="397" height="72"></div>
    </td>
    <td align=middle width=131 height="78"></td>
    <td align=middle width=263 height="78"><img src="../map/t4.jpg" width="309" height="72"></td>
  </tr>
</table>
<table align=center border=0 cellpadding=0 cellspacing=0 width=775>
  <tr bgcolor="#78793C"> 
    <td align=middle bgcolor=#993300 height=18 width="63"><a href="../default.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image3','','../map/laot1-2-1.gif',1)"><img name="Image3" border="0" src="../map/laot1-2.gif" width="63" height="18"></a></td>
    <td align=middle bgcolor=#993300 height=18 width="98"><a href="search.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image4','','../map/laot1-3-1.gif',1)"><img name="Image4" border="0" src="../map/laot1-3.gif" width="98" height="18"></a></td>
    <td align=middle height=18 bgcolor="#78793C" width="99"><a href="../newluntan/lt-main.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image14','','../map/laot1-4-1.gif',1)"><img name="Image14" border="0" src="../map/laot1-4.gif" width="98" height="18"></a></td>
    <td align=middle height=18 width="259" bgcolor="#78793C">&nbsp;</td>
    <td align=middle height=18 width="127">&nbsp;</td>
    <td align=middle height=18 width="129">&nbsp;</td>
  </tr>
</table>
<table border="0" width="775" height="73" cellpadding="0" cellspacing="0" align="center">
  <tr>
    <td width="156" height="21">&nbsp;</td>
    <td width="120" height="21">&nbsp;</td>
    <td width="46" height="21"></td>
    <td width="222" height="21">&nbsp;</td>
    <td width="231" height="21">&nbsp;</td>
  </tr>
  <tr> 
    <%'原籍省份的名称  '原籍城市的名称%>
    <td width="156" height="21"> 
      <div align="center">搜索的原籍:<%=rs1("Parent_Name")%></div>
      </td>
    <td width="120" height="21"><%=rs1("Addr_Name")%></td>
    <td width="46" height="21"></td>
    <td width="222" height="21">共<%=rs.RecordCount%>条记录</td>
    <td width="231" height="21"> 
      <div align="center">老乡派对</div>
    </td>
  </tr>
  <tr> 
    <%'现籍省份的名称  '现籍城市的名称%>
    <td width="156" height="21"> 
      <div align="center">搜索的现籍:<%=rs2("Parent_Name")%></div>
    </td>
    <td width="120" height="21"><%=rs2("Addr_Name")%></td>
    <td width="46" height="21"></td>
    <td width="222" height="21"></td>
    <td width="231" height="21">&nbsp;</td>
  </tr>
  <tr> 
    <td width="156" height="21"></td>
    <td width="120" height="21">&nbsp;</td>
    <td width="46" height="21"></td>
    <td width="222" height="21"></td>
    <td width="231" height="21"></td>
  </tr>
</table>
<table border="0" width="750" height="50" cellpadding="0" cellspacing="1" align="center">
  <tr bgcolor="#DEDEA7"> 
    <td width="14%" height="16"> 
      <div align="center"><b>用户名</b></div>
    </td>
    <td width="7%" height="16"> 
      <div align="center"><b>性别</b></div>
    </td>
    <td width="15%" height="16"> 
      <div align="center"><b>出生日期</b></div>
    </td>
    <td width="23%" height="16"> 
      <div align="center"><b>电子信箱</b></div>
    </td>
    <td width="17%" height="16"> 
      <div align="center"><b>职业</b></div>
    </td>
    <td width="15%" height="16"> 
      <div align="center"><b>加入时间</b></div>
    </td>
    <td width="9%" height="16"> 
      <div align="center"><b>在线</b></div>
    </td>
  </tr>
  <tr bgcolor="#F1F1DC"> 
    <td colspan="7" height="6"></td>
  </tr>
  <%while not rs.EOF
    %>
  <tr bgcolor="#E4E4B8"> 
    <td width="14%" height="14"> 
      <div align="center"><font color="#373715"><%=rs("user_id")%></font></div>
    </td>
    <td width="7%" height="14"> 
      <div align="center"><font color="#373715"><%=rs("user_sex")%></font></div>
    </td>
    <td width="15%" height="14"> 
      <div align="center"><font color="#373715"><%=rs("user_age")%></font></div>
    </td>
    <td width="23%" height="14"> 
      <div align="center"><font color="#373715"><%=rs("user_email")%></font></div>
    </td>
    <td width="17%" height="14"> 
      <div align="center"><font color="#373715"><%=rs("user_zy")%></font></div>
    </td>
    <td width="15%" height="14"> 
      <div align="center"><font color="#373715"><%=year(rs("user_first_time"))&"-"&month(rs("user_first_time"))&"-"&day(rs("user_first_time"))%></font></div>
    </td>
    <td width="9%" height="14">
      <div align="center"><font color="#373715"><%=rs("user_zx")%></font></div>
    </td>
  </tr>
  <tr bgcolor="#F1F1DC"> 
    <td colspan="7" height="6"></td>
  </tr>
  <%
  rs.MoveNext
  wend
  %>
</table>


<table width="775" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td colspan="3">&nbsp;</td>
  </tr>
  <tr> 
    <td colspan="3">&nbsp;</td>
  </tr>
  <tr> 
    <td colspan="3">&nbsp;</td>
  </tr>
  <tr> 
    <td colspan="3">&nbsp;</td>
  </tr>
  <tr> 
    <td colspan="3"> 
      <hr size="1">
    </td>
  </tr>
  <tr> 
    <td width="150">&nbsp;</td>
    <td width="473"> 
      <div align="center">中国老乡网版权所有<br>
        Copyright @ 2000 - 2001 laoxiang.com.cn. All Rights Reserved</div>
    </td>
    <td width="152">&nbsp;</td>
  </tr>
</table>
</BODY>
</HTML>
<%
Con.Close
set Con=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -