Windowsのファイルをシフトキーでまとめて消す時に
◇-Windowsのファイルをシフトキーでまとめて消す時に-misako(10/29-11:26)No.4095 ┗Re:Windowsのファイルをシフトキーでまとめて消す時に-sumi(10/29-12:28)No.4098 ┗Re:Windowsのファイルをシフトキーでまとめて消す時に-misako(10/29-15:55)No.4110 ┣Re:Windowsのファイルをシフトキーでまとめて消す時に-Cher(10/29-17:34)No.4124 ┃┣Re:Windowsのファイルをシフトキーでまとめて消す時に-Cher(10/29-17:38)No.4125 ┃┗Re:Windowsのファイルをシフトキーでまとめて消す時に-misako(10/30-13:13)No.4203 ┗Re:Windowsのファイルをシフトキーでまとめて消す時に-o2ka(10/29-23:13)No.4154 ┗Re:Windowsのファイルをシフトキーでまとめて消す時に-misako(10/30-13:05)No.4201
▲このページのトップに戻る
▲このページのトップに戻る
▲このページのトップに戻る
▲このページのトップに戻る
▲このページのトップに戻る
▲このページのトップに戻る
▲このページのトップに戻る
▲このページのトップに戻る
4095 | Windowsのファイルをシフトキーでまとめて消す時に | misako | 10/29-11:26 |
OS名:WindowsNT パソコン名:GATEWAY ソフト名:OS すみません、こんな方法があるのかどうか分からないのですが、 作成したプログラムを確かめる為に流すたび、 大きなファイルがいくつもできるので、確認後、 プログラム以外のファイルをシフトキーで一括して消しています。 その際、プログラムファイルが出来たファイルの中に混じってしまい、 間違えて消してしまうことがよくあるのです。 日付別、名前別、種類別でソートし直しても混じるものなので、 それを避けて(プログラムファイルが複数あります)一つ一つ削除すべきなのでし ょうが、もし、ファイル自身に消去不可(FDの上書き禁止みたいに)の属性設定が できると、とても助かると思ったのです。 ファイルの消去作業は1日に10回以上(確認作業なので)行なっており、 その都度、プログラムだけを避けて選択するのが結構面倒なので、 もし、良い方法がございましたらお教え頂けると助かります。 どうぞ宜しくお願いいたします。 |
▲このページのトップに戻る
4098 | Re:Windowsのファイルをシフトキーでまとめて消す時に | sumi URL | 10/29-12:28 |
記事番号4095へのコメント misakoさんは No.4095「Windowsのファイルをシフトキーでまとめて消す時に」で書きま した。 >OS名:WindowsNT >パソコン名:GATEWAY >ソフト名:OS >すみません、こんな方法があるのかどうか分からないのですが、 >作成したプログラムを確かめる為に流すたび、 >大きなファイルがいくつもできるので、確認後、 そのファイルを保存する所を別のフォルダーに出来ませんか。 |
▲このページのトップに戻る
4110 | Re:Windowsのファイルをシフトキーでまとめて消す時に | misako | 10/29-15:55 |
記事番号4098へのコメント >そのファイルを保存する所を別のフォルダーに出来ませんか。 やはり、別ホルダーにするしかないですね。システム構築の関係上、出来ればホルダーを動かし たくなかったのと、出来たファイルは動かす事が出来なかっためいい方法はないかと思いまし た。 sumiさんアドバイスありがとうございました。 |
▲このページのトップに戻る
4124 | Re:Windowsのファイルをシフトキーでまとめて消す時に | Cher | 10/29-17:34 |
記事番号4110へのコメント >やはり、別ホルダーにするしかないですね。システム構築の関係上、出来ればホルダーを動かし >たくなかったのと、出来たファイルは動かす事が出来なかっためいい方法はないかと思いまし >た。 推測するに、残したいファイルの名前は固定で 消したいファイルは不定だと思うんでこんな感じのスクリプトでどうでしょ。 ……出力先を分けた方がシステム的にきれいだとは思いますが。 excepts = Array("pg1.exe","pg2.exe","p3.dat") ' 残すファイル set fs = WSH.CreateObject("Scripting.FileSystemObject") set folder = fs.GetFolder("C:\TargetFolder") for each file in folder.Files delete = true for each x in excepts if x = file.Name then delete = false exit for end if next if delete then WSH.Echo(file) 'よさげならここをfile.Deleteに end if next |
▲このページのトップに戻る
4125 | Re:Windowsのファイルをシフトキーでまとめて消す時に | Cher | 10/29-17:38 |
記事番号4124へのコメント う。インデント消えてる。 HTMLソースでは残ってるみたいだけど。 |
▲このページのトップに戻る
4203 | Re:Windowsのファイルをシフトキーでまとめて消す時に | misako | 10/30-13:13 |
記事番号4124へのコメント システムを作る経験が今までに無くて、その上 プログラムの出来る方が周りにいないので、 とてもとても参考になるスクリプトでした。 他にも応用できそうです。 ありがとうございました。 |
▲このページのトップに戻る
4154 | Re:Windowsのファイルをシフトキーでまとめて消す時に | o2ka | 10/29-23:13 |
記事番号4110へのコメント >やはり、別ホルダーにするしかないですね。 shiftで選択した後、ctrlを押しながら消したくないファイルを選択解除をする方法もあるんですけ ど・・・。 ↑sumiさん、最初からこの事 書いてあげようよ・・・ |
▲このページのトップに戻る
4201 | Re:Windowsのファイルをシフトキーでまとめて消す時に | misako | 10/30-13:05 |
記事番号4154へのコメント >shiftで選択した後、ctrlを押しながら消したくないファイルを選択解除をする方法もあるんですけ >ど・・・。 なるほどー!あとから非選択にする事が出来るんですね。知らなかったです。 ありがとうございました! > ↑sumiさん、最初からこの事 書いてあげようよ・・・ いえいえ、返信頂けただけでうれしいのです。 本当にありがとうございました。 |
何か一言(本ページで参考になったならないを含めて残してあります)
◎:解決 ○:参考になった ×:参考にならなかった !:アドバイスあり
参考 | 回数 | 投稿日時 | 何か一言 |
---|