回答編集履歴
2
追記
answer
CHANGED
@@ -10,15 +10,26 @@
|
|
10
10
|
ファイル名が255文字以上の場合があるなら、
|
11
11
|
|
12
12
|
```
|
13
|
-
adoR.Fields.Append "F_Name",
|
13
|
+
adoR.Fields.Append "F_Name", 201
|
14
14
|
|
15
15
|
```
|
16
16
|
255文字以内なら、
|
17
17
|
|
18
18
|
```
|
19
|
-
adoR.Fields.Append "F_Name",
|
19
|
+
adoR.Fields.Append "F_Name", 200, 255
|
20
20
|
```
|
21
21
|
|
22
|
-
でいいのでは。(動作未確認です。)
|
22
|
+
でいいのでは。(動作未確認です。)※VBSでは予約済み定数は使えないので数値に変更しました。
|
23
23
|
|
24
|
-
どちらにしても第3引数(DefinedSize)はフィールドサイズなので、ファイル件数(レコード件数)とは関係ないですね。
|
24
|
+
どちらにしても第3引数(DefinedSize)はフィールドサイズなので、ファイル件数(レコード件数)とは関係ないですね。
|
25
|
+
|
26
|
+
別案
|
27
|
+
VBSで配列をソートする方法としては、ADODB以外にも、ArrayList を使う方法があります。こちらの方も試してみては。
|
28
|
+
|
29
|
+
[実験記録 No.02 : VBSで動的配列(ArrayList)を使う](http://blog.livedoor.jp/blackcode/archives/vbscript-how-to-use-arraylist.html)
|
30
|
+
|
31
|
+
あるいは、クイックソートやバブルソートなどのアルゴリズムを使って自前でソートする関数を作成するのもありですね。
|
32
|
+
|
33
|
+
[配列を昇順または降順に並べ替える関数 - hatena chips](http://hatenachips.blog34.fc2.com/blog-entry-192.html)
|
34
|
+
|
35
|
+
ただ、提示のコードを見る限り、同じフォルダーに入れているので、ソートする必要はないように思います。
|
1
書式の改善
answer
CHANGED
@@ -9,11 +9,15 @@
|
|
9
9
|
|
10
10
|
ファイル名が255文字以上の場合があるなら、
|
11
11
|
|
12
|
+
```
|
12
13
|
adoR.Fields.Append "F_Name", adLongVarChar
|
13
14
|
|
15
|
+
```
|
14
16
|
255文字以内なら、
|
15
17
|
|
18
|
+
```
|
16
19
|
adoR.Fields.Append "F_Name", adVarChar, 255
|
20
|
+
```
|
17
21
|
|
18
22
|
でいいのでは。(動作未確認です。)
|
19
23
|
|