がんばれマカフィーPART3
■ このスレッドは過去ログ倉庫に格納されています
0065名無しさん@お腹いっぱい。
NGNGスタートアップにこんなの入れてます。(W2K NEC PC-LX60T)
起動状況によっては2回ダイアログが表示される場合があります。
(一度タスクが削除されても復活しているらしい)
== KillMcTask.VBS ==
option explicit
Wscript.Sleep 35000
dim i, e, fso, objShell
set fso = WScript.CreateObject("Scripting.FileSystemObject")
set objShell = WScript.CreateObject("WScript.Shell")
for i = 0 to 5
on error resume next
fso.DeleteFile("C:\WINNT\Tasks\McAfee.com製品のアップデート確認*.job")
e = err.number
err.clear
on error goto 0
if e=0 then
objShell.Popup """MISSION AT " & cstr(5*i+35) & "sec.""", 3, "McAfee Task Terminator", 0+64
Wscript.Sleep 2000
else
Wscript.Sleep 5000
end if
next
set objShell = Nothing
set fso = Nothing
Wscript.Quit
== ここまで ==
■ このスレッドは過去ログ倉庫に格納されています