TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼
Windowsからみれば、Macもただの一PCです
Windows 8 で低スペックの限界に挑戦！Part2
プロダクトキーを置いとくスレ8
トホホのWindows 第7お手洗い場
トホホのWindows チラシの裏4枚目
|;;; l ﾟ ｰﾟﾉ|＜くだらない質問はここに Part337
[Win10専用] Windows Updateしたらageるスレ87
ESET Smart Security その39
WindowsMeはごみって言われてるけど本当かなぁ？
【田】Windows10へのｱｯﾌﾟｸﾞﾚｰﾄﾞ Part46【鶴】
- 693 ：
- 基本的な部分はもっと単純に出来る
Dim objFSO,objFILE
Set objFSO = CreateObject("Scripting.FileSystemObject")
For Each objFILE In objFSO.GetFolder("c:\temp").Files
objFILE.Name = InputBox(objFILE.Path & "の名前を変更してください")
Next
使い回さないなら、フォルダオブジェクトもファイルコレクションも変数に取る必要はない
でも逆に複雑にというか例外処理を入れた方が良い部分があり
InputBoxの戻り値は、直接ファイルオブジェクトのNameプロパティに代入しないで
一度変数に取り、空の場合、元のファイル名と同じ場合、重複がある場合などの対策を取った方が良い
とにかく、「フォルダ内の全ファイル」って対象のリネーム作業は
途中でエラー出して強制終了すると、リネーム終ってるものも含めて最初からやり直しで
しかもリネーム終ってるものはそのままのファイル名にしたくても
NameプロパティにInputBoxの戻り値を直接代入している状態では、未入力でOKやEnter押せばエラーになり
キャンセルボタンを押してもエラーになり、同じ名前を入力してもエラーになりで収集が付かなくなる
別の回避策としては、リネームが終ったファイルはc:\tempからc:\temp\#renameに
ファイル名変更と同時に移動を行い、処理の最後でc:\temp\#rename内の全ファイルを
c:\tempに移動してc:\temp\#renameを削除するって手もある
これなら途中のエラーで強制終了しても、次に実行した時にエラーになったファイルから始められるし
途中で強制終了せずに最後まで正常実行されれば、移動したファイルも元に戻るし
作った一時待避用フォルダも残らないので、結果は全く変わらない
説明が長くなったが、ファイル名変更って取っ掛かりは簡単だけど、まともなものを作るのはそれだけ難しいってこった
他には、使用不可文字とか、ファイルがロックされてるとかもあり得るしね
因みに知ってるかもしれないが、MsgBoxのボタン指定でvbYesNoCancelを使うと、三択の処理分けが出来るので
戻り値がEmptyだったら「はい→スキップ」「いいえ→再入力」「キャンセル→処理全体を終了」とか
重複がある場合は「はい→自動連番化」「いいえ→再入力」「キャンセル→スキップ」とかの対策が出来る
Windows 7 ｱｸﾃｨﾍﾞｰｼｮﾝ 総合ｽﾚｯﾄﾞ Part.29
【史上】 Windows 7 〜2020年サポート 【最強】
Outlook.com 総合スレ Part8
【田】Windows10 Part168
トホホのWindows チラシの裏4枚目
MPC-BE 16
トホホのWindows 第8お手洗い場
【標準AA】フォント･カスタマイズ 6th【ClearType】
【ワープロ出身IME】Japanist(OAK) Part4
新MS-DOSを話す
--------------------
【NG】工作員の荒らし用AA大全集 第13巻【ﾃﾝﾌﾟﾚ】
ＷＩＮＧＲＯＣＫを語れ part2
[高金利]ｿｰｼｬﾙﾚﾝﾃﾞｨﾝｸﾞ[投資型ｸﾗｳﾄﾞﾌｧﾝﾃﾞｨ] IPなし
IDにWindowsが出るまで(´･ω･｀)ｼｮﾎﾞｰﾝするスレ 38
Amazonプライムビデオで見られる海外番組36
岡本倫 エルフェンリート
そんじん軍団 愛の絆
【韓国政府】徴用工問題「日本企業は賠償履行を」 河野外相は不快感
室内アンテナでBSデジタル放送が見たい TP9
育苗〜田植の諸々話そう
【昭和６４年1月7日】昭和最後の日何してた？
婚活してわかったが結局あいつら金しか見てない 顔が良いとか高身長とか高学歴なんて些細な付加価値 金だよ金金金 [986761928]
【ＨＡＢＡ】HABA【ハーバー】39
【ユピテル専用】ドライブレコーダースレッド ☆5
花王不買スレはなぜマモノ好きのクソコテ婆限定になったのか？ Part.4
【健全な精神は】樋口黎【健全な肉体に宿れかし】
怖いゲーム
☆彡★将来我が子に就いて欲しい職業を語る２☆彡
【ヘイト厳しめ】コナン&工藤新一信者の悪行を徹底的に語るスレ57【全キャラdis】
プラネックスコミュニケーションズってどうよ 4
TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼
