📄 history_party.asp
字号:
<%@ Language=VBScript %>
<html>
<head>
<title>酷爱网 - 网历史友聚会</title>
<link rel="stylesheet" href="../../images/css.css" type="text/css">
<meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.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="100%" border="0">
<tr class=my_party height="2" >
<td ></td>
</tr>
</table>
<!--网友自发的聚会-->
<script language="javascript">
<!--
//Begin dHTML Toolltip Timer
var tipTimer;
//End dHTML Toolltip Timer
function locateObject(n, d) { //v3.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=locateObject(n,d.layers[i].document); return x;
}
function hideTooltip(object)
{
if (document.all)
{
locateObject(object).style.visibility="hidden"
locateObject(object).style.left = 1;
locateObject(object).style.top = 1;
return false
}
else if (document.layers)
{
locateObject(object).visibility="hide"
locateObject(object).left = 1;
locateObject(object).top = 1;
return false
}
else
return true
}
function showTooltip(object,e, tipContent, backcolor, bordercolor, textcolor, displaytime)
{
window.clearTimeout(tipTimer)
if (document.all)
{
locateObject(object).style.top=document.body.scrollTop+event.clientY+20
locateObject(object).innerHTML='<table style="font-family: Tahoma, Arial, Helvetica, sans-serif; font-size: 11px; border: '+bordercolor+'; border-style: solid; border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px; border-left-width: 1px; background-color: '+backcolor+'" width="10" border="0" cellspacing="1" cellpadding="1"><tr><td nowrap><font style="font-family: Tahoma, Arial, Helvetica, sans-serif; font-size: 11px; color: '+textcolor+'">'+unescape(tipContent)+'</font></td></tr></table> '
if ((e.x + locateObject(object).clientWidth) > (document.body.clientWidth + document.body.scrollLeft))
{
locateObject(object).style.left = (document.body.clientWidth + document.body.scrollLeft) - locateObject(object).clientWidth-10;
}
else
{
locateObject(object).style.left=document.body.scrollLeft+event.clientX
}
locateObject(object).style.visibility="visible"
tipTimer=window.setTimeout("hideTooltip('"+object+"')", displaytime);
return true;
}
else if (document.layers)
{
locateObject(object).document.write('<table width="10" border="0" cellspacing="1" cellpadding="1"><tr bgcolor="'+bordercolor+'"><td><table width="10" border="0" cellspacing="0" cellpadding="2"><tr bgcolor="'+backcolor+'"><td nowrap><font style="font-family: Tahoma, Arial, Helvetica, sans-serif; font-size: 11px; color: '+textcolor+'">'+unescape(tipContent)+'</font></td></tr></table></td></tr></table>')
locateObject(object).document.close()
locateObject(object).top=e.y+20
if ((e.x + locateObject(object).clip.width) > (window.pageXOffset + window.innerWidth))
{
locateObject(object).left = window.innerWidth - locateObject(object).clip.width-10;
}
else
{
locateObject(object).left=e.x;
}
locateObject(object).visibility="show"
tipTimer=window.setTimeout("hideTooltip('"+object+"')", displaytime);
return true;
}
else
{
return true;
}
}
//-->
</script>
<!-- #BeginBehavior showTooltip1 -->
<div id="dHTMLToolTip" style="width:10px; height:20px; position:absolute; left:0px; top:0px; z-index:1000; visibility:hidden;">
<p> </p>
</div>
<!-- #EndBehavior showTooltip1 -->
<%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
%>
<table id="Table_01" width="779" height="950" border="0" cellpadding="0" cellspacing="0">
<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" colspan=2 width="513">
<div align="center"><b><font color="#ff9933" size="3"><%=sys_party_name%></font></b></div>
</td>
</tr>
<tr>
<td width=38> </td>
<td width=471><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">
<tbody >
<tr align=middle>
<td class=c1 height=30><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=30><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=30><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=30><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=30><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=30><a class=a_party
href="party_index.asp?zone_id=5" onMouseOver="showTooltip('dHTMLToolTip',event, '（浙江省、山东省、江苏省、安徽省、江西省、福建省）', '#ffff99','#000000','#000000','10000')">华东地区</a>
</td>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -