تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كود لجعل برنامجك تجريبي من برمجتي الخاصة
#1
كود قمت بالبحث على ما وجدة شبيه بماذا اريد وقمت بالتعديل عليه ليكون مناسب لما اريده

الكود يحسب على عدد الساعات فقط يمكنك جعله لمدة 30 يوم اذا اردت فأنا صممته ليكون ليومين فقط


كود :
If Now.Hour > 48 Then
           Dim a = MsgBox("End Terial")
           If a = vbOK Then
               End
           End If
       End If

قم بتغيير رقم 48 ليناسب ماتريده

48 لمدة يومين
12+12 = 48 ساعة

اي سؤال انا حاظر شباب
الرد }}}
تم الشكر بواسطة: أبو عمر , سعود , Adrees
#2
(16-09-16, 06:04 PM)0theghost0 كتب : كود قمت بالبحث على ما وجدة شبيه بماذا اريد وقمت بالتعديل عليه ليكون مناسب لما اريده

الكود يحسب على عدد الساعات فقط يمكنك جعله لمدة 30 يوم اذا اردت فأنا صممته ليكون ليومين فقط


كود :
If Now.Hour > 48 Then
           Dim a = MsgBox("End Terial")
           If a = vbOK Then
               End
           End If
       End If

قم بتغيير رقم 48 ليناسب ماتريده

48 لمدة يومين
12+12 = 48 ساعة

اي سؤال انا حاظر شباب

12+12=؟
ركز الله يحفظك
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد }}}
تم الشكر بواسطة: سعود , HASAN6.0 , HASAN6.0
#3
............
التطبيق بهذا الشكل ليس مناسبا للفكرة.

الفكرة انك تضع قيمة اولية ثم تزيد عليها ....اما الكود هو يتحقق من الساعة الان وكما تعلم اقصاها 23  واقلها 0. يعني الان بتوقيت مكة سيعمل وغدا سيعمل وبعد غذ ايضا.
جرب عكس التحقق اي اجعلها هكذا
PHP كود :
     If Now.Hour 48 Then
            MsgBox
("End Terial")

            End

        End 
If 

باختصار now.hour لن تكون اكبر من 23
الرد }}}
تم الشكر بواسطة: أبو عمر
#4
تظهر لي المسج بأن البرنامج توقف
الرد }}}
تم الشكر بواسطة:
#5
(16-09-16, 08:04 PM)0theghost0 كتب : تظهر لي المسج بأن البرنامج توقف

اخي الكريم ...
تطبيق فكرة الاستخدام المحدد للبرنامج تكون عبر وسيط ثالث والذي اعرف واستطيع عمل مثال عليه هو عن طريق خادم او سمها بروكسي ان شئت.
المهم ان تكون الساعة ليس بامتلاك المستخدم لكي لايعبث بها.
فقط هذا الذي لدي واعرفه اما الامور الاخرى من الريجستري وغيرها فلم اجربها.
الرد }}}
تم الشكر بواسطة: ابو ليلى
#6
هل يوجد بديل او كود اقوى من هذا ؟؟

اذا الكود الذي قمت بصنعه لايفيد على حسب اقوال الاخ الفاضل سعود فهل من بديل بحيث انه يعمل للوقت الذي اريده ؟؟

اريد كود سهل و بسيط للفهم حتى الكل يستفيد فأنا بخبرتي البسيطة قمت بصنع هذ الكود وتفاجئت بانه لايفيد رغم اني تحققت منه عبر الدقائق فقط اما بالساعات لم اتحقق منه بصراحة قلت مدام شغال على الدقائق فيعني بالساعات يعمل صحيح واتت المفاجئة الكبرة لي فهل من تحسين افضل ؟؟
الرد }}}
تم الشكر بواسطة:
#7
إقتباس :هل يوجد بديل او كود اقوى من هذا ؟؟
طبعا اخي الكريم يوجد ومثل ماقلت لك ابسطها الريجستري
وفيه تخزينها بجدول بعيد او حتى ملف نصي بعيد ولو تحب تعقدها بعد احفظها بملف web.config في خادم او موقع على استضافة.

