منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
اريد التحكم فى برنامجى عن بعد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=29102)

اريد التحكم فى برنامجى عن بعد - Lathe1 - 22-03-19

اريد التحكم فى برنامجى عن بعد بدون علم المستخد لانى لو مختش مبلغ البرنامج اقفله علية على العلم البرنامج مصنوع بالفجول بيسك 2010

RE: اريد التحكم فى برنامجى عن بعد - asemshahen5 - 25-03-19

أعمل البرنامج كالبرامج التجريبية ليدخل سيريال نمبر معين عبر الانترنيت اذا وجد الرقم خاطئ يقفل البرنامج .
و هذا يتم إما عن طريق قاعدة بيانات في الانترنت أو عن طريق ملف تكست في الدروب بوكس .
اذا لم يدفع غير له الرقم الموجود في قاعدة البيانات أو في ملف التكست بالدروب بوكس يغلق البرنامج .

RE: اريد التحكم فى برنامجى عن بعد - عبد العزيز البسكري - 25-03-19

بعد إذنك أخي الكريم .. ممكن أخي الغالي " [b]asemshahen5 " توضيح أكثر لفكرة الدروب بوكس .. حتى أتمكن من استعمالها بالشكل الصحيح[/b]


RE: اريد التحكم فى برنامجى عن بعد - asemshahen5 - 25-03-19

نفس فكرة عمل التحديث للبرنامج و لكن ضع سيريل نمبر به  عمل تحديث لمستخدمين البرنامج الخاص بك اونلاين عن طريق ال DropBox .

ضع ليبل على فورم و ضع بوتون  ضع الكود التالي في البوتون :

كود :
Dim web As New WebClient
   Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
       Label1.Text = web.DownloadString("https://dl.dropbox.com/s/ghkh79c8g3ql6b0/SerialNum.txt?dl=0")
   End Sub

وجربه و الباقي أكواد المقارنة .

RE: اريد التحكم فى برنامجى عن بعد - XCoder - 27-07-19

(25-03-19, 01:28 PM)asemshahen5 كتب : نفس فكرة عمل التحديث للبرنامج و لكن ضع سيريل نمبر به  عمل تحديث لمستخدمين البرنامج الخاص بك اونلاين عن طريق ال DropBox .

ضع ليبل على فورم و ضع بوتون  ضع الكود التالي في البوتون :

كود :
Dim web As New WebClient
   Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
       Label1.Text = web.DownloadString("https://dl.dropbox.com/s/ghkh79c8g3ql6b0/SerialNum.txt?dl=0")
   End Sub

وجربه و الباقي أكواد المقارنة .
يمكن ان توضح الفكره اكثر من خلال عمل لها فيديو توضيحي

RE: اريد التحكم فى برنامجى عن بعد - asemshahen5 - 27-07-19

حماية البرنامج بسريال الفلاش على الدروب بوكس