回答編集履歴
1
修正
test
CHANGED
|
@@ -12,7 +12,7 @@
|
|
|
12
12
|
|
|
13
13
|
Set ltb = CurrentDb.TableDefs(ltbnm)
|
|
14
14
|
|
|
15
|
-
If .Attributes And dbAttachedTable Then
|
|
15
|
+
If ltb.Attributes And dbAttachedTable Then
|
|
16
16
|
|
|
17
17
|
ltb.Connect = ";DATABASE=" & fpath
|
|
18
18
|
|