+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ارجو المساعدة لفهم الكود وتحليله (/showthread.php?tid=44496)
ارجو المساعدة لفهم الكود وتحليله - ausa - 06-12-22
برجاء المساعدة على تحليل الكود حيث يعتمد على حماية البرنامج برقم المعالج وسريال البارتشن
وارجو المساعدة فى تحليل معادلة توليد رمز التفعيل
public static string GetPID()
{
string cPUId;
try
{
cPUId = (new GetInfo()).GetCPUId();
}
catch (Exception exception)
{
ProjectData.SetProjectError(exception);
cPUId = "BFE9FBFF000006EC";
ProjectData.ClearProjectError();
}
return cPUId;
}
public static string GetSerialNumber(string strDriveLetter)
{
string volumeSerial;
try
{
volumeSerial = (new GetInfo()).GetVolumeSerial("C");
}
catch (Exception exception)
{
ProjectData.SetProjectError(exception);
volumeSerial = "11112222";
ProjectData.ClearProjectError();
}
return volumeSerial;
}
public static string GetTheComputerName()
{
return Environment.
Name.ToString();
}
public static bool IsActive(string Hex1, string Hex2)
{
bool flag;
string str = "&h";
Hex1 = string.Concat("&h", Hex1);
int length = checked(Hex1.Length - 2);
for (int i = 1; i <= length; i = checked(i + 1))
{
str = string.Concat(str, "F");
}
double num = Conversions.ToDouble(Hex1);
double num1 = Conversions.ToDouble(str);
flag = (Microsoft.VisualBasic.CompilerServices.Operators.CompareString(Conversion.Hex(checked((long)Math.Round(num)) ^ checked((long)Math.Round(num1))), Hex2, false) != 0 ? false : true);
return flag;
}