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

📄 party_discuss_list.asp

📁 广东交友源程序
💻 ASP
字号:
<html>
<head>
<title>缘分的天空</title>
<link rel="stylesheet" href="../../images/css.css" type="text/css">
<meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<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="top.asp" -->
<table cellSpacing="0" cellPadding="0" width="100%"  border="0">
 <tr class=my_party height="2" >
    <td ></td>
      </tr>
 </table> 
<table cellSpacing="0" cellPadding="0" width="770"  border="0" align="center">
 <tr class=my_party2>
    <td height="20" align="left"> <a href="../../default.asp">首页</a> -&gt;<a href="party_index.asp">网友聚会</a> -&gt;聚会讨论列表</td>
      </tr>
 </table> 

<table align="center" bgColor="#ff9bbc" border="0" cellPadding="10" cellSpacing="1" height="100%" width="770">
                    <tbody>
                    <tr>
                     
                      <td bgColor="#fff7fd" vAlign="top">	


<%set rs8=server.CreateObject ("ADODB.recordset")
			sql="select * from party_discuss where id="&Request("id")
			sql=sql&" order by time desc"
 			rs8.Open sql,conn1,3
%>
<table bgColor="#ffdfef" border="0" cellPadding=3 cellSpacing=1 width="100%">
          <tr>
            <td width="522" colspan="4"><b><font color="#008000"><u>有聚会讨论<%=rs8.recordcount%>条</u></font></b></td>
          </tr>
          <tr bgColor="#ffa6c2">
            <td width="15%" align="center" style="border-bottom-style: solid">时间</td>
            <td width="15%" align="center" style="border-bottom-style: solid">姓名:</td>
            <td width="60%" align="center" style="border-bottom-style: solid">内容</td>
            
                    <td></td>
          </tr>

<%		 
         while not(rs8.eof)
			
			discuss_content=replace(rs8("discuss_content"),"~"," ",1,-1,1)
          %>   
            <tr bgColor=#fff0fa>
            <td width="15%" align="center" style="border-bottom-style: solid"><%=rs8("time")%></td>
             <td width="15%" align="center" style="border-bottom-style: solid"><font color="#d2691e"><a href="../show_user.asp?user_name=<%=rs8("user_name")%>" target="_blank"><%=rs8("user_name")%></a></font></td>
            <td width="60%" align="center" style="border-bottom-style: solid"><%=discuss_content%></td>
           
                    <td></td>
          </tr>   
          <%
          rs8.movenext
         wend
          %>  
 </tbody></table>
 
 
  </td></tr></tbody></table>
<p align="center"><!--#include file="../../copyright.asp" --></BODY>
</HTML>

⌨️ 快捷键说明

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