الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف أجعل البرنامج يشتغل بتاريخ معين

مغلق
بدأه eb-mousa-vb في 23 مايو 2007 · 3 رد · 556 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

كيف أجعل البرنامج يشتغل بتاريخ معين باستخدام الفيجول بيسك

مثلا أرغب ببرنامج الآله الحاسبة أن تشتغل بتاريخ معين أو فتره معينة كل صبح مثلا

طبعا بدون أي تشغيل للبرنامج على الجهاز ( مثل فكرة برامج الفايروسات ) ولكن بحسن نيه !!!

لا حد يفهم غلط ... القصد ماهو فايروس

اصلا كيف أسوي فايروس وأنا ما أعرف بلغة البرمجة تمام .. بينصاد في جهازي قبل ما يخرج بره !!!

المكافح اللي عندي قديم :rolleyes:

#2

تفضل :

Private Sub Form_Load()

Label1 = Time

X = Label1

If X < "10:00:00" Then
Me.Visible = False
Else
Me.Visible = True
End If

End Sub

تم تعديل هذه المشاركة بواسطة Ala2 VB في 23 مايو 2007 في 18:33

اقتباس
If A is success in life, then A equals x plus y plus z. Work is x; y is play; and z is keeping your mouth shut

Albert Einstein

مدخل إلى برمجة وتصميم الألعاب : كيف أبدأ ؟

#3

ما كتبه لك الأخ علاء صحيح مئة بالمئة ولكنه يتحدث عن التاريخ الديناميكي (المتغير)

أما إذا كنت تريد برنامج أن يعمل كالقنبلة الموقوتة :lol: (و لا يشترط أن يكون فيروساً، قد يكون برنامج مرفق مع البرنامج الأساسي ذو النسخة التجريبية و عمل البرنامج المرفق هو إزالة البرنامج الأساسي بعد شهر مثلاً و ذلك لضمان عدم كسر البرنامج فتقوم بحذفه) فعليك أن تضع التاريخ داخل الكود أو من خلال التعامل مع الريجستري.

ملاحظة: وضع التاريخ

داخل الكود يشكل خطراً على حماية البرنامج لأنه سهل التعديل (على ما أعتقد).

أو حتى الريجستري سيكون من الأسهل اختراق البرنامج.

بالنسبة للحماية: هناك العديد من المواضيع في هذا المنتدى و الأعضاء التي تهتم بهذا الموضوع، ابحث عنها إن أردت.

بالنهاية لحذف البرنامج قد تحتاج لقتل جميع ال(process) المتعلقة ببرنامجك.

لا أعلم إن كان هناك بالمنتدى ما يتكلم عن إنهاء Process , على كل حال إن لم تجد راسلني.

تم تعديل هذه المشاركة بواسطة LordCover في 23 مايو 2007 في 19:54

مؤسس شبكة مواقع إجابتي أول شبكة مواقع عربية للأسئلة والأجوبة

#4

طيب يا شباب , متزعلوش :

في موديول :

Public Sub Main()
	If Date = "26/05/2007" Then Form1.Show
End Sub

ثم اذهب إلى قائمة Project واختر الخيار الأخير وغالباً سيكون Project1 Properties... تظهر ليستة في اليمين فوقها كلمة Startup Object حدد منها اسم الموديول الذي وضعت فيه الكود السابق

اتهينا

اقتباس
If A is success in life, then A equals x plus y plus z. Work is x; y is play; and z is keeping your mouth shut

Albert Einstein

مدخل إلى برمجة وتصميم الألعاب : كيف أبدأ ؟

هذا الموضوع مغلق.

مواضيع مشابهة