作用 mx 连接本地mdb库的一个问题

一个网站,原来用的是sql server,通过odbc连接,可能正常使用。
现要改成mdb数据库,
不能使用odbc,只能直接连接mdb库
创建数据源时,正常,但只要加上记录集,就会出错,如:
您要访问的页有问题,无法显示该页。
HTTP 500 - 内部服务器错误
Internet Explorer

mdb.asp
Dim MM_mdb_STRING
MM_mdb_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=mdb.mdb;Persist Security Info=False"

index.asp

1@LANGUAGE="VBSCRIPT" CODEPAGE="936"
1   
2Dim Recordset1   
3Set Recordset1 = Server.CreateObject("ADODB.Recordset")   
4Recordset1.ActiveConnection = MM_mdb_STRING   
5Recordset1.Source = "SELECT * FROM 记录表 WHERE 类别 = " + Replace(Recordset1__MMColParam, "'", "''") + " and 公司id=1"   
6Recordset1.CursorType = 0   
7Recordset1.CursorLocation = 2   
8Recordset1.LockType = 1   
9Recordset1.Open()   

‘为系统自动生成的代码

---------------------------------------------------------------

MM_mdb_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=mdb.mdb;Persist Security Info=False"

==>

MM_mdb_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("mdb.mdb")&";Persist Security Info=False"

Published At
Categories with Web编程
Tagged with
comments powered by Disqus