怎样写连接access数据库能达到这样的效果？

[superpig110]

就是像SQL那样，不用每个目录都加一个连接数据库文件

dim Conn
dim connstr
dim Db,MyDbPath
MyDbPath = ""
Db = "data.mdb"
on error resume next
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(MyDbPath & db)
Set conn = Server.CreateObject("ADODB.Connection")
conn.open connstr
If Err.Number <> 0 Then
Response.write "数据库链接出错,请联系管理员!"
Response.End
End If

我这样写的，可<!-- #Include File="../conn.asp" -->调用出错，怎么样能让MyDbPath自动判断路径呢？

[sxlfybb]

1、请先确定你的网站的路径是不是根目录。
2、确定你网站打开了父目录支持了。
3、调用的此文件与conn.asp相对于数据库的位置的相对关系你搞清楚了。
一般如果以上三点都没问题的话，应该不会出错了。如果还不行，你可以写绝对路径 "\" 来引用别的文件和数据库文件.

[superpig110]

网站不是根目录，我用2000根本不用去开启符目录

conn.asp在相对的根目录里，调用是在相对跟目录的admin文件夹

[lstup]

没有办法，直接调用conn在根目录的位置，类似：/inc/conn.asp

[jzywh]

如何使站点只用一个conn.asp

这里有详细说明

http://www.201ren.com/bbs/dispbbs.asp?boardID=36&ID=41305&page=1

[jzywh]

db = "/db/main.mdb"
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)

则此站点全局都可以用

<!--#include virtual="/inc/conn.asp"-->

[superpig110]

我用过类似的，可我总觉得为这么一个文件单独设置个文件夹浪费

动网7.1是根目录的，我按照他的代码写还是不行，不知道问题到底在哪