您的位置:寻梦网首页编程乐园ASP编程>ASP如何获取父目录
ASP世界
ASP如何获取父目录
作者:greatshi  转自:原创

ASP中链接数据库时,需要获取数据库文件的路径,当数据库文件与当前文件在同一目录下,简单地用

DBPath1 = Server.MapPath("dbname.mdb")就可以了。

但是,如果当数据库文件与当前文件不在在同一目录下,就需要取得父目录的路径,当然,如果服务器启用了父目录功能,可以简单地用“../"获取父目录,甚至父目录的父目录(../../)......,但是有些免费空间,出于安全的考虑,关闭了父目录功能,不能简单地用“../"获取父目录,那怎么办呢,没关系,我们可以对当前路径进行字符串处理,获取父目录。

DBPath1 = Server.MapPath("./") '获取当前目录路径,不包括最后一个”\"
DBPath2=left(DBPath1,InstrRev(DBPath1,"\")-1) '获取父目录路径, 不包括最后一个”\"
DBPath3=left(DBPath2,InstrRev(DBPath2,"\")-1) '获取父目录的父目录路径, 不包括最后一个”\"

这样就可以用下面的语句来连接数据库了。

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath1&"\dbname.mdb"

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath2&"\dbname.mdb"

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath3&"\dbname.mdb"

 

注意:这里获得的路径均不包括最后一个”\",如果你最后结果要包括最后一个”\",不要减1就行了。例如,你只需得到父目录,可用:

DBPath2=left(DBPath1,InstrRev(DBPath1,"\")) '获取父目录路径, 已包括最后一个”\"

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath2&"dbname.mdb"

如果你还想得到父目录的父目录路径;那么,父目录就不能要最后一个”\",可以是

DBPath2=left(DBPath1,InstrRev(DBPath1,"\")-1) '获取父目录路径, 不包括最后一个”\"

DBPath3=left(DBPath2,InstrRev(DBPath2,"\")) '获取父目录的父目录路径, 已包括最后一个”\"

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath3&"dbname.mdb"