天龙八部不归林怎么去:ASP 一个简单的问题

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 02:24:27
<%
Option Explicit
response.buffer=true '开启缓冲页面功能
Server.ScriptTimeout = 100
Const Edition = "完美版"
Const Ke_System="Ke_System V 2006"
Const Css="/admin/admin_css.css"
Const DelMode=1 '删除模式 1 表式删除文章时同时删除相关的图片,0 表示只删除文章

'定义运行模式,测试的时候设置1,正常运行的时候设置为0,不输出错误信息有利于安全,
Const IsDeBug = 1

'-------------用户自定义部分[结束]----------------------

Dim DataPath,Conn,Connstr,arrShowLine(10)
Dim Ke,re,template,SqlNowString,MyUserOnline,Restr
Dim title,ErrMsg,info

DataPath = "/data/data.mdb" '数据库实际名称及路径

'网站数据库连接
Sub Connect()

Connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DataPath)
On Error Resume Next
set Conn = server.CreateObject("ADODB.Connection")
Conn.open Connstr

if Err Then
Err.clear
set Conn=nothing
Response.Write "用户数据库连接出错,请检查连接字串。"
Response.End
End if
End Sub

if Not IsObject(Conn) Then Connect()
dim RsP,sql
Set RsP=Server.CreateObject("Adodb.recordset")
Response.Write isobject(Rsp)&"<br>"
sql="Select * from Ke_Article"
RsP.open sql,Conn,1,1
response.Write Rsp.recordcount&"<br>"&sql&"<br>"
response.write RsP(1)

%>
</div>

把 Ke_Article 换成 Ke_ArticleComment 就是不行。
查不出记录。。我里面有记录。。
表名什么的都是对的

Ke_Article是表名,换成Ke_ArticleComment当然不行,Ke_ArticleComment后,查询的就不是一个表了,仔细检查你的表设置,如果你非要用Ke_ArticleComment,请同时更改表名