WSH(・∀・)ｽﾚｯﾄﾞ! ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
128:１１１ 05/02/26 23:11:45 WSHで、お願いします。 >>126 129:１１１ 05/02/26 23:21:27 つか、>>127は解決しました。２行目が間違いでした。 Set f=Shell.BrowseForFolder(0,"フォルダを選んでください",0) 引き続き、>>125をお願いします。 130:１１１ 05/02/26 23:50:16 >>123さんのソースをいじって、 Set fso = WScript.CreateObject("Scripting.FileSystemObject") Set Shell=Wscript.CreateObject("Shell.Application") Set MOTOf=Shell.BrowseForFolder(0,"コピー元フォルダを選んでください",0) Set dest = fso.GetFolder(InputBox("コピー先フォルダ")) For Each f In MOTOf.Files Set ts = dest.CreateTextFile(f.Name & " " & f.Size, False) ts.Close Next とやってみました。コピー先フォルダの入力までは出来るんですが、 それ以後、エラーが出ます。 行５、文字１、オブジェクトでサポートされていないプロパティまたはめそっどです。 'MOTOf.Files' コード、800A01B6 ソース、VBScript 実行時エラー となってしまいます。
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4334日前に更新/212 KB
担当:undef