The use of MapControl embedded in a Microsoft Access form causes MS Access to hang when attempting to exit.
上次发布: August 25, 2014No Product Found
漏洞 ID 编号
NIM032437
已提交
February 21, 2008
上次修改时间
June 5, 2024
适用范围
No Product Found
找到的版本
9.0
状态
Will Not Be Addressed
开发团队已考虑过该问题或请求,并决定不会解决该问题。 问题的“其他信息”部分可能包含进一步说明。
附加信息
No Public Explanation
解决办法
One workaround, for those who need something, is to shut down MS Access hard when existing the application: Private Declare Function TerminateProcess Lib "kernel32" _(ByVal lngProcess As Long, ByVal lngCode As Long) As LongPrivate Declare Function OpenProcess Lib "kernel32" _(ByVal lngAccess As Long, ByVal lngHandle As Long, ByVal lngProcess As Long) As LongfTerminate Application.hWndAccessAppPublic Function fTerminate(ByVal lngHandle As Long) As LongGetWindowThreadProcessId lngHandle, lngHandleDim ss As Longss = OpenProcess(1, -1, lngHandle)'ss = OpenProcess(False, True, lngHandle)fTerminate = TerminateProcess(ss, 0) '(OpenProcess(False, True, lngHandle), 0)End Function