システムwiki

MS Office 16.0アクセスデータベースエンジンオブジェクトライブラリ

jcable5 受付中 最終更新日:2021-05-27 23:30

何年もの間、私はMS Office 16.0 Access Database Engineオブジェクトライブラリを使用してMDBファイルとACCDBファイルからのデータをExcelに開き、プルする.Win10 KB4580419とセキュリティKB4586864のうちの1つ後に、2020年11月10日にインストールされた更新
データベース内のtableとクエリについて、各ステートメントについて繰り返す機能を失った.TDEFとQDEFを設定でき、DB.TableDEFSがウォッチ項目である場合は、各tableがウォッチwindows に表示されます.私はWin10 KB4580419をアンインストールすることができました、
そしてセキュリティ更新KB4586781しかしそれは助けませんでした.セキュリティ更新プログラムKB4586864をアンインストールできません.私はこれを複数のコンピュータでテストし、クライアントは私のExcelワークブックを使ってコンピュータ上で同じ問題を報告しています.私はMDBファイルを使用しています
そしてOffice32私はDAO3.6に戻ることができます.しかし、それはOffice 64のためには機能しません.これが起動した理由と途中の修正があるのか.私はコードの束を書き換えることに真実ではありません.

System-Win10 2004、Microsoft 365

SUB TESTACEDAO()

DAO.Database

としてのDIM DB

DAO.TabledEf

としてのDIM TDEF

dao.querydef

として薄暗いQDEF

DIM VARRAY(200)バリアント

変異体としてのムチム

DIM i整数

db= dao.opendatabase( "d:\documents\test_acedao.mdb")を設定します.

tdef= db.tabledefs( "calendar")

を設定します.

varray=アレイ(1,2,3,4,5)

VARRAYのそれぞれの胎児について 'それぞれの作品についてここで

debug.print vitem

次のvitem

i= 0からdb.tabledefs.count-1 'ここでの作品

debug.print db.tablefs(i).name

tdef= db.tabledefs(i)

を設定する

次のi

DB.QUERYDEFの各QDEFの場合は、Excelはエラーメッセージなしで終了する

debug.print qdef.name

次のQDEF

DB.TableDEFの各TDEFの場合は、Excelはエラーメッセージなしで終了します.

debug.print tdef.name

次のTDEF

終了SUB

返信リスト(回答:3)

1 #
Dirk49r

同じ問題があります.Windows 101909のEnterprise 64ビットのMicrosoft 365Applicationをロールアウトしたい.

DAO.TableDEFS

でデータベースクラッシュのExcelにアクセスするためのExcelマクロを使用してテスト

Excel Crash(エラーなしで閉じた状態)イベントID 1000

障害のあるApplicationの名前:Excel.exe、version:16.0.13328.20356、タイムスタンプ:0x5FA4B072

障害モジュールの名前:ACEDAO.DLL、version:0.0.0.0、タイムスタンプ:0x5FA07D97

例外コード:0xc0000005

エラーオフセット:0x000000000000063797

不良プロセスのID:0xec4

不良Applicationの開始時刻:0x01d6d5295bf93e2d

障害のあるApplicationのパス:C:\Program Files\Microsoft Office\Root\Office16\Excel.exe

障害モジュールのパス:C:¥Program Files¥Common Files¥Microsoft Shared¥Office16¥acedao.dll

レポートID:CC6A1FDF-E49F-4ADF-B102-78E78BF276B1

障害パッケージの完全な名前:

故障したパッケージに対する相対的なApplicationID:


VBAコード:

dao.database

としてのパブリックDB

サブレッシュDB()

dao.tabledef

として薄暗いtbldef

薄暗いSTRONNECT文字列

文字列

としての薄暗いストラップ

文字列

として薄暗くなる

文字列

として薄暗くなる

STRAPAD= thisWorkbook.path

db= openDatabase(strapad&"\database.mdb"、false、false、 "msアクセスを設定します. PWD= XXX ")

strconnect= "MSアクセス. pwd= xxx; データベース= "&strapad&"\database.mdb "

db.tabledefs

の各TBLDEEFについて

'これはDB.Tabledefs Excel Crashs


-

セキュリティアップデートは2020年11月にこの問題を抱えています.

マイクロソフトが高速ソリューションを見つけてこの問題を解決することを願っています.

またはこの問題を解決するというアイデアを誰かにしてくださいか?

応答1# ->にスキップ
2 #
Dirk49r

コードをこれに変更しました.

整数

としてのDim CotableFs

cotabledefs= db.tabledefs.count

i= 0からcotabledefs-1

tbldef= dbtv.tabledefs(i)

「今、あなたはtbldef

で何かをすることができます

それは私のようです、それぞれのために 'set'

を含めません

3 #
NameWTF

私は同様の問題を持っています、

StockMon ++の0x00007FFF0D3C7DF6(ACEDAO.DLL)でスローされた例外:0xc0000005:アクセス違反の書き込み場所0x0000000000000000.

インラインDataBasePTR _dbEngine :: OpenDatabase(_bstr_t名、const_variant_t&option、const _variant_t&readonly、const_variant_t&connect){

struct database* _result= 0;
HRESULT _HR= RAW_OPENDATABASE(名前、オプション、readonly、connect、&_result);
if(失敗(_hr))_com_issue_errorex(_hr、これは__uuidof(これ)).
DatabasePTRを返す(_result、false).
}