?? about.asp
字號:
<%@ LANGUAGE=VBScript CodePage=936%>
<!--#include file="Inc/Const.asp"-->
<!--#include file="Inc/Sysconn.asp"-->
<!--#include file="Head.asp"-->
<%
'***********************************************************************************
' 產(chǎn)品名稱:CSYS.COM.CN企業(yè)全站管理系統(tǒng)(V2007簡體中文版)
' 聯(lián)系:QQ:61128110 Emial:61128110@163.com
' Copyright 2006 www.csys.com.cn - All Rights Reserved.
'***********************************************************************************
Set Rs_p=server.Createobject("Adodb.Recordset")
IF Id="" then
Sql="Select * from CS_About where About_Flag=1"
Else
Sql="Select * from CS_About where About_Flag=1 and About_Id=" & Id
End IF
Rs_p.open Sql,Conn,1,1
IF Rs_p.RecordCount=0 THEN Call Page_check(1,0)
Class_Name="<A HREF=About.asp>了解我們</A> > <A HREF=About.asp?Id=" & Rs_p("About_Id") & ">" & Rs_p("About_Name") & "</A>"
Page_Name="了解我們 -- " & Rs_p("About_Name") & " -- " & Web_Const(0)
Call Page_Head()
Call Page_iHead()
Call Page_nHead()
%>
<table width="990" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="321" valign="bottom" bgcolor="#082421"><span>
<%Call Page_Login()%>
</span><img src="Skins/blak/leftad.jpg" width="321" /></td>
<td valign="top"><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top" class="TABLE-Main"><div class="page-head"><%=Rs_p("About_Name")%></div>
<div class="TABLE-Mainall">
<div class="page-name"><%=Rs_p("About_Name")%></div>
<div class="about-content"><%=Rs_p("About_Content")%></div>
</div></td>
<td width="2"></td>
<td width="195" align="center" valign="top" class="TABLE-Side"><div><span class="type-color1">了解我們</span></div>
<div class='TABLE-side3'>
<%
Rs_p.Close
Set Rs_p=Nothing
Set Rs=server.createobject("adodb.recordset")
Sql="Select * from CS_About where About_Flag=1"
Rs.open Sql,Conn,1,1
While Not Rs.Eof
Response.Write "<DIV CLASS='TABLE-tstr'><IMG SRC=Skins/Blue/Tx_Ar3.gif> <A HREF=About.asp?Id=" & Rs("About_Id") & " >" & gotTopic(Rs("About_Name"),12,1) & "</A></DIV>"
Rs.MoveNext
Wend
Rs.Close
Set Rs=Nothing
%>
</div></td>
</tr>
</table></td>
</tr>
</table>
<%
Call Page_iBottom()
Call Page_Bottom()
Call CloseConn()
%>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -