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

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



إرسال تلقائي - VanToM - 12-03-13

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
كيف حالكم إخواني الكرام
لدي سؤال بسيط
أريد من البرنامج
أن يرسل البيانات الموجودة في ال TextBox1.Text
إلى الاميل الخاص بي تلقائيا
انا معي كود الإرسال للإميل
ولكن لا أعرف كيف اجعله
يرسل تلقائيا يعني مثلا
كل 5 دقائق يقوم بإرسال البيانات
الموجودة في ال TextBox1.Text
بإنتظاركم إخواني Cool


إرسال تلقائي - Easy4ever - 13-03-13

أستخدم أداة Timer ولا تنسى تجعل خاصية Enabled = True الخاصة بأداة Timer لان الأفتراضي = False

وفي حدث Timer1_Tick الخاص بالـ Timer ضع الكود هناك

الأن أذهب في خصائص Timer ستجد خاصية Interval أجعلها تساوي 5000 إي ان كل بعد 5 دقائق سيتم تنفيذ الأوامر إللي بداخل حدث Timer1_Tick


إرسال تلقائي - VanToM - 13-03-13

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


إرسال تلقائي - Easy4ever - 13-03-13

أخوي معليش هنا في خطأ قيمة
Interval = 5000 ليس بمعنى كل بعد 5 دقائق بل كل بعد 5 ثواني >
Rolleyes حيث ان كل 1000 تساوي ثانية واحدة

لذا لو تريد 5 دقائق إجعلها تساوي 300000 إذا كنت لا تعرف كيف طلعت النتيجة بهذا الرقم > أتبع الحسبة التالية

إذا كان كل 1000 تساوي ثانية واحده وكل دقيقه تحتوي على 60 ثانيه
فهذا يعني 1000 * 60 وتساوي 60000
ولو أردنا 5 دقائق نضرب الناتج في 5

60000 * 5 وتساوي 300000

إذا قيمة
Interval إجعلها تسواي 300000