show.asp 云枫工作室企业网站源代码第五版 1.0 - ASP源码程序

www.gusucode.com > 云枫工作室企业网站源代码第五版 1.0 > docc/admin/editor/show.asp

    <%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/test.asp" -->
<%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_test_STRING
Recordset1.Source = "SELECT * FROM test"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()

Recordset1_numRows = 0
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<table width="100%" border="0">
  <tr>
    <td>
<div align="center"><%=(Recordset1.Fields.Item("标题").Value)%></div></td>
  </tr>
  <tr>
    <td><%=(Recordset1.Fields.Item("内容").Value)%></td>
  </tr>
</table>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>