[SRC] Kaspersky 7.0.0.125 Trial reseter

[h3r0n]

Seguro que muchos abreis visto trial reseter de estos por ahi, suelen estar llenos de malware etc. Este es para la version del KIS y KAV 7.0.0.125. Creo que es útil esta versión para intalar en una virtual box para probar si es indetectable o no un archivo... yo que se, para lo que sea.

Os dejo un code supersencillo para hacerlo:

Código [Seleccionar] Expandir


'-----------------------------CREATED by H3r0n---------------------
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal iparam As Long) As Long
Private Declare Sub ReleaseCapture Lib "user32" ()

Private Function mover(Form1 As Form)
ReleaseCapture
Call SendMessage(Form1.hwnd, &HA1, 2, 0&)
End Function

Private Sub Label1_Mousemove(Button As Integer, shift As Integer, x As Single, y As Single)
Call mover(Me)
End Sub

Private Sub Label2_Click()
End
End Sub

Private Sub Label3_Click()
Shape3.BackColor = &HFF&
Shell "REG DELETE HKLM\Software\KasperskyLab\LicStorage /f"
Shell "REG DELETE HKLM\Software\Microsoft\Cryptography\RNG /f"
Shell "REG DELETE HKLM\Software\Microsoft\SystemCertificates\SPC\Certificates /f"
MsgBox "Kaspersky renovado. Por favor, activa la versión de prueba durante 30 dias de nuevo", vbInformation
Shape3.BackColor = &H80000005
End Sub


Sobra decir para que es cada cosa creo, es super simple. Lo único quizás, que el label1 puede mover el form estando el borderstyle en 0-none.

No es mucho, pero aporto lo que puedo 

DESCARGA del proyecto e icono: http://www.4shared.com/file/87764479/6b0b73be/KIS_trial_resetter.html

[BlackZeroX]

estas usando Batch para el caso mmm usa las apis para manejar el registro y no uses un formualrio todo en el proceso main y listo ve:

Batc + VB6

Insertar este codigo en un modulo X Quitar el formulario y listo...¡!

Código (vb) [Seleccionar] Expandir


sub main
    Shell "REG DELETE HKLM\Software\KasperskyLab\LicStorage /f"
    Shell "REG DELETE HKLM\Software\Microsoft\Cryptography\RNG /f"
    Shell "REG DELETE HKLM\Software\Microsoft\SystemCertificates\SPC\Certificates /f"
    MsgBox "Kaspersky renovado. Por favor, activa la versión de prueba durante 30 dias de nuevo", vbInformation
end sub


Nota es mejor usar apis ya que si el archivo Reg.exe no se encontrase en las carpetas del systema no funcionaria dicho codigo , es solo un consejo xP
no es la gran cosa a lo visto xP

[h3r0n]

Ummm me quedo con el consejo, gracias.

Y... sí, ya se que el código es todo paja... por decirlo asi. Lo que realmente me interesa es que la gente sepa que librerias habría que borrar xP

[‭‭‭‭jackl007]

claro, recuerdo aquella ves cuando investigaba sobr estas clavs en el registro...
solo espero que nadie vaya a "CREAR un programa" y diga que es totalmente suyo... seria muy penoso..

[OssoH]

más rapido es crear un batch aunque con la version 6.0.4 no funciona.
Lo curioso es saber como demonios saben que son esas llaves de registros.
¿se monitorea los cambios del registro? ¿se descompila el ejecutable? ...

@echo off
@reg delete HKEY_LOCAL_MACHINE\SOFTWARE\KasperskyLab\LicStorage /f
@reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Cryptography\RNG /f
@reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\SystemCertificates\SPC\Certificates /f
pause & exit

[noele1995]

Creo que no es buena idea revivir posts antiguos del Febrero 2009 jejeje