回答編集履歴
2
222
answer
CHANGED
|
@@ -1,5 +1,6 @@
|
|
|
1
1
|
プロセスのKillで良ければ、こちらのソースで可能と思います。
|
|
2
2
|
p.s. "MSACCESS"の部分はOSのバージョンで文字列違う可能性あります。
|
|
3
|
+
プロセスの強制終了ですので、Closeとは違います。
|
|
3
4
|
(環境:Access2007/32bit確認済み)
|
|
4
5
|
```VBA
|
|
5
6
|
Option Explicit
|
1
111
answer
CHANGED
|
@@ -61,6 +61,8 @@
|
|
|
61
61
|
'
|
|
62
62
|
End If
|
|
63
63
|
Next
|
|
64
|
+
|
|
65
|
+
'Free Object
|
|
64
66
|
Set objSet = Nothing
|
|
65
67
|
Set obj = Nothing
|
|
66
68
|
Set Server = Nothing
|