www.gusucode.com > 站长俱乐部新闻发布系统精简版 1.01源码程序 > admin/admin_main.asp
<!--#include file="admin_scripts.asp" --> <!--#include file="admin_top.asp" --> <% dim myParam myParam = Session("CurrentPage") if (Request.Form("ID") <> "") then myParam = Request.Form("ID") end if %> <% dim ItemMenu, ItemMenu_numRows set ItemMenu = Server.CreateObject("ADODB.Recordset") ItemMenu.ActiveConnection = MM_oConn_STRING ItemMenu.Source = "SELECT * FROM ac_item WHERE ID = "& myParam & "" ItemMenu.CursorType = 0 ItemMenu.CursorLocation = 2 ItemMenu.LockType = 1 ItemMenu.Open() ItemMenu_numRows = 0 %> <table width="100%" border="0" cellpadding="5" cellspacing="0"> <tr> <td><img src="../images/blank.gif" width="18" height="6" alt="" /></td></tr> <tr valign="baseline"><td class="ac_admin_main"><%= adminHeading(2,lang_admin_default_001,"icons/document_view_24.gif",ItemMenu.Fields.Item("Title").Value,null) %></td></tr> <tr><td class="ac_contentarea_view" colspan="4"><%=(ItemMenu.Fields.Item("Content").Value)%></td></tr> </table> <% ItemMenu.Close() %> <!--#include file="admin_bottom.asp" -->