<%@ 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">
<p align="center"><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" --><table cellSpacing="0" cellPadding="0" width="623" align="center" border="0">
  
 <tr>
    <td height="30" align="left" width="119">&nbsp;&nbsp;<a href="../../default.asp">首页</a> -&gt;网友聚会 </td> 
    <td align="center" width="503">   <a href="party_add_party.asp"><font color="red">聚会申请</font></a><font  color=red>
    &nbsp;&nbsp;&nbsp;</font><a href="history_party.asp"><font color="red">聚会历史纪录</font></a></td> 
    </tr>
 </table> 
<%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 cellSpacing="0" cellPadding="0" width="770" align="center" border="0">
  <tbody>
  <tr>
    <td>
      <div align="center"><img height="27" src="images/klatch_t_zxjh.gif" width="738"></div></td></tr>
  <tr>
    <td>
      <table cellSpacing="0" cellPadding="0" width="100%" border="0">
        <tbody>
        <tr>
          <td vAlign="top" width="70%">
            <div align="right">
            <table cellSpacing="0" cellPadding="0" width="90%" align="center" border="0">
              <tbody>
              <tr>
                <td height="35">
                  <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></div></td>
          <td width="30%">
            
   <%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="218" border="0">
              <tbody>
              <tr>
                <td><img height="23" src="images/klatch_board_top.gif" width="218"></td></tr>
              <tr>
                <td background="images/klatch_board_mid.gif">
                  <table cellSpacing="0" cellPadding="0" width="90%" align="center" border="0">
                    <tbody>
                    <tr>
                      <td><%=public_note%></td></tr>
                    <tr>
                      <td vAlign="top" height="150">
                        <br><br></td></tr></tbody></table></td></tr>
              <tr background="../images/klatch_board_mid.gif">
                <td><img height="12" src="images/klatch_board_bot.gif" width="218">
                </td></tr>
                </tbody></table>
             </td></tr></tbody></table>
             </td></tr></tbody></table>

<%end if%>


<%
 dim party_num(39)
 for i=1 to 39
	party_num(i)=0
 next

	set rs=server.CreateObject ("ADODB.recordset")
	sql="select province,count(id) from party where  weight=0 and is_history=0 group by province"
	rs.Open sql,conn1,3
	if rs.RecordCount<>0 then
	
	while not rs.EOF
		if rs("province")="北京市" then
			party_num(1)=rs("expr1001")
		
		elseif rs("province")="上海市" then
			party_num(2)=rs("expr1001")
		
		elseif rs("province")="天津市" then
			party_num(3)=rs("expr1001")
		
		elseif rs("province")="重庆市" then
			party_num(4)=rs("expr1001")
		
		elseif rs("province")="浙江省" then
			party_num(5)=rs("expr1001")
		
		elseif rs("province")="河北省" then
			party_num(6)=rs("expr1001")
		
		elseif rs("province")="河南省" then
			party_num(7)=rs("expr1001")
		
		elseif rs("province")="黑龙江省" then
			party_num(8)=rs("expr1001")
		
		elseif rs("province")="吉林省" then
			party_num(9)=rs("expr1001")
		
		elseif rs("province")="辽宁省" then
			party_num(10)=rs("expr1001")
		
		elseif rs("province")="山东省" then
			party_num(11)=rs("expr1001")
		
		elseif rs("province")="内蒙古" then
			party_num(12)=rs("expr1001")
		
		elseif rs("province")="江苏省" then
			party_num(13)=rs("expr1001")
		
		elseif rs("province")="安徽省" then
			party_num(14)=rs("expr1001")
		
		elseif rs("province")="山西省" then
			party_num(15)=rs("expr1001")
		
		elseif rs("province")="陕西省" then
			party_num(16)=rs("expr1001")
		
		elseif rs("province")="甘肃省" then
			party_num(17)=rs("expr1001")
		
		elseif rs("province")="江西省" then
			party_num(18)=rs("expr1001")
		
		elseif rs("province")="湖北省" then
			party_num(19)=rs("expr1001")
		
		elseif rs("province")="湖南省" then
			party_num(20)=rs("expr1001")
		
		elseif rs("province")="贵州省" then
			party_num(21)=rs("expr1001")
		
		elseif rs("province")="四川省" then
			party_num(22)=rs("expr1001")
		
		elseif rs("province")="云南省" then
			party_num(23)=rs("expr1001")
		
		elseif rs("province")="新疆" then
			party_num(24)=rs("expr1001")
		
		elseif rs("province")="宁夏" then
			party_num(25)=rs("expr1001")
		
		elseif rs("province")="青海省" then
			party_num(26)=rs("expr1001")
		
		elseif rs("province")="西藏" then
			party_num(27)=rs("expr1001")
		
		elseif rs("province")="广西" then
			party_num(28)=rs("expr1001")
		
		elseif rs("province")="广东省" then
			party_num(29)=rs("expr1001")
		
		elseif rs("province")="福建省" then
			party_num(30)=rs("expr1001")
		
		elseif rs("province")="海南省" then
			party_num(31)=rs("expr1001")
		
		elseif rs("province")="台湾省" then
			party_num(32)=rs("expr1001")
		
		elseif rs("province")="香港" then
			party_num(33)=rs("expr1001")
		
		elseif rs("province")="澳门" then
			party_num(34)=rs("expr1001")
		
		elseif rs("province")="美国" then
			party_num(35)=rs("expr1001")
		
		elseif rs("province")="加拿大" then
			party_num(36)=rs("expr1001")
		
		elseif rs("province")="澳大利亚" then
			party_num(37)=rs("expr1001")
		
		elseif rs("province")="欧洲" then
			party_num(38)=rs("expr1001")
		
		elseif rs("province")="其它国家" then
			party_num(39)=rs("expr1001")
		end if
		
		
		
	
		
	rs.MoveNext
   
    wend
	end if


%>
<table cellSpacing="0" cellPadding="0" width="770" align="center" border="0">
  <tbody>
  <tr>
    <td height="50">
      <div align="center"><img height="27" src="images/klatch_t_zfjh.gif" width="738"></div></td></tr>
  <tr>
    <td>
      <table cellSpacing="0" cellPadding="0" width="95%" align="center" border="0">
        <tbody>
        <tr>
          <td vAlign="top">
            <table cellSpacing="1" cellPadding="0" width="95%" align="center" bgColor="#cccccc" border="0"><!--                    <tr bgcolor="#ffffff">                      <td width="50%" height="23">                      <font color="#ff0000">湛江市</font>                      最新聚会2个                      <a href="Klatch4List.asp?Province=湛江市">&gt;&gt;查看详细</a>                      </td>                      <td width="50%" height="23">                      <font color="#ff0000">广东省</font>                      最新聚会2个                      <a href="Klatch4List.asp?Province=广东省">&gt;&gt;查看详细</a>                      </td>                    </tr>                    <tr bgcolor="#ffffff">                      <td width="50%" height="23">                      <font color="#ff0000">广州市</font>                      最新聚会1个                      <a href="Klatch4List.asp?Province=广州市">&gt;&gt;查看详细</a>                      </td>                      <td width="50%" height="23">                      <font color="#ff0000">江苏省</font>                      最新聚会1个                      <a href="Klatch4List.asp?Province=江苏省">&gt;&gt;查看详细</a>                      </td>                    </tr>                    <tr bgcolor="#ffffff">                      <td width="50%" height="23">                      <font color="#ff0000">山东省</font>                      最新聚会1个                      <a href="Klatch4List.asp?Province=山东省">&gt;&gt;查看详细</a>                      </td>                      <td width="50%" height="23">                      <font color="#ff0000">四川省</font>                      最新聚会1个                      <a href="Klatch4List.asp?Province=四川省">&gt;&gt;查看详细</a>                      </td>                    </tr>-->
              <tbody>
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">广州市</font>　　最新聚会<%=party_num(1)%>个　　<a href="party_1.asp?Province=广州市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　</font><font color="#FF0000">揭阳市</font>　　最新聚会<%=party_num(2)%>个　　<a href="party_1.asp?Province=揭阳市">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">深圳市</font>　　最新聚会<%=party_num(3)%>个　　<a href="party_1.asp?Province=深圳市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　</font><font color="#FF0000">云浮市</font>　　最新聚会<%=party_num(4)%>个　　<a href="party_1.asp?Province=云浮市">&gt;&gt;查看详细</a></td></tr>
              
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">珠海市</font>　　最新聚会<%=party_num(5)%>个　　<a href="party_1.asp?Province=珠海市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　河北省</font>　　最新聚会<%=party_num(6)%>个　　<a href="party_1.asp?Province=河北省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">汕头市</font>　　最新聚会<%=party_num(7)%>个　　<a href="party_1.asp?Province=汕头市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　黑龙江省</font>　最新聚会<%=party_num(8)%>个　　<a href="party_1.asp?Province=黑龙江省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">韶关市</font>　　最新聚会<%=party_num(9)%>个　　<a href="party_1.asp?Province=韶关市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　辽宁省</font>　　最新聚会<%=party_num(10)%>个　　<a href="party_1.asp?Province=辽宁省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">河源市</font>　　最新聚会<%=party_num(11)%>个　　<a href="party_1.asp?Province=河源市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　内蒙古</font>　　最新聚会<%=party_num(12)%>个　　<a href="party_1.asp?Province=内蒙古">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">梅州市</font>　　最新聚会<%=party_num(13)%>个　　<a href="party_1.asp?Province=梅州市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　安徽省</font>　　最新聚会<%=party_num(14)%>个　　<a href="party_1.asp?Province=安徽省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">惠州市</font>　　最新聚会<%=party_num(15)%>个　　<a href="party_1.asp?Province=惠州市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　陕西省</font>　　最新聚会<%=party_num(16)%>个　　<a href="party_1.asp?Province=陕西省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">汕尾市</font>　　最新聚会<%=party_num(17)%>个　　<a href="party_1.asp?Province=汕尾市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　江西省</font>　　最新聚会<%=party_num(18)%>个　　<a href="party_1.asp?Province=江西省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">东莞市</font>　　最新聚会<%=party_num(19)%>个　　<a href="party_1.asp?Province=东莞市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　湖南省</font>　　最新聚会<%=party_num(20)%>个　　<a href="party_1.asp?Province=湖南省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">中山市</font>　　最新聚会<%=party_num(21)%>个　　<a href="party_1.asp?Province=中山市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　四川省</font>　　最新聚会<%=party_num(22)%>个　　<a href="party_1.asp?Province=四川省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">江门市</font>　　最新聚会<%=party_num(23)%>个　　<a href="party_1.asp?Province=江门市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　新疆 </font>　　最新聚会<%=party_num(24)%>个　　<a href="party_1.asp?Province=新疆">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">佛山市</font>　　最新聚会<%=party_num(25)%>个　　<a href="party_1.asp?Province=佛山市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　青海省</font>　　最新聚会<%=party_num(26)%>个　　<a href="party_1.asp?Province=青海省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">南海市</font>　　最新聚会<%=party_num(27)%>个　　<a href="party_1.asp?Province=南海市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　广西 </font>　　最新聚会<%=party_num(28)%>个　　<a href="party_1.asp?Province=广西">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">顺德市</font>　　最新聚会<%=party_num(29)%>个　　<a href="party_1.asp?Province=顺德市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　福建省</font>　　最新聚会<%=party_num(30)%>个　　<a href="party_1.asp?Province=福建省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">阳江市</font>　　最新聚会<%=party_num(31)%>个　　<a href="party_1.asp?Province=阳江市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　台湾省</font>　　最新聚会<%=party_num(32)%>个　　<a href="party_1.asp?Province=台湾省">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">湛江市&nbsp; 
                </font>　最新聚会<%=party_num(33)%>个　　<a href="party_1.asp?Province=香港">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　澳门 </font>　　最新聚会<%=party_num(34)%>个　　<a href="party_1.asp?Province=澳门">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">茂名市</font>　　最新聚会<%=party_num(35)%>个　　<a href="party_1.asp?Province=茂名市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　加拿大</font>　　最新聚会<%=party_num(36)%>个　　<a href="party_1.asp?Province=加拿大">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#fffff7">
                <td height="23"><font  color=red>　</font><font color="#FF0000">肇庆市</font>　　最新聚会<%=party_num(37)%>个　　<a href="party_1.asp?Province=肇庆市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　欧洲</font>　　最新聚会<%=party_num(38)%>个　　<a href="party_1.asp?Province=">&gt;&gt;查看详细</a></td></tr>
              <tr bgColor="#ffffff">
                <td height="23"><font  color=red>　</font><font color="#FF0000">清远市</font>　　最新聚会<%=party_num(39)%>个　　<a href="party_1.asp?Province=清远市">&gt;&gt;查看详细</a></td>
                <td height="23"><font  color=red>　</font>　　最新聚会0个　　<a href="party_1.asp?Province=">&gt;&gt;查看详细</a></td></tr>
            
              </tbody></table></td>
          <td width="30%" bgColor="#f5f5f5">
            <table cellSpacing="0" cellPadding="0" width="90%" align="center" border="0">
              <tbody>
              <tr>
                <td height="25">
                  <div align="center"><b><font color="red">交友中心声明</font></b></div></td></tr>
              <tr>
                <td>
                  <p>1、广东交友热线会员发起聚会免费，聚会发起人只限发起30天之内的聚会，不能跨越30天发起聚会。<br></p>
                  <p>2、此免费发起聚会平台只限于非商业性聚会，凡商业性聚会可与本中心直接联络。<br></p>
                  <p>3、首页推介广告费：在首页聚会栏目推介，文字链接15字以内，收费50元/周。<br></p>
                  <p>4、飘动广告：如需进一步推介，可以选择首页飘动广告，600元/周。<br><br>　　广东交友热线网聚发起人必须对非常网聚负责，保证聚会质量，不得有任何欺骗行为。对于非本站发起的聚会，可能引起的问题，本站不承担任何责任。网友自愿参加聚会，因聚会所产生的任何直接、间接或偶然性的损失，本站不承担任何责任。</p></td></tr></tbody></table></td></tr></tbody></table></td></tr>
  <tr>
    <td height="50">
      <div align="center"><img src="images/k_title_ywjhzj.gif" WIDTH="738" HEIGHT="27"></div></td></tr>
  <tr>
        <td></td>
    </tr>
 </table>
<p align="center"><!--#include file="tailer.htm" --></body>
</html>