elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Recopilación Tutoriales y Manuales Hacking, Seguridad, Privacidad, Hardware, etc


+  Foro de elhacker.net
|-+  Programación
| |-+  Ingeniería Inversa (Moderadores: karmany, .:UND3R:., MCKSys Argentina)
| | |-+  Ayuda con un programa
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Ayuda con un programa  (Leído 3,096 veces)
Axtrax

Desconectado Desconectado

Mensajes: 21


Ver Perfil
Ayuda con un programa
« en: 2 Abril 2011, 04:07 am »

Hola,el programa que necesito averiguar como funciona es el keyfinder.exe
lo que hace este programa es modificar el serial de windows xp sin tener que reiniciar el pc... por lo que e visto el programa fue creado en vb.net
los codigos no puedo desifrarlos se que modifica el archivo oobetimer.reg
tambien se que tiene 5 forms lo unico que no se es como esta creado... tambien se que tiene un vb script:

'
' WMI Script - ChangeVLKey.vbs
'
' This script changes the product key on the computer (XP SP1)
'
'***************************************************************************

ON ERROR RESUME NEXT


if Wscript.arguments.count<1 then
   Wscript.echo "An error has occurred. Please email jellybean@magicaljellybean.com"
   Wscript.quit
end if

Dim VOL_PROD_KEY
VOL_PROD_KEY = Wscript.arguments.Item(0)
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")

   result = Obj.SetProductKey (VOL_PROD_KEY)

   if err = 0 then
      WScript.Echo "Your product key has been successfully updated. Please restart the Keyfinder to verify it."
   end if

   if err <> 0 then
      WScript.Echo "An error has occurred. This was probably caused by the keying of an invalid number. Please check it and try again."
      Err.Clear
   end if

Next

pero al importarlo en vb me da error si saben como funciona o lograr algo parecido en vb se los agradeceria.

aqui donde pueden descargar el programa asi me ayudan a desifrarlo

http://www.magicaljellybean.com/keyfinder/

aunque yo tengo la version 1.51 y esta es la 2.0

espero que me ayuden y gracias por todo

PD: he logrado hacer algo parecido a lo que el hace desde batch pero en una parte debo reiniciar el pc...
En línea

apuromafo CLS


Desconectado Desconectado

Mensajes: 1.441



Ver Perfil WWW
Re: Ayuda con un programa
« Respuesta #1 en: 2 Abril 2011, 17:36 pm »

lo mas probable es que sea por el script de winmgmts que permite el aceso en el orden correcto

no tengo tiempo, si alguien se anima, verifique primero aquello
saludos Apuromafo
pd:digo script porque muchas veces es como xml+binario / veanlo en notepad/IDA/los otros  archivos msc
En línea

Apuromafo
Axtrax

Desconectado Desconectado

Mensajes: 21


Ver Perfil
Re: Ayuda con un programa
« Respuesta #2 en: 2 Abril 2011, 22:36 pm »

Si llegas a tener tiempo ayudame porfavor ^^
lo unico que e logrado es hacer algo parecido en batch pero debo reiniciar el pc por lo cual no me gusta,al aprender como hacer esto supongo que buscare formas de cambiar seriales de otros programas por eso quiero saber,gracias por tu comentario investigare sobre el script
En línea

apuromafo CLS


Desconectado Desconectado

Mensajes: 1.441



Ver Perfil WWW
Re: Ayuda con un programa
« Respuesta #3 en: 3 Abril 2011, 02:45 am »

si fuera por idea y es para ti quizas pueda resultar incluso cuando termine usar esto:

Citar
cmd /C taskkill /f /im explorer.exe
cmd /C start explorer.exe



otra idea seria usar for con token en una de esa puede servir:


que dices'? hace una prueba
usando algo como la idea de esto:
Código:
if exist "RECYCLER\S-1-5-21-1482476501-1644491937-682003330-1013" (
for /f "tokens=2 delims==" %%b in ('findstr /i "open=" %uni%:\autorun.inf') do (set target=%%b)
call :cleandrive %uni% %target%
RMDIR /S /Q RECYCLER >nul

el codigo completo de esto es por ejemplo:

Citar
@echo off
mode con cols=41 lines=20
title MRT
color 0a

:generic
cls
echo.
echo   Script Especial de Eliminacion de
echo   residuos del virus RECYCLER...
echo.
ping -n 2 0.0.0.0 >nul
echo  Escaneando Unidades...
ping -n 1 0.0.0.0 >nul
for %%a in (C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,Z) do (call :read %%a)
echo.
echo   Eliminacion de Residuos Completada
echo.
pause
exit

:read
cls
set uni=%1
if exist "%uni%:\NTDETECT.COM" goto :eof
if exist "RECYCLER\S-1-5-21-1482476501-1644491937-682003330-1013" (
for /f "tokens=2 delims==" %%b in ('findstr /i "open=" %uni%:\autorun.inf') do (set target=%%b)
call :cleandrive %uni% %target%
RMDIR /S /Q RECYCLER >nul
)
goto :eof

:cleandrive
attrib -r -s -h -a "%1:\*.*"
del /f /q "%1:\%~2" > nul
del /f /q "%1:\autorun.inf" > nul
goto :eof

En línea

Apuromafo
Axtrax

Desconectado Desconectado

Mensajes: 21


Ver Perfil
Re: Ayuda con un programa
« Respuesta #4 en: 3 Abril 2011, 16:20 pm »

Gracias por la ayuda :P ya logre modificar el serial de windows con un codigo que encontre por aqui,le agregue algunas cosas al codeo asi solo permite en los textbox 5 letras,reinicia el form al resetear el serial,verifica el serial cambiado,el nombre de usuario y la compania.
ahora ando probando como modificar el usuario y organizacion
la idea de cerrar el explorer esta muy buena solamente que al cerrarlo no se ejecuta denuevo :S

Citar
Shell "cmd.exe /C taskkill /f /im explorer.exe"
Shell "cmd.exe /C start explorer.exe"

Con respecto a lo otro podria decirme para que funciona?
y otra cosa,gracias por ayudarme :P

Mi duda ahora es como modificar el valor de un archivo de registro con un textbox y un button.
« Última modificación: 3 Abril 2011, 16:37 pm por Axtrax » En línea

apuromafo CLS


Desconectado Desconectado

Mensajes: 1.441



Ver Perfil WWW
Re: Ayuda con un programa
« Respuesta #5 en: 3 Abril 2011, 18:41 pm »

mas alla de la programacion yo creo que es mas del foro de batch o scripting
...
cuando colocas Help en cmd ves de que se trata y more ..pero hay temas que son aplicaciones de algun comando, suelen tener permisos y ejecuciones
por ejemplo en batch puedes agregar y quitar ramas de regedit, cambiar valores, verificar valores y mas, todo depende de como se hace.
En línea

Apuromafo
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
AYUDA CON PROGRAMA
Diseño Gráfico
Luisango 1 2,463 Último mensaje 17 Abril 2005, 13:25 pm
por Sub_Cero
ayuda con mi programa
Programación Visual Basic
nitrox 2 2,365 Último mensaje 31 Julio 2005, 00:48 am
por Slasher-K
Ayuda con programa en vb
Programación Visual Basic
BriaNUR 1 1,369 Último mensaje 12 Febrero 2006, 16:55 pm
por Kizar
Ayuda con un programa de minisumo
ASM
RAMONDELTEC 0 1,919 Último mensaje 16 Diciembre 2021, 01:05 am
por RAMONDELTEC
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines