WindowsXP質問スレ 141ページ目

このエントリーをはてなブックマークに追加
70名無し~3.EXE
ファイル消去のスクリプトを書いてみた。

'--------- ここから -------------------------------------------------------
Set objFso = CreateObject("Scripting.FileSystemObject")
Set objDialog = CreateObject("UserAccounts.CommonDialog")
If Not objDialog.ShowOpen = 0 Then
objFso.DeleteFile objDialog.FileName
End If
'--------- ここまで -------------------------------------------------------

テキストにコピペして拡張子VBSで保存、ダブルクリック。
ファイル指定のダイアログが出て、指定したファイルを消す。

FileSystemObjectでは隠しファイルも消せるから、これでいけないかな。