• ベストアンサー

WSHでFD内のファイルを検索

WSH(WindowsScriptHost)でFDの中に入っているファイルのファイル名を入手することはできますでしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
  • Oh-Orange
  • ベストアンサー率63% (854/1345)
回答No.1

★出来ます。 ・『VBScript ファイル検索』でネット検索するといっぱいサンプルが見つかります。  例えば  http://www1.u-netsurf.ne.jp/~tomo_c/tips/R23Lev02.html→『Tips - ステップアップWSH』  http://www1.u-netsurf.ne.jp/~tomo_c/tips/R23Lev10a.html→『検索フォルダ/検索文字をコマンドライン引数から指定する』  http://journal.mycom.co.jp/column/nihongoprog/042/index.html→『日本語で10行プログラミング』  →『』 ・過去質問では  http://oshiete1.goo.ne.jp/qa3428312.html→『VBScript フォルダ以下からファイルの検索、コピー』  FD なのでドライブを指定してからファイル検索、ファイル一覧を行って下さい。 サンプル: Set fso = CreateObject("Scripting.FileSystemObject") Set src = fso.GetFolder("A:\") 'FDのドライブを指定 ' 指定のフォルダに格納された各ファイルを処理する tmpMessage = "ファイル一覧:" & vbNewLine For Each FileName In src.Files tmpMessage = tmpMessage & FileName & vbNewLine Next WScript.Echo tmpMessage ' 指定のフォルダに格納された各サブフォルダを処理する tmpMessage = "フォルダ一覧:" & vbNewLine For Each FolderName In src.Subfolders tmpMessage = tmpMessage & FolderName & vbNewLine Next WScript.Echo tmpMessage 以上。

参考URL:
http://www1.u-netsurf.ne.jp/~tomo_c/tips/R23Lev02.html
olive_surf
質問者

お礼

回答ありがとうごいます。 ファイルの一覧確認できました。 Set fso = CreateObject("Scripting.FileSystemObject") Set src = fso.GetFolder("A:\") For Each FileName In src.Files msgbox FileName Next と実行していたのですが、「src.Files」でエラーが出て、「えっもしかしてドライブ直下はダメなのかな?」と思っていた次第です。 ありがとうございました。

すると、全ての回答が全文表示されます。

関連するQ&A