Dim MSG As String
WSK.GetData MSG
If MSG = "cmd1" Then
timer1.enabled = true
End If
طبعا الكود داخل data arrival للسيرفر
لكن عندما ارسل الامر مرة اخرى من العميل لا يعمل مرة اخرى
Dim MSG As String
WSK.GetData MSG
If MSG = "cmd1" Then
timer1.enabled = true
End If
طبعا الكود داخل data arrival للسيرفر
لكن عندما ارسل الامر مرة اخرى من العميل لا يعمل مرة اخرى

لو ينفع ترفع المثال
شوف الملف ده ممكن يفيدك
لأن التايمر متفعل كيف يفعله وهو متفعل؟؟؟
لازم تحط أمر لإيقافة لكي يتم أمر التفعيل.



Email : sao_-5000@hotmail.com
ممكن زي ما ذكر الأخ سعد توقف التايمر , ويمكن ذلك :
Dim MSG As String WSK.GetData MSG timer2.enabled = false If MSG = "cmd1" Then timer1.enabled = true End If
تم تعديل هذه المشاركة بواسطة Ala2 VB في 16 يناير 2008 في 07:38
اقتباس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
هذا الموضوع مغلق.