سويت مثال بسيط جدا لكني لم اجربه الا الان يعني يحتاج تجربة غدا

المثال يقوم بحفظ اسم مفتاح وقيمة shortdatestring ثم بالزر الاخر يتحقق هل الفرق بين  اقصى صلاحية بعدد الايام هل هو اقل من ايام الاستخدام بحساب الفرق بين التاريخ الحالي والتاريخ المخزن في الريجستري.


الملفات المرفقة
.zip   For_0theghost0.zip (الحجم : 28.22 ك ب / التحميلات : 44)
الرد }}}
تم الشكر بواسطة:
#8
وجدة كود مخصص للتاريخ بدون رجستري ولا شيء


كود :
Private Sub Form_Open(Cancel As Integer)
If Date > #1/1/2006# Then
MsgBox " انتهاء وقت البرنامج" & vbCrLf & vbCrLf & _
" مع السلامة " & vbCrLf & vbCrLf & _
" اختكم زهره ", vbOKOnly + vbMsgBoxRight + vbExclamation
DoCmd.Quit
Else
x = MsgBox("الوقت المتبقي" & Str(#11/18/2005# - Date) & " هل تريد الاستمرار   يوم", vbYesNo, "الوقت المتبقي على البرنامج")
 If x = vbNo Then
 DoCmd.Quit
 End If

End If
End Sub

الكود تبعك مناسب جدا اخي الفاضل لكن اعتقد انه لازم يسجل البيانات المطلوبة ليقوم البرنامج بصنع ملفات داخل الرجستري
الرد }}}
تم الشكر بواسطة: asemshahen5


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  جمع المبالغ الخاصة بالعميل كل يوم على حده ابو ايمن شعيب 6 617 14-04-23, 01:01 AM
آخر رد: ابو ايمن شعيب
  [VB.NET] كود لجعل الكود ينفذ عن طريق زران في الكيبورد عبدالرحمن الأصبحي 1 540 20-01-23, 03:30 AM
آخر رد: asmarsou
  [VB.NET] هل يوجد طريقة لجعل البرنامج يظهر فوق جميع البرامج mohamedahmed1 3 784 31-10-22, 01:26 AM
آخر رد: mohamedahmed1
  [سؤال] كود استخراج العلامات الخاصة حسن الجلب 6 878 10-08-22, 04:06 AM
آخر رد: سعود
  [سؤال] ما هو اقوى برنامج مستخدم حاليا لحماية برنامجك من التهكير mh66 2 757 07-05-22, 09:22 AM
آخر رد: mh66
Heart [سؤال] المطلوب كود فيجوال VB لجعل TEXTBOX تساوي datagridview عند الضغط bilgacim 5 1,449 15-08-21, 12:15 AM
آخر رد: ابراهيم ايبو
  جمل الحفظ الخاصة بال commandbuilder لا تعمل الوضع المنفصل hany nabil3 1 919 17-05-21, 10:46 PM
آخر رد: عبد العزيز البسكري
  اريد طريقة للدوران علي ملفات الرسورسز الخاصة بالبرنامج أبو عبدالله الحلواني 3 1,561 16-05-21, 06:02 PM
آخر رد: أبو عبدالله الحلواني
  [سؤال] سؤال في الجريد كنترول الخاصة بمجموعة الديف اكسبريس حسن الجلب 0 772 29-12-20, 08:49 AM
آخر رد: حسن الجلب
  [سؤال] هل من طريقة لجعل نص الاتصال في ملف خارجي لكن كلمة سر قاعدة البيانات في موديول؟ WaeLx 6 3,540 27-08-20, 03:31 PM
آخر رد: حريف برمجة

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


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