particle.asp

来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 95 行

ASP
95 行
字号 
<%
If session("manager")="" Then
  Response.Redirect("manage.asp")
  Response.end
 End If
%><!--#include file="../inc/conn.asp"--><%'┌─  风云ASP在线  ────────────────────────┐'│                                                                 │'│  作者：赵振波.	http://www.fyasp.com	    				    │'│                                                                 │'│   Q Q：176189168  										   	    │'│                                                                 │'│ Email：fy96@163.com                                             │'│                                                                 │'│ 程序定做，系统开发，网站制作，提供高质量的网络产品、技术和服务！│'│                                                                 │'│                                                                 │'└───────────────────  http://www.fyasp.com ──┘%>
<%
id=trim(request("id"))
opendataconn
set rs=server.createobject("adodb.recordset")
sql="select * from padetail where id="&id&""
rs.open sql,conn,1,1
if rs.eof then 
   response.write "该信息可能已被删除!"
   response.end
end if
if not rs.eof then
end if
%>
<HTML>
<HEAD>
<TITLE>地产精英--&gt;文章</TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<link href="../inc/style.css" rel="stylesheet" type="text/css">
</HEAD>
<BODY BGCOLOR=#000000>
<center>
  <table width="455" border="0" cellspacing="0" cellpadding="0" class="black">
    <tr> 
      <td height="233" valign="top" align="left"> <div align="center"> 
          <center>
            <table width="97%" height="279" border="0" cellpadding="0" cellspacing="1" bgcolor="#DFF7E4" class="black">
              <tr> 
                <td width="100%" height="28" align="center" bgcolor="#1B9662" class="p12"><font color="#FFFFFF"><%=rs("topic")%></font></td>
              </tr>
              <tr> 
                <td width="100%" height="161" valign="top" bgcolor="#ECFFF3" class="p12"> 
                  <table width="402" height="19" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td>&nbsp;</td>
                    </tr>
                    <tr> 
                      <td valign="top" class="black"><%=rs("content")%> </td>
                    </tr>
                    <tr> 
                      <td>&nbsp;</td>
                    </tr>
                  </table></td>
              </tr>
              <tr> 
                <td width="100%" height="28" align="right" bgcolor="#1B9662" class="p12"><font color="#FFFFFF">文章类型： 
                  <%=trim(Rs("patype"))%>
                  　　　 　　　　　加入时间：<%=rs("dnt")%></font>&nbsp;&nbsp;</td>
              </tr>
              <tr> 
                <td  width="100%" height="28" align="right" bgcolor="#1B9662" class="p12">&nbsp;</td>
              </tr>
            </table>
          </center>
        </div></td>
    </tr>
    <tr> 
      <td height="33"> <table width=455 border=0 cellpadding=0 cellspacing=0>
          <tr> 
            <td colspan=2 height="6"><table width="337" border="0" align="center" cellpadding="0" cellspacing="0">
                <tr> 
                  <td width="337" height="19"><div align="center"><span class="news"><font color="#FFFFFF">[</font><a href="javascript:window.close()"><font color="#FFFFFF">关闭窗口</font></a><font color="#FFFFFF">]</font></span><font color="#FFFFFF">　</font></div></td>
                </tr>
              </table></td>
          </tr>
        </table></td>
    </tr>
  </table>
</center>
</BODY>
</HTML>
<%
rs.close
set rs=nothing
closedataconn
%>

particle.asp - 源码说明

本页面展示了「房地产管理系统 vb写的,很不错!!!!!!!!!!!」中的 particle.asp 源码文件，采用 ASP 编程语言编写，共 95 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与房地产相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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