Access 2010 ACCDB
プログラムでファイルをファイルに変換する方法はありAccess 95/97 MDB
ますか?
質問する
4247 次
1 に答える
0
ここにいくつかのメモがあります。試してみる古いバージョンがないので、エクスポートできる以上にインポートできるかどうかわかりません。
Dim ws As Workspace
Dim db As Object
Dim tdf As TableDef
Dim qdf As QueryDef
Dim dbExp As Database
Dim acApp As New Access.Application
acApp.OpenCurrentDatabase "z:\docs\demo.accdb"
Set dbExp = acApp.CurrentDb
Set ws = DBEngine.Workspaces(0)
FName = "z:\docs\oldver95.mdb"
''Access 95
Set db = ws.CreateDatabase(FName, dbLangGeneral, dbVersion30)
''You can only export tables and a limited range of datatypes
For Each tdf In dbExp.TableDefs
If Left(tdf.Name, 4) <> "Msys" Then
acApp.DoCmd.TransferDatabase acExport, "Microsoft Access", _
FName, acTable, tdf.Name, tdf.Name
End If
Next
http://msdn.microsoft.com/en-us/library/office/bb243161(v=office.12).aspxを参照してください
エンジンの使用方法を示すためにVBScriptを使用するいくつかの注意事項:
Dim objEngine
Dim objWS
Dim objDB
Dim db: db = "z:\docs\oldver95.mdb"
Set objEngine = CreateObject("DAO.DBEngine.36")
Set objDB = objEngine.OpenDatabase(db)
strSQL="SELECT * FROM Table1"
objDB.CreateQueryDef "Query1", strSQL
于 2013-02-20T10:54:00.883 に答える