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

📄 party_index.asp

📁 广东交友源程序
💻 ASP
📖 第 1 页 / 共 2 页
字号:
🔍
12 
<%@ Language=VBScript %>
<html>
<head>
<title>广东交友热线 - 网友聚会</title>
<link rel="stylesheet" href="../../images/css.css" type="text/css">
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
</head>
<body leftmargin="0" marginwidth="0" topmargin="0" marginheight="0">
<SCRIPT LANGUAGE=javascript>
//<!--
	function sss(URL)
	{
		newwin=window.open('','_blank','fullscreen=0,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0');
		if(document.all){
		newwin.moveTo(200,40 )
		newwin.resizeTo(400,400 );
		}
		newwin.location=URL
		newwin.focus();
	}

	
//-->
</SCRIPT>
<object runat="server" id="conn1" progid="adodb.connection">
</object> 
<%application.Lock
conn1.Open Application("p_jyzx")
Application.UnLock
%>
<%
	if Application("mytoday")="" or  Application("mytoday")<>date  then
	'if Application("mytoday")=date  then
	set rs_1=server.CreateObject ("ADODB.recordset")
   rs_1.Supports (adUpdate)
     sql="select * from party where is_history=0"
     rs_1.Open sql,conn1,2,3
	while not rs_1.EOF
		 if rs_1("end_date")<date then
		 
		 rs_1("is_history")=1
		  end_date=rs_1("end_date")
		  
		  end if
		  rs_1.MoveNext
		  
	wend
	
	Application("mytoday")=date
	end if
	
    
	
%>
<!--#include file="top.asp" -->
<%set rs1=server.CreateObject ("ADODB.recordset")
  
     sql="select * from party where weight=1 and is_history=0"
     rs1.Open sql,conn1,3
     if rs1.RecordCount<>0 then
		sys_party_name=rs1("party_name")
		sys_party_content=rs1("party_content")
		sys_id=rs1("id")
     end if
     
     %>
<% if rs1.RecordCount<>0 then %>
<table id="Table_01" width="779" height="902" border="0" cellpadding="0" cellspacing="0" align="center">
  <tr> 
    <td rowspan="5"> <img src="../../image/love_image/images/WANGYOUJUHUI_01.gif" width="177" height="148" alt=""></td>
    <td colspan="12"> <img src="../../image/love_image/images/WANGYOUJUHUI_02.gif" width="601" height="4" alt=""></td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="4" alt=""></td>
  </tr>
  <tr> 
    <td colspan="2"> <img src="../../image/love_image/images/WANGYOUJUHUI_03.gif" width="18" height="27" alt=""></td>
    <td> <img src="../../image/love_image/images/WANGYOUJUHUI_04.gif" width="24" height="27" alt=""></td>
    <td> <img src="../../image/love_image/images/WANGYOUJUHUI_05.gif" width="58" height="27" alt=""></td>
    <td colspan="6"> <img src="../../image/love_image/images/WANGYOUJUHUI_06.gif" width="489" height="27" alt=""></td>
    <td colspan="2"> <img src="../../image/love_image/images/WANGYOUJUHUI_07.gif" width="12" height="27" alt=""></td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="27" alt=""></td>
  </tr>
  <tr> 
    <td colspan="12"> <img src="../../image/love_image/images/WANGYOUJUHUI_08.gif" width="601" height="11" alt=""></td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="11" alt=""></td>
  </tr>
  <tr> 
    <td colspan="5"> <img src="../../image/love_image/images/WANGYOUJUHUI_09.gif" width="186" height="46" alt=""></td>
    <td> <img src="../../image/love_image/images/WANGYOUJUHUI_10.gif" width="36" height="46" alt=""></td>
    <td> <img src="../../image/love_image/images/WANGYOUJUHUI_11.gif" width="67" height="46" alt=""></td>
    <td colspan="2"> <img src="../../image/love_image/images/WANGYOUJUHUI_12.gif" width="159" height="46" alt=""></td>
    <td colspan="3"> <img src="../../image/love_image/images/WANGYOUJUHUI_13.gif" width="153" height="46" alt=""></td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="46" alt=""></td>
  </tr>
  <tr> 
    <td colspan="12"> <img src="../../image/love_image/images/WANGYOUJUHUI_14.gif" width="601" height="60" alt=""></td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="60" alt=""></td>
  </tr>
  <tr> 
    <td rowspan="3"> <a href="history_party.asp?zone_id=0&move=1"><img src="../../image/love_image/images/WANGYOUJUHUI_15.gif" width="177" height="78" alt="" border="0"></a></td>
    <td colspan="9"> <img src="../../image/love_image/images/WANGYOUJUHUI_16.gif" width="448" height="39" alt=""></td>
    <td colspan="3"> <img src="../../image/love_image/images/WANGYOUJUHUI_17.gif" width="153" height="39" alt=""></td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="39" alt=""></td>
  </tr>
  <tr> 
    <td> <img src="../../image/love_image/images/WANGYOUJUHUI_18.gif" width="1" height="3" alt=""></td>
    <td colspan="7" rowspan="4" background="../../image/love_image/images/WANGYOUJUHUI_19.gif" height="184" valign="top"> 
      <table cellspacing="3" cellpadding="4" width="98%" border="0" style="border-collapse: collapse" bordercolor="#111111" align="center">
        <tbody> 
        <tr> 
          <td height="29" width="513"> 
            <div align="center"><b><font color="#ff9933" size="3"><%=sys_party_name%></font></b></div>
          </td>
        </tr>
        <tr> 
          <td><a href="party_2.asp?id=<%=sys_id%>" target="_blank"><%=sys_party_content%></a> 
          </td>
        </tr>
        </tbody> 
      </table>
    </td>
    <td colspan="3" rowspan="4" background="../../image/love_image/images/WANGYOUJUHUI_20.gif" height="184" valign="top"> 
      <table width="99%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td> 
            <%set rs=server.CreateObject ("ADODB.recordset")
    
   sql="select * from public_note  where object=1 order by time desc"
   rs.Open sql,conn1,3
  if rs.RecordCount<>0 then
	
	public_note=rs("public_note")
	
	
  end if
 %>
            <table cellspacing=0 cellpadding=0 width="93%" border=0 align="center">
              <tbody> 
              <tr class=my_party2> 
                <td class="akj"><font color="#000000">使用本栏目前，请仔细阅读以下文字：<br>
                  　　1、所有聚会活动皆由网友自发组织、举办，本站只提供此联络媒介，不参与聚会的其它任何事宜；<br>
                  　　2、对于聚会可能引起的任何问题，本站不作任何承诺；<br>
                  　　3、网友自愿参加聚会，因聚会所产生的任何直接、间接或偶然性的损失，本站不承担任何责任。</font></td>
              </tr>
              </tbody> 
            </table>
          </td>
        </tr>
      </table>
    </td>
    <td> <img src="../../image/love_image/images/WANGYOUJUHUI_21.gif" width="9" height="3" alt=""></td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="3" alt=""></td>
  </tr>
  <tr> 
    <td> <img src="../../image/love_image/images/WANGYOUJUHUI_22.gif" width="1" height="36" alt=""></td>
    <td> <img src="../../image/love_image/images/WANGYOUJUHUI_23.gif" width="9" height="36" alt=""></td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="36" alt=""></td>
  </tr>
  <tr> 
    <td> <a href="party_add_party.asp"><img src="../../image/love_image/images/WANGYOUJUHUI_24.gif" width="177" height="64" alt="" border="0"></a></td>
    <td rowspan="5"> <img src="../../image/love_image/images/WANGYOUJUHUI_25.gif" width="1" height="369" alt=""></td>
    <td rowspan="2"> <img src="../../image/love_image/images/WANGYOUJUHUI_26.gif" width="9" height="145" alt=""></td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="64" alt=""></td>
  </tr>
  <tr> 
    <td rowspan="4" background="../../image/love_image/images/WANGYOUJUHUI_27.gif" width="177" height="305">
      <table cellspacing=0 cellpadding=0 width="90%" border=0 align="center" height="290">
        <tbody > 
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp" onMouseOver="showTooltip('dHTMLToolTip',event, '最近的20个聚会', '#ffff99','#000000','#000000','10000')">所有地区</a> 
          </td>
        </tr>
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp?zone_id=1" onMouseOver="showTooltip('dHTMLToolTip',event, '（北京、上海、天津、重庆）', '#ffff99','#000000','#000000','10000')">直辖市</a> 
          </td>
        </tr>
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp?zone_id=2" onMouseOver="showTooltip('dHTMLToolTip',event, '（黑龙江省、吉林省、辽宁省）', '#ffff99','#000000','#000000','10000')">东北地区</a> 
          </td>
        </tr>
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp?zone_id=3" onMouseOver="showTooltip('dHTMLToolTip',event, '（河北省、内蒙古、山西省）', '#ffff99','#000000','#000000','10000')">华北地区</a> 
          </td>
        </tr>
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp?zone_id=4" onMouseOver="showTooltip('dHTMLToolTip',event, '（青海省、陕西省、甘肃省、新疆、宁夏）', '#ffff99','#000000','#000000','10000')">西北地区</a> 
          </td>
        </tr>
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp?zone_id=5" onMouseOver="showTooltip('dHTMLToolTip',event, '（浙江省、山东省、江苏省、安徽省、江西省、福建省）', '#ffff99','#000000','#000000','10000')">华东地区</a> 
          </td>
        </tr>
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp?zone_id=6" onMouseOver="showTooltip('dHTMLToolTip',event, '（河南省、湖北省、湖南省）', '#ffff99','#000000','#000000','10000')">华中地区</a> 
          </td>
        </tr>
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp?zone_id=7" onMouseOver="showTooltip('dHTMLToolTip',event, '（广东省、海南省、广西）', '#ffff99','#000000','#000000','10000')">华南地区</a> 
          </td>
        </tr>
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp?zone_id=8" onMouseOver="showTooltip('dHTMLToolTip',event, '（贵州省、四川省、云南省、西藏）', '#ffff99','#000000','#000000','10000')">西南地区</a> 
          </td>
        </tr>
        <tr align=middle> 
          <td class=c1 height=28><a class=a_party
            href="party_index.asp?zone_id=9" onMouseOver="showTooltip('dHTMLToolTip',event, '（台湾省、香港、澳门、美国、加拿大、澳大利亚、欧洲、其它国家）', '#ffff99','#000000','#000000','10000')">其它地区</a> 
          </td>
        </tr>
        <!--  <TR align=middle>
          <TD class=c1 height=30><A 
            href="http://www.loveproxy.com/inves/vote.asp?topic_id=6"><FONT 
            color=#5286ef><IMG height=20 src="images/klatch_t_jhdc.gif" 
            width=91 border=0></FONT></A></TD></TR>
        <TR align=middle>
          <TD class=c1 height=30><A 
            href="http://www.loveproxy.com/inves/makeup.asp?topic_id=6"><IMG 
            height=20 src="images/klatch_t_wytjh.gif" width=91 
            border=0></A></TD></TR>
        <TR align=middle>
          <TD class=c1 height=30><A href="http://202.105.191.13:45563/Login" 
            target=_blank><IMG height=20 src="images/klatch_t_jhlts.gif" 
            width=91 border=0></A></TD></TR>-->
        </tbody> 
      </table>
    </td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="81" alt=""></td>
  </tr>
  <tr> 
    <td colspan="11" background="../../image/love_image/images/WANGYOUJUHUI_28.gif" height="33"> 
      <table width="99%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="7%">　</td>
          <td width="93%">网友自发聚会</td>
        </tr>
      </table>
    </td>
    <td> <img src="../../image/love_image/images/spacer.gif" width="1" height="33" alt=""></td>
  </tr>
  <tr> 
    <td colspan="11" background="../../image/love_image/images/WANGYOUJUHUI_29.gif" height="42"> 
      <table width="99%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="7%">　</td>
          <td width="93%"> 
            <%zone_id=Request("zone_id")
		sql="select top 20 * from party  where  weight=0 and is_history=0 "
	   
	       if zone_id=1 then
				sql=sql&" and province in('北京','上海','天津','重庆')"
				zone="直辖市（北京、上海、天津、重庆）"
			elseif zone_id=2 then
				sql=sql&" and province in('黑龙江省','吉林省','辽宁省')"
				zone="东北地区（黑龙江省、吉林省、辽宁省）"
			elseif zone_id=3 then
				sql=sql&" and province in('河北省','内蒙古','山西省')"
				zone="华北地区（河北省、内蒙古、山西省）"
			elseif zone_id=4 then
12

⌨️ 快捷键说明

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