cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\neauym\My Documents\doorctrl.mdb;Persist Security Info=False"
我想把这个语句里的绝对路径，改为相对路径，怎么做？
谢谢

先将工程保存到某个文件夹中.该文件夹里有一个data文件夹.里面放doorctrl.mdb文件.
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & app.path & "\data\doorctrl.mdb;Persist Security Info=False"

一定要是data的文件夹吗？难道别的文件夹不行吗？！或者直接根目录下？

行的.

你的意思好像是数据库文件必须放在data文件夹里？

习惯而已.
你想放哪都成.

dim DataPath as string
DataPath=iif(right(app.path,1)="\",app.path,app.path & "\") & doorctrl.mdb
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & datapath

还有如果不是data文件夹，是不是.mdb文件前面要有一个文件夹名称？

如果放在与工程同一目录下.
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & app.path & "\doorctrl.mdb;Persist Security Info=False"

可见你对windows的目录路径不太清楚.
建议可以找本windows的基础书看看.