Question

asp提示--缺少对象: 'conn'

错误类型：
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: 'conn'
/y155/baojianchangshi_xx.asp, 第 18 行（倒数第二行“conn.Execute("update baojianchangshi set dianjishu=dianjishu+1 where id="&id&"") ”）

源代码如下：

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

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

Recordset1_numRows = 0
Dim id
id = Request.QueryString("ID")
conn.Execute("update baojianchangshi set dianjishu=dianjishu+1 where id="&id&"")
%>

y155.asp内容如下：
<%
' FileName="Connection_odbc_conn_dsn.htm"
' Type="ADO"
' DesigntimeType="ADO"
' HTTP="false"
' Catalog=""
' Schema=""
Dim MM_y155_STRING
MM_y155_STRING = "dsn=y155;"
%>

我是用Dreamweaver做的，用的是 数据源（ODBC）
在本地测试的，用的是数据源（ODBC）链接的
没有直接用字符串链接，一样用的。。

Answer 1

没有定义conn如何调用？

即使使用数据源也要在代码中调用数据源
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DSN=数据源名称;UID=用户名;PWD=密码"

Answer 2

你用conn.Execute 起码要顶一下conn是什么吧 不管你用什么链接

Answer 3

一楼的，麻烦您说清楚点
具体该怎么修改··
谢谢！！