VBS脚本:系统安全中的全能战士

时间:2023-12-07 18:09:55作者:杭琬来源:

VBS脚本在系统但实际上,它在系统安全中有着广泛的应用。专业人员都明白,用VBS编写的脚本程序在窗口界面是由wscript.exe文件解释执行的,在字符界面由cscript.exe文件解释执行。wscript.exe是一个脚本语言解释器,正是它使得脚本可以被执行,就象执行批处理一样。

下面,我们将介绍几个VBS脚本在系统安全中的实际应用案例。

一、给注册表编辑器解锁

使用VBS脚本来解锁注册表编辑器,可以方便我们对注册表进行编辑和修改。以下是具体步骤:

VBS脚本:系统安全中的全能战士

1、用记事本编辑以下内容:

vbs复制代码
DIM WSH
SET WSH=WSCRIPT.CreateObject("WSCRIPT.SHELL")
WSH.POPUP("解锁注册表编辑器!")
WSH.Regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools",0,"REG_DWORD"
WSH.POPUP("注册表解锁成功!")

将以上内容保存为以.vbs为扩展名的文件,使用时双击即可。这个脚本会创建一个WSH对象,并通过弹出窗口提示用户注册表编辑器已被解锁。

二、关闭Win NT/2000的默认共享

如果您在使用Windows NT或2000操作系统,并且不希望系统存在默认共享,可以使用以下VBS脚本来关闭它们:

用记事本编辑以下内容:

vbs复制代码
Dim WSHShell
set WSHShell=CreateObject("WScript.shell")
Dim fso,dc
Set fso=CreateObject("Scripting.FileSystemObject")
set dc=fso.Drives
For Each d in dc
Dim str
WSHShell.run("net share"&d.driveletter &"$ /delete")
Next
WSHShell.run("net share admin$ /delete")
WSHShell.run("net share ipc$ /delete")

这个脚本会创建一个WSHShell对象,并通过循环关闭所有驱动器的隐藏共享以及admin和ipc管道共享。最后,它会通过弹出窗口提示用户默认共享已关闭。

三、显示本机IP地址

有时候,我们需要知道本机的IP地址。使用各种软件虽然可以办到,但使用VBS脚本也非常方便。以下是显示本机IP地址的VBS脚本:

用记事本编辑以下内容:

vbs复制代码
Dim WS
Set WS=CreateObject("MSWinsock.Winsock")
IPAddress=WS.LocalIP
MsgBox"Local IP="& IPAddress

将以上内容保存为ShowIP.vbs,双击执行即可得到本机IP地址。这个脚本会创建一个MSWinsock.Winsock对象,并通过弹出的窗口提示用户本机的IP地址。


标签: