Hacer que el sistema de Windows sea más seguro? Usar script VBS

El script VBS es un término extraño para muchas personas, pero hoy Xiaobian explicará el uso mágico de este extraño nombre en la seguridad del sistema. Los profesionales entienden que los scripts escritos en VBS son interpretados por el archivo wscript.exe en la interfaz de la ventana, y son interpretados en la interfaz de caracteres por el archivo cscript.exe. Wscript.exe es un intérprete de lenguaje de scripts que permite que los scripts se ejecuten al igual que el procesamiento por lotes.

1. Desbloquee el Editor del Registro

Edite lo siguiente con el Bloc de notas:

DIM WSH

SET WSH = WSCRIPT.CreateObject (" WSCRIPT.SHELL ") 'Objeto WScript.Shell de comportamiento

WSH.POPUP (" ¡Desbloquear el Editor del Registro! &Quot;) -

' Mostrar información emergente " Desbloquear el Editor del Registro ! "

1. WSH.Regwrite " HKCU \\ Software \\ Microsoft \\ Windows \\ CurrentVersion \\ Policies \\ System \\

DisableRegistryTools ", 0, " REG_DWORD "

'Unlock Registry Editor

WSH.POPUP (" Registry Unlocked Successfully! &Quot;)

' Mostrar mensaje emergente " ¡Registro desbloqueado con éxito! "

Guarde como un archivo con la extensión .vbs y haga doble clic cuando lo use.

En segundo lugar, cierre el recurso compartido predeterminado de Win NT /2000

Edite lo siguiente con el Bloc de notas:

Dim WSHShell 'define la variable

set WSHShell = CreateObject (" WScript.shell ") '' Crea un objeto que puede comunicarse con el sistema operativo WSHShell

Dim fso, dc

Set fso = CreateObject (" Scripting.FileSystemObject ")) 'Crear un archivo Objetos del sistema

establezca dc = fso.Drives 'Obtenga todas las letras de unidad

Para cada d en dc

Dim str

WSHShell.run (" net share " &d.driveletter &" $ /delete ") 'Cerrar el recurso compartido oculto para todas las unidades

next

WSHShell.run (" net share admin $ /delete ")

WSHShell.run (" net share ipc $ /delete ") 'Cerrar admin $ e ipc $ pipeshare

Ahora probemos, primero abra cmd.exe, ingrese net El comando compartir verá el compartir en su máquina. Después de hacer doble clic en ejecutar stopshare.vbs, verá que la ventana parpadea. Luego ingrese el comando net share en cmd. En este momento, no se encuentra la lista compartida.

1. New Roman " >

3. Muestra la dirección IP local

Muchas veces, necesitamos saber la dirección IP de esta máquina. Aunque podemos usar varios programas, es muy conveniente usar un script VBS. Use el Bloc de notas para editar lo siguiente:

1. Dim WS

2. Establezca WS = CreateObject (" MSWinsock.Winsock "))

3. Dirección IP = WS.LocalIP

4. MsgBox " IP local = " &Dirección IP

Guarde el contenido anterior como ShowIP.vbs y haga doble clic para obtener la dirección IP local. Anterior12Página siguiente Total 2 páginas