インデックスでASP FileSystemObjectコレクションにアクセスできません

Question

私は怒っていますか？ FileSystemObject（従来のASP）を持つフォルダの最初のファイルを取得する方法が見つかりません。ほとんどのコレクションでは、インデックス0または1が機能するかもしれないと思いますが、IISには「無効なプロシージャコールまたは引数」と表​​示されます。

どちらもこれらの最後の2行のは働く：

Set oFileScripting = CreateObject("Scripting.FileSystemObject") 
Set oFolder = oFileScripting.GetFolder(sFolder) 
Set oFiles = oFolder.Files 
If oFiles.Count = 0 Then Response.Write "no files" 
Response.Write oFiles(0).Name 
Response.Write oFiles.Item(1).Name 

私はメガ愚かであること、またはこの特定のコレクションにアクセスするためにインデックスを使用する方法はありませんかな？

Answer 1

をファイルコレクションは、Arrayはなく、ランダムアクセス機能が含まれていません。この機能が絶対に必要な場合は、フォルダを繰り返し処理し、見つかったファイルの名前を含む新しいArrayを作成し、この新しい配列をランダムアクセスソースとして使用し、配列の値。

ReDim FileArray(oFiles.Count) 

i = 0 
For Each oFile In oFiles 
    FileArray(i) = oFile.Name 
    i = i + 1 
Next 

Set oFile = oFileScripting.GetFile(sFolder + "\" + FileArray(0)) 

私は確かにこれを避けることはできません。

Answer 2

ありませんが、あなたがそれらを列挙し、インデックスを自分で追跡することができます：

Set oFileScripting = CreateObject("Scripting.FileSystemObject") 
Set oFolder = oFileScripting.GetFolder(sFolder) 
Set oFiles = oFolder.Files 
If oFiles.Count = 0 Then Response.Write "no files" 

i = 0 
For Each oFile In oFiles 
    Response.Write i & " = " & oFile.Name 
    i = i + 1 
Next