Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > .NET Languages
You last visited: Today at 01:37

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



C++ code in VB 2010

Discussion on C++ code in VB 2010 within the .NET Languages forum part of the Coders Den category.

Reply
 
Old   #1

 
-=-Killha-=-'s Avatar
 
elite*gold: 747
Join Date: Dec 2010
Posts: 1,213
Received Thanks: 208
C++ code in VB 2010

Ich habe mal ein auszug von meinen c++ programm....

In diesem c++ Programm wird ein code erzeugt wie folgedend :

Code:
void	GetSerialNumber(char *sDrive, char *serial)
{
	DWORD SerialNum;
	char  tmp1[255],tmp2[255];

	memset(tmp1,0,255);
	memset(tmp2,0,255);
	GetVolumeInformationA(NULL, NULL, NULL, &SerialNum, NULL, NULL, NULL, NULL);
	sprintf(serial, "%d", SerialNum );
	return;
}

int	IsVIP1(char *area, char *Guid)
{
	sprintf(szURL, "h****uidcheck.php?serial=%s", Guid );
	// get maximum 256 bytes of the response
	if (URLgetpage(szURL,szResult,256)==0) return 96;				// Unable to verify GUID
	else {
	sprintf(szPredict, "%s", md5(md5(md5(md5(Guid)))));
	if (strcmp(szResult,szPredict)>=0){
	return 0;}
	}
	return 95;// guid does not match
}
Code:
int	vipcheck(char *section)
{
	char    Guid[81],ch;
	int		i;

            char HDD3[200];
			char *disk=" :\\";
			disk[0]='c';
            GetSerialNumber(disk,HDD3);
			strcat(HDD3,"-0Wce8.&K&%y:#");			// add something
            strcpy(szGuid,md5(md5(md5(HDD3))));
			for (i=0; i<13; i+=3) {					// switch some chars from the md5
				ch=szGuid[i];
				szGuid[i]=szGuid[i+17];
				szGuid[i+17]=ch;
			}
            strcpy(Guid,szGuid);
            GUIDstat=IsVIP1(section,Guid);
            if (GUIDstat!=0) {
				if (GUIDstat==95)
                Writelog("[ GuidTech Error ] - Paste your GUID in the System !");
				Writelog("[ GuidTech Error ] - Your GUID -> %s",szGuid);
                Writelog("[ GuidTech Error ] - Enter your GUID at h****/ ");
			    Writelog("");
				ExitProcess(0);
				MessageBox(NULL,"GUID Not Verified Read text file for more info!",0,MB_ICONSTOP);
				ExitProcess(0);
				 
			} else{
				
				Writelog("Your GUID Is -> %s",szGuid);
				Writelog("Checking Guid in Database -> Ok!");
				Writelog("Guid Status -> Verified");
				Writelog("");

			}
    return GUIDstat;
	}
Und jezt meine frage ! Ich möchte diesen code in Visual Basic erzeugen in einer Textbox nur wie stelle ich das an es ist ja eigentlich nur md5 + md5 oder? von disk
-=-Killha-=- is offline  
Reply


Similar Threads Similar Threads
VK Visual Basic 2010 code
03/13/2011 - elite*gold Trading - 4 Replies
wat 260 e*gold hier gehts zum treasure
CBS 07/2010 code ;D
06/26/2010 - Last Chaos Trading - 6 Replies
huhu, ich würde hier gerne 2 last chaos codes aus dem 07/2010 heft anbieten der code bietet ein blaues pferd und weitere items ;) tauschen würde ich sie gerne gegen runes of magic codes die codes sind auf jeden fall noch ungenutzt und erst aus dem heft bei interesse einfach eine pn schicken oder hier im topic reinschreiben, aktualisiert wird von mir mehrmals am tag
Biete: 5x Last Chaos Code aus CBS 7/2010
06/25/2010 - Last Chaos Trading - 22 Replies
Was ich dafür haben möchte? 5x Runes of Magic Codes wären schön :D
20/05/2010 Addies Code
05/20/2010 - WarRock Hacks, Bots, Cheats & Exploits - 5 Replies
// #define ADR_PLAYERPOINTER 0x00C3F068 #define ADR_SERVERPOINTER 0x00B3E548 #define ADR_HEALTHPOINTER 0x00B965FC #define ADR_WEAPONPOINTER 0x00A887C0 #define ADR_BASEPOINTER 0x00B94AF8 #define ADR_USERPOINTER 0x00C3F0B4 #define ADR_CLASSPOINTER 0x00B96604 #define ADR_CLANSERVER 0x00553E90 #define ADR_ALLSERVER 0x004B994B



All times are GMT +1. The time now is 01:39.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.