请务必阅读并理解我在寻找的内容......
我的同学和我正在研究一个项目,我们想使用dropbox来保存所有文件。现在问题在于我们每次测试和更改代码时都必须更改路径。我们想知道除了链接之外是否还有其他方法:
C:\ Users \ Kevin \ Dropbox \ Project \ Database \ Student Management.mdb
这样在两台计算机上都是一样的......例如C:\ Dropbox等
Dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source= C:\Users\Kevin\Dropbox...")
答案 0 :(得分:0)
如果您要查找userprofile文件夹,可以使用Environment.GetFolderPath
获取该文件夹:
Dim userProf As String = Environment.GetFolderPath(Environment.SpecialFolder.UserProfile)
Dim dbPath As String = IO.Path.Combine(userProf, "Dropbox\Project\Database\Student Management.mdb")
Dim con As New OleDbConnection(String.Format("Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0}", dbPath))