インターネット一時ファイルを削除する。
キャッシュファイルとCookieの両方を削除するには、1行
CreateObject("Shell.Application").NameSpace(32).Items().InvokeVerbEx("delete")
ですが、Cookie削除前に警告ダイアログが出ます。
キャッシュファイルだけを削除するには、4行
Set Folder=CreateObject("Shell.Application").NameSpace(32)
For Each FolderItem In Folder.Items()
If Left(Folder.GetDetailsOf(FolderItem,1),7)<>"Cookie:" Then FolderItem.InvokeVerb("delete")
Next
で、警告ダイアログは出ません。
Cookie削除の警告ダイアログを出さずに、Cookieだけを削除する方法はどうもなさそうです。:-(
Cookiesフォルダ側の実体だけを消しても、Cacheフォルダ側の情報が消えないし。
« ごみ箱を空にする。(XP) | トップページ | CScript.exeからコンソールアプリを同じコンソールウィンドウで実行する。 »