Board logo

標題: 如何用VB6.0將access匯出成excel [打印本頁]

作者: yeh6712    時間: 2011-7-2 21:17     標題: 如何用VB6.0將access匯出成excel

想用VB設計一個按鈕,將帶有密碼的access檔,匯出成excel檔,程式該如何撰寫?我知道如何連接資料庫及打開,但就是不能匯出,請問下列程式,那裡有誤?謝謝…
----------------
Private Sub Command4_Click()
Dim db As Database
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb;Persist Security Info=False;Jet OLEDB:Database Password=1234"
Set db = Workspaces(0).OpenDatabase(App.Path & "\test.mdb")
db.Execute "SELECT * INTO [Excel 8.0;DATABASE=C:\pp\匯出資料.XLS].[匯出資料] FROM [測試資料]"
End Sub
------------------------------------------
錯誤訊息:無法辨識 test.mdb資料庫格式…




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)