[attach]254[/attach]
如何自动识别数据库的路径? 因为本人对ACCESS数据库不对熟悉,所以特此来请教。
该程序运行时,我改变一下数据库的路径,就无法找到数据库,无法正常运行。请问如何做才能自动识别。
好像是什么相对路径和绝对路径?
[attach]254[/attach]
如何自动识别数据库的路径? 因为本人对ACCESS数据库不对熟悉,所以特此来请教。
该程序运行时,我改变一下数据库的路径,就无法找到数据库,无法正常运行。请问如何做才能自动识别。
好像是什么相对路径和绝对路径?
app.path表示执行文件所在的路径,你可以把数据库和执行文件放在同一目录下,然后用app.path来获得数据库的路径,就不需要在程序中硬性指定数据库的路径了。
当然,不管你用哪种方式,如果改变了数据库的路径,又没有通知程序,程序当然无法找到数据库。
把adodc1属性中连接设置去掉,加入以下代码
Private Sub Form_Load() Dim strAppPath As String strAppPath = App.Path strAppPath = IIf(Right(strAppPath, 1) = "\", strAppPath, strAppPath & "\") Adodc1.ConnectionString = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strAppPath & "db1.mdb;Persist Security Info=False" Adodc1.RecordSource = "select * from 学生" End Sub 再次强调一下,没有哪个程序能做到“自动”识别路径,数据库的路径一定是在程序中规定好的(实际上程序需要调用到的任何外部文件都是如此),用app.path只不过是使你的程序发布时更方便一些。
呵呵