scripts hechos por W4rR3d

[W4rR3d]

 si ven un error en mis scripts por favor notificar

grupo Black Eye Security Team  Piura -Peru
 W4rR3d  - G3kk0 - W4rc10k - M1lh077
script1: el siguiente script permite saber el nombre de tu pc, dominio de

Código (vb) [Seleccionar] Expandir

usuario,nombre de usuario,perfil del server
Set yu1 = Wscript.CreateObject( "Wscript.Shell" )

WScript.Echo " verificar variables:"
WScript.Echo " el script se esta ejecutandose"

WScript.Echo "Computer Name   : " & yu1.ExpandEnvironmentStrings( "%COMPUTERNAME%" )
WScript.Echo "Logon Server    : " & yu1.ExpandEnvironmentStrings( "%LOGONSERVER%" )
WScript.Echo "User Domain     : " & yu1.ExpandEnvironmentStrings( "%USERDOMAIN%" )
WScript.Echo "User Name       : " & yu1.ExpandEnvironmentStrings( "%USERNAME%" )
WScript.Echo " hacked by W4rR3d"

Set yu1 = Nothing

script2:
El siguiente Script ejecuta el cambio de organización en cualquier PC de la red:

Código (vb) [Seleccionar] Expandir

Option Explicit
Set yu2 = WScript.CreateObject("WScript.Shell")
Dim yu2, s1
s1 = "HKLM\Software\Microsoft\Windows NT\CurrentVersion\"
yu2.RegWrite s1 & "RegisteredOwner", "HACKED BY W4rR3d"
yu2.RegWrite s1 & "RegisteredOrganization", "HACKED BY W4rR3d"

script3:
el siguiente script permite Obtener datos de usuario de dominio:

Código (vb) [Seleccionar] Expandir

On Error Resume Next
Set objSysInfo = CreateObject("ADSystemInfo")
Wscript.Echo "User name: " & objSysInfo.UserName
Wscript.Echo "Computer name: " & objSysInfo.ComputerName
Wscript.Echo "Site name: " & objSysInfo.SiteName
Wscript.Echo "Domain short name: " & objSysInfo.DomainShortName
Wscript.Echo "Domain DNS name: " & objSysInfo.DomainDNSName
Wscript.Echo "Forest DNS name: " & objSysInfo.ForestDNSName
Wscript.Echo "PDC role owner: " & objSysInfo.PDCRoleOwner
Wscript.Echo "Schema role owner: " & objSysInfo.SchemaRoleOwner
Wscript.Echo "Domain is in native mode: " & objSysInfo.IsNativeMode


[SuperDraco]

Primer error:

Código [Seleccionar] Expandir

.      Autodidacta en Ingenieria de Sistemas
.         y creador de virus informaticos

De la primera línea, mejor no hablemos, si tu eres eso, el resto incluido yo somos dioses, y sobre crear, tu no creas nada, solo copias...

Creo que deberías cambiar esos 2 aspectos si realmente quieres que alguien te ayude, porque a veces se ven cosas en "tus" batchs que son de risa e incomprensibles, así que se un poco humilde, anda.