2015-10-14 112 views
-1

我試圖在MS Access 2003中使用VB6代碼打開一個.mdb訪問文件,以便在該訪問中打開報告。在VB6代碼中打開MS Access 2003 .mdb

編輯:我已經嘗試了一些事情,現在發現我們使用ULS(用戶級別安全性)通過Access訪問我們的數據庫。問題是OpenCurrentDatabase似乎不支持這一點。我發現一個帖子告訴我先創建一個工作區,然後從該工作區內打開數據庫,但這不會起作用。新的代碼我用盡低於: 我的代碼:

Private Sub Command1_Click() 
    us = "xxxx" 
    pw = "xxxx" 
    Set acc = New Access.Application 
    Set ws = acc.DBEngine.CreateWorkspace("test1", us, pw) 
End Sub 

現在我需要以某種方式從工作區中打開Access數據庫所以ULS會使用它。有任何想法嗎? 相關係統信息:

  • MS Access版本:2003
  • 操作系統:Windows 7 64位SP6
  • VB IDE:MS Visual Basic 6.0的
  • 庫:微軟Access 10.0對象庫。

上面的代碼導致MS Access啓動,但然後死鎖,並沒有做任何事情。

+0

哇'VB6'。你剛剛提醒我*好日子* :)喜歡那種語言 –

+0

「真」是「exlusive」的參數嗎?也許不exklusive已經嘗試 –

+0

的方式,沒有骰子。 – Magisch

回答

1

打開報告正確的語法:

acc.Application.DoCmd.OpenReport "Bericht1", acViewNormal 

...關閉報告:

acc.Application.DoCmd.Close acReport, "Bericht1" 
+0

我是否也必須爲開幕聲明做同樣的事情? – Magisch

+0

沒有必要。前面的陳述看起來OK –

+0

試過了,仍然是公開的死鎖。它沒有爲5秒做任何事情,然後說「不能繼續操作,因爲其他程序很忙」,那是 – Magisch