数据库连接时的相对路径问题,急求啊!!!50分悬赏啊!!
问题:当我变更我的根文件夹后,数据库无法连接。如何修改下面的代码,才能令其自动连接到数据库,抑或说,自动找到数据库的相对路径(最好在只修改下面代码,不要另外添加太多代码....
问题:
当我变更我的根文件夹后,数据库无法连接。如何修改下面的代码,才能令其自动连接到数据库,抑或说,自动找到数据库的相对路径(最好在只修改下面代码,不要另外添加太多代码...)
Sub Page_Load() '设置Page_Load
Dim conn As New OleDbConnection()
Dim DS As New DataSet()
conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=C:\Users\Wiches\Documents\Visual Studio 2008\WebSites\WebSite3\DepartmentsIntroduction.accdb; User Id=admin; Password="
Dim objAdpt As New OleDbDataAdapter("Select * from Sheet1", conn)
objAdpt.Fill(DS, "XXFYB")
XXFY.DataSource = DS
XXFY.DataBind()
conn.Close()
End Sub 展开
当我变更我的根文件夹后,数据库无法连接。如何修改下面的代码,才能令其自动连接到数据库,抑或说,自动找到数据库的相对路径(最好在只修改下面代码,不要另外添加太多代码...)
Sub Page_Load() '设置Page_Load
Dim conn As New OleDbConnection()
Dim DS As New DataSet()
conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=C:\Users\Wiches\Documents\Visual Studio 2008\WebSites\WebSite3\DepartmentsIntroduction.accdb; User Id=admin; Password="
Dim objAdpt As New OleDbDataAdapter("Select * from Sheet1", conn)
objAdpt.Fill(DS, "XXFYB")
XXFY.DataSource = DS
XXFY.DataBind()
conn.Close()
End Sub 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询