تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] شباب جعل البرنامج يعمل 7 ايام فقط وبعد ذلك يظهر نموذج السريال
#1
بسم الله الرحمن الرحيم
السلام عليكم شباب
ارجو منكم طريقة لجعل البرنامج يظهر رسالة السريال بعد اسبوع
يارب اذا اعطيتني علما...اعطني معه حكمه...واذا اعطيتني مالا....اعطيني معها كرما...واذا اعطيتني قوه...اعطني معها رحمه...واذا اعطيتني سلطه...اعطني معها عدلا...واذا اعطيتني مسئوليه...اعطيني معها امانه...واذا اعطيتني نجاحا...اعطني معها تواضعا...اللهم امين
الرد }}}}
تم الشكر بواسطة:
#2
فيه فكرة انا كنت ب استخدمها و هي كالأتي

تحدد CreationTime الخاص ب فهرس البرنامج فإن كان اقل من فترة TrialPeriod حينها تقوم بتنفيذ ما تريده مثل اغلاق البرنامج او اظهار رسالة للعميل او شئ من مثل هذه الأمور

و الكود التالي يوضح دالة تسترجع منها CreationTime و تحدد من خلالها فترة TrialPeriod و الدالة تسترجع قيمة عبارة عن Boolean


كود :
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       If CheckTrialPeriod(Application.StartupPath, 7) Then
           MessageBox.Show("you are in trial period ", "Information")
           Me.Close()
       End If
   End Sub

   Private Function CheckTrialPeriod(projectDirectory As String, tryPeriod As Integer) As Boolean
       Try
           Dim dt As DateTime = System.IO.Directory.GetCreationTime(projectDirectory)
           If DateTime.Now.Subtract(dt).TotalDays > tryPeriod Then
               Return True
           End If
       Catch ex As Exception
           Return False
       End Try
       Return False
   End Function


حاول تقوم بتغيير فترة TrialPeriod و تجعل قيمتها تساوي صفرا و سوف تري ان رسالة التنبية سوف تظهر ثم سيقوم البرنامج ب إغلاق نفسه
الرد }}}}
تم الشكر بواسطة: محمود رغمان , ربيع
#3
شكرا لك اخى العزيزلاكن اليس هناك شئ اضعه فى my.stengs

شكرا جزيلا اخى فعلا الدالة شغالة وبسيطة جدا وموفيدة
يارب اذا اعطيتني علما...اعطني معه حكمه...واذا اعطيتني مالا....اعطيني معها كرما...واذا اعطيتني قوه...اعطني معها رحمه...واذا اعطيتني سلطه...اعطني معها عدلا...واذا اعطيتني مسئوليه...اعطيني معها امانه...واذا اعطيتني نجاحا...اعطني معها تواضعا...اللهم امين
الرد }}}}
تم الشكر بواسطة:
#4
my settings ليس لها علاقة ب الامر نهائيا عموما لي ملحوظة اضافية يجب ان تضع في اعتبارك أن الدالة ستعمل حتي لو البرنامج الخاص بك تم عمل Activation له و بالتالي انت في حاجة الي تضيف شرطا أخر لكي لا يتم تنفيذ الدالة في حالة Activation للبرنامج
الرد }}}}
تم الشكر بواسطة: ربيع
#5
اخدت بالى من الموضوع ده وتم الحل والحمد لله
يارب اذا اعطيتني علما...اعطني معه حكمه...واذا اعطيتني مالا....اعطيني معها كرما...واذا اعطيتني قوه...اعطني معها رحمه...واذا اعطيتني سلطه...اعطني معها عدلا...واذا اعطيتني مسئوليه...اعطيني معها امانه...واذا اعطيتني نجاحا...اعطني معها تواضعا...اللهم امين
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تحديد مسار البرنامج atefkhalf2004 8 97 اليوم, 03:23 AM
آخر رد: atefkhalf2004
  [سؤال] كيف اجعل البرنامج يحفظ بيانات؟ The Light Fire 9 137 05-12-16, 12:58 AM
آخر رد: ali.alfoly
  [VB.NET] كود البحث لا يظهر اي نتائج ولا اي اخطاء Asmaa adel 1 55 03-12-16, 09:41 AM
آخر رد: ابراهيم النعيمي
  [نقاش] الى كل خبير ومبتدأ نقاش بخصوص جعل البرنامج نسخة تجريبية 0theghost0 1 157 30-11-16, 11:21 PM
آخر رد: awidan76
  [نقاش] اسئلكم بالله / تسعيرة هذا البرنامج مصمم على فيجول استديو 2013 عزف الخواطر 3 125 30-11-16, 06:42 PM
آخر رد: عزف الخواطر
  [VB.NET] ايقونة متحركة علي نموذج tifagreet 2 109 23-11-16, 12:57 PM
آخر رد: bahgat okasha
  [سؤال] مشكلة في إعادة تنفيذ البرنامج wael khlak 1 56 21-11-16, 11:48 PM
آخر رد: السرور
  خطا عند تشغيل البرنامج makky 10 146 19-11-16, 03:17 AM
آخر رد: أبو عمر
  جعل مفتاح انتر يعمل عمل مفتاح تاب مع الداتا جريد فيو cvcvcv 7 1,914 15-11-16, 09:00 PM
آخر رد: samnaj00
  [VB.NET] طلب تعديل ع الكود ليصبح البرنامج جاهزاً 3asfa~mdmra 8 202 12-11-16, 02:30 AM
آخر رد: 3asfa~mdmra

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم