📄 party_1.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
%>
<!--#include file="header.htm" -->
<%
rows=1
set rs=server.CreateObject ("ADODB.recordset")
sql="select * from party where is_history=0 and province='"&Request("province")&"'"
rs.Open sql,conn1,3,2
%>
<table cellSpacing="0" cellPadding="0" width="770" align="center" border="0">
<tbody>
<tr>
<td height="30"> <a href="../../default.asp">首页</a> -> <a href="party_main.asp">网友聚会</a> -> <%=Request("province")%>地区聚会列表</td></tr>
<tr>
<td>
<p align="center"><b><font color="#ff9933"><%=Request("province")%>地区聚会列表</font></b></p>
<table cellSpacing="0" width="100%" align="center" bgColor="#999999" style="border-collapse:collapse;" cellpadding="0">
<tbody>
<tr>
<td align="middle" width="30" bgColor="#ffcc00" height="23" style="border-width:1; border-color:black; border-style:solid;"> </td>
<td align="middle" bgColor="#ffcc00" height="23" style="border-width:1; border-color:black; border-style:solid;"><strong>聚会主题</strong></td>
<td align="middle" bgColor="#ffcc00" height="23" style="border-width:1; border-color:black; border-style:solid;"><strong>发起人</strong></td>
<td align="middle" bgColor="#ffcc00" height="23" style="border-width:1; border-color:black; border-style:solid;"><strong>聚会地点</strong></td>
<td align="middle" bgColor="#ffcc00" height="23" style="border-width:1; border-color:black; border-style:solid;"><strong>聚会时间</strong></td></tr>
<%while not rs.EOF
%>
<tr align="middle" bgColor="#ffffff">
<td height="23" style="border-width:1; border-color:black; border-style:solid;"><%=rows%></td>
<td style="border-width:1; border-color:black; border-style:solid;"><a href="party_2.asp?id=<%=rs("id")%>"><%=rs("party_name")%></a></td>
<td height="23" style="border-width:1; border-color:black; border-style:solid;"><a href="../show_user.asp?user_name=<%=rs("initiate_people")%>" target="_blank"><%=rs("initiate_people")%></a></td>
<td style="border-width:1; border-color:black; border-style:solid;"><%=rs("address")%> </td>
<td style="border-width:1; border-color:black; border-style:solid;"><%=rs("party_time")%></td></tr>
<%
rows=rows+1
rs.MoveNext
wend%>
</tbody></table></td></tr></tbody></table>
<hr width="100%" SIZE="1">
<p align="center"><!--#include file="tailer.htm" -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -