Dreamweaver如何编写代码驱动ACCESS并设置数据源

来源：百度知道 编辑：UC知道 时间：2024/05/03 03:04:49
本人用Dreamweaver编写了一个有数据查询的网页,在本地设置WEB站点和ODBC测试正常,申请了支持ACCESS的免费ASP空间(http://virtualhost.webplus.com.cn/lideji001/),上传后首页出错,错误信息如下:Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序

/lideji001/Default.asp，行 30

由于不能象本地一样在远程计算机上设置ODBC,如何用代码方式来进行远程ACCESS驱动并设置数据源.请给详细操作步骤与代码.
<%
Dim Recordset1
Dim Recordset1_numRows

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

Recordset1_numRows = 0
%>
下面是第31行：
Recordset1.ActiveConnection = MM_shuju_STRING

33427767 - 魔法师 四级,高手!你有QQ吗?能加我吗?23216731
不过

<%
dim DB
DB="数据库名" '定义数据库路径及名称
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DB)
%>

<%
Dim Recordset1
Dim Recordset1_numRows

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

Recordset1_numRows = 0
%>

你看看是不是这句的问题
Recordset1.Source = "SELECT * FROM register"