السلام عليكم
يا أخوان أريد كود يقوم بحدث معين مثل أغلاق الكومبيوتر أو ماشابة عند الساعة..............قيمة الساعة أنا أحددها بالتكست بوكس
أتمنى المساعدة
السلام عليكم
يا أخوان أريد كود يقوم بحدث معين مثل أغلاق الكومبيوتر أو ماشابة عند الساعة..............قيمة الساعة أنا أحددها بالتكست بوكس
أتمنى المساعدة
قصدك اذ جت الساعه 5 على توقيت الجهز مثلاً يتنفذ الامر
او وقت محدد تكتبه مثل بعد 20 دقيقه او خمس دقائق
تم تعديل هذه المشاركة بواسطة بـــــدر في 25 فبراير 2006 في 15:11
الأثني إذا ممكن بس الأول أهم من الثاني
الله يعطيك العافية
السلام عليكم
اقتباسأغلاق الكومبيوتر
ابحث وستجد اكثر من موضوع فى المنتدى بهذا الصدد
اقتباسأو ماشابة عند الساعة..............قيمة الساعة
استخدم الـTimer
واعتقد ان البرنامج سبق ووضعه احدهم فى المنتدى ابحث عنه
VB.NET and C# Comparison
http://www.harding.edu/fmccown/vbnet_csharp_comparison.html
=-=-=-=-=-=-=
ذو العلم يشقى فى النعيم بعلمه .:. واخو الجهالة فى الشقاوة ينعم
=-=-=-=-=-=-=
يا من بدنياه اشتغل . قد غره طول الأمل . فالموت يأتى بغتة . والقبر صندوق العمل
=-=-=-=-=-=-=
ان لم تستطع ان تجد ما تفعله فافعل ما لم تسطع ان تجده

لست أعلم ما تقدمه الدوت نت من إمكانيات
لكن بامكانك استخدام timer في البرنامج وسيكون باستطاعتك عمل الطريقتين . بالطبع البرنامج لا بد أن يكون شغال على طول ..
طريقة أفضل من ذلك هي استعمال ما يسمى Task schedule سواء باستدعاء البرنامج at.exeاو Schtasksالموجود في أنظمة عائلة NT . لمعلومات أكثر عنهما راجع windows help أو في command prompt يمكن الحصول على شرح عن ذلك.
يمكن أيضا استخدام توابع API خاصة بعمل Task schedule .
أعتقد أن دوت نت تعطي طرائق أخرى لعمل ذلك ....
راجع
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
SOLO.NET :
كتبنا رد في نفس الوقت :D
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
خلاص استخدم Timer مثل ماقلو الاخوان
وخل القيمه المكتوبه بـ TextBox تساوي Interval
Timer1.Interva l= TextBox.text
او استخدم ComboBox وضع الوقت فيه مثل دقيقه بعدين دقيقتين وانت وطالع
علماُ ان كل ثانية تساوي 1000 عند Timer
:)
جزاكم الله خير
ماذا عن طريقة تحديد الوقت والتاريخ للقيام بالشيء
"مثلاً "عند الساعة 5 على توقيت الجهاز مثلاً يتنفذ الامر"
ما الخطأ في هذا الكود كلما شغلت البرنامج تتكرر الــ msgbox غلى مالا نهاية
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Timer1.Interval = TextBox1.Text Timer1.Enabled = True End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick If MsgBox(TextBox2.Text) Then Timer1.Enabled = False End If End Sub End Class
يبدو أنك لم تقرأ جيداً وظيفة التايمر
عندما تعطي لـ Interval قيمة ولتكن دقيقة فسيتم تنفيذ الكود بداخل Timer1_Tick كل دقيقة
وهنا سيتم تنفيذ MsgBox كل مرة يصل فيها الوقت الى قيمة Interval .
راجع Help واقرأ الجزئية التي تريدها بشكل جيد قبل البدء بكتابة الكود .
اقتباسماذا عن طريقة تحديد الوقت والتاريخ للقيام بالشيء"مثلاً "عند الساعة 5 على توقيت الجهاز مثلاً يتنفذ الامر"
يمكن عملها باستعمال timer أيضاً وهنا سيكون برنامجك مشابه لبرنامج الساعة .
يمكن إستخدام Task schedule التي أشرت إليها في ردي السابق .
يبدو أني راح انزل Dot Net عندي :D
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
الله يعطيك العافية وسامحني على الأزعاج لكنني مبتدأ ولا أفهم كل كلمة تقصدها أنت أو أي شخص آخر ولذلك دائماً أريد الشرح
أنا كاتب
If MsgBox(TextBox2.Text) Then
Timer1.Enabled = False
يعني التايمر ما يكرر المسج مرة ثانية بس أهوا قاعد يكرر
هذي الجمله خطاء
If MsgBox(TextBox2.Text) Then
Timer1.Enabled = False
End If
حدد اق كانت قيمة TextBox2.Text مثلااً 50 يعمل ايقاف لتايمر مثل
If Timer1.Interval = "50" Then
Timer1.Enabled = False
Else
End If
السلام عليكم
لعلك تستفاد من الشرح التالي:
منبّه العمليّات Thread.Timer
هذا المنبّه يسمح لك باستدعاء أيّ دالّة كلّ فترة من الوقت، بمجرّد تمرير اسمها إلى المنبّه عند تعريفه.. هذه الدالة سيتمّ تنفيذها في عمليّة فرعيّة بخلاف تلك التي يوجد بها المنبّه.
طبعا هذا المنبه مختلف عن ذلك الذي عرفناه من قبل System.Windows.Forms.Timer، كما أنّ هناك نوعا ثالثا من المنبّهات تحت فضاء الاسم System.Timers.Timer، فلا ترتبك بين هذه الأنواع!
وفي المثال التالي ترى كيف نستدعي الإجراء CheckStatus كلّ ثانيتين.. هذا الاستدعاء سيبدأ بعد ثلاث ثواني من تشغيل المنبّه:
Dim timer As Timer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e _
As System.EventArgs) Handles MyBase.Load
timer = New Timer(AddressOf CheckStatus, Nothing, 3000, 2000)
End Sub
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e _
As KeyEventArgs) Handles MyBase.KeyDown
If e.KeyCode = Keys.Escape Then
' إنهاء عمل المنبّه
timer.Dispose()
End If
End Sub
' لاحظ أنّ الإجراء الذي ستستدعيه لا بدّ أن يكون له معامل من النوع كائن
Shared Sub CheckStatus(ByVal state As Object)
MsgBox("Esc هذه الرسالة ستظهر كلَّ ثانيتين، إلى أن تضغط زر" + _
vbCrLf + "ولكن اضغط النموذج أولا ليكون فعالا، حتّى يستقبل ضغطة الزرّ")
End Subشرح مفصل لل ftp و معالجة الملفات مع سيرفر ال ftp
my E-mail : ihsanfuzzy@yahoo.com
هذا الموضوع مغلق.