回答編集履歴
3
こちらかがいいかも
answer
CHANGED
|
@@ -1,6 +1,6 @@
|
|
|
1
1
|
質問のタイトルですが、Sqlserverを含むキーワードがないので、ネットワーク障害の質問かと思いました。
|
|
2
2
|
|
|
3
|
-
|
|
3
|
+
sqlserverが手元にないので検証できないのですが・・・。
|
|
4
4
|
|
|
5
5
|
素人考えですが
|
|
6
6
|
For i = 2 To 6000
|
2
こちらかがいいかも
answer
CHANGED
|
@@ -1,5 +1,7 @@
|
|
|
1
|
-
|
|
1
|
+
質問のタイトルですが、Sqlserverを含むキーワードがないので、ネットワーク障害の質問かと思いました。
|
|
2
2
|
|
|
3
|
+
qlserverが手元にないので検証できないのですが・・・。
|
|
4
|
+
|
|
3
5
|
素人考えですが
|
|
4
6
|
For i = 2 To 6000
|
|
5
7
|
|
1
こちらかがいいかも
answer
CHANGED
|
@@ -7,4 +7,14 @@
|
|
|
7
7
|
あります。ループ回数を減らして実データのみをinsertしてみるとよいかと思います。
|
|
8
8
|
|
|
9
9
|
例えばですが、テストテーブル・項目を３つくらいに限定して実施してみたら成功したが、
|
|
10
|
-
本稼働を想定した項目では失敗した。などの投稿をしていただけるとよいと思います。
|
|
10
|
+
本稼働を想定した項目では失敗した。などの投稿をしていただけるとよいと思います。
|
|
11
|
+
|
|
12
|
+
下記の部分をコメントアウトすると、エラー箇所でプログラムが止まるので
|
|
13
|
+
原因について追加で報告いただくと原因がより特定されるかもしれませんね。
|
|
14
|
+
|
|
15
|
+
'On Error GoTo Err
|
|
16
|
+
|
|
17
|
+
'Err:
|
|
18
|
+
' Set rs = Nothing
|
|
19
|
+
' Set cn = Nothing
|
|
20
|
+
' MsgBox (Err.Description)
|