منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] ممكن توضيح كيفية تشغيل البرنامج او عمل البرنامج - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] ممكن توضيح كيفية تشغيل البرنامج او عمل البرنامج (/showthread.php?tid=23690)

الصفحات: 1 2


RE: ممكن توضيح كيفية تشغيل البرنامج او عمل البرنامج - MOSTAFA.KAMEL - 06-02-18

(06-02-18, 12:58 AM)طالب برمجة كتب : تفضل المكتبة في المرفقات

بعد إضافتها يمكنك إظهار النافذة التي طلبتها بالكود
PHP كود :
Dim info As String "Phone:" vbNewLine "Mobilr:"

Dim daysToEnd As Integer 5

Dim runed 
As Integer 9

Dim frm 
As New SoftwareLocker.frmDialog("F8E0TBTB1BSTEMOF4F0F00FI9""0EB2F3486DE54C74B287D231E"daysToEndrunedinfo)
MsgBox(frm.ShowDialog().ToString

قم بتجربة التسجيل Serial التالي
0EB2F
3486D
E54C7
4B287
D231E


اه بس البرنامج المفروض بيطلع الكود الاولانى من الهارد دسك او البروسيسور


RE: ممكن توضيح كيفية تشغيل البرنامج او عمل البرنامج - طالب برمجة - 06-02-18

آخر مشاركة لي في هذا الموضوع

PHP كود :
Dim softwareName As String 'اسم البرنامج
Dim regFilePath As String '
مسار ملف التسجيل
Dim hideFilePath 
As String 'مسار ملف التسجيل
Dim txt As String '
نص
Dim trailDays 
As Integer 'عدد أيام التجربة
Dim trailRunTimes As Integer '
عدد مرات التشغيل
Dim id 
As String 'رقم تعريف من ثلاث رموز

Dim trialMaker As New SoftwareLocker.TrialMaker(softwareName, regFilePath, hideFilePath, txt, trailDays, trailRunTimes, id)
trialMaker.UseDiskDriveSignature = True '
استخدام رقم الهارد دسك
trialMaker
.UseProcessorID True 'استخدام رقم البروسيسور

Dim tripleDESKey As Byte() = trialMaker.TripleDESKey 

لكن تحتاج مراجعة الموقع لتعرف التفاصيل وكيفية الاستفادة من الطريقة


RE: ممكن توضيح كيفية تشغيل البرنامج او عمل البرنامج - MOSTAFA.KAMEL - 06-02-18

(06-02-18, 02:24 AM)طالب برمجة كتب : آخر مشاركة لي في هذا الموضوع

PHP كود :
Dim softwareName As String 'اسم البرنامج
Dim regFilePath As String '
مسار ملف التسجيل
Dim hideFilePath 
As String 'مسار ملف التسجيل
Dim txt As String '
نص
Dim trailDays 
As Integer 'عدد أيام التجربة
Dim trailRunTimes As Integer '
عدد مرات التشغيل
Dim id 
As String 'رقم تعريف من ثلاث رموز

Dim trialMaker As New SoftwareLocker.TrialMaker(softwareName, regFilePath, hideFilePath, txt, trailDays, trailRunTimes, id)
trialMaker.UseDiskDriveSignature = True '
استخدام رقم الهارد دسك
trialMaker
.UseProcessorID True 'استخدام رقم البروسيسور

Dim tripleDESKey As Byte() = trialMaker.TripleDESKey 

لكن تحتاج مراجعة الموقع لتعرف التفاصيل وكيفية الاستفادة من الطريقة

شكرااااااااا لحضرتك