sharpen是什么意思:VB开发案例时,应该如何解决数据库的有效路径?

来源:百度文库 编辑:中科新闻网 时间:2024/05/04 18:11:15
VB开发案例时,需要用到数据库的.但如果把案例转移到别的地方时,就会出现说数据库不是有效路径,想问一下应该如何才能解决这个问题,而不是每次保存不同的地方就要修改不同的路径?
如果把案例放到别的机子中,数据库的路径,那又应该怎么解决?
是用data控件来邦定数据库存的.

以下是使用相对路径打开数据库的代码,被打开的数据库必须位于程序或代码所在的目录夹内,VB数据库应用程序在哪,数据库也应在哪:
Private Sub Command1_Click()
Dim STRSQL As String
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\users.mdb;Persist Security Info=False"
Adodc1.CommandType = adCmdText
STRSQL = "select * from Users where 检测日期=DTPicker2.value"
Adodc1.RecordSource = STRSQL
Set DataGridM1.DataSource = Adodc1
AdodcM1.Refresh
End Sub
下面是上述打开绝对路径下数据库的代码,应用程序无论在哪,数据库必须在指定路径:
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="C:\users.mdb;Persist Security Info=False"
实际上打开其它关联文件,同样如此指明相对或绝对路径。