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

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

الصفحات: 1 2 3 4 5 6

ارسال رسالة الي كمبيوتر في شبكة محلية - atefkhalf2004 - 20-09-15

هناك شبكة داخلية بها عدة اجهزة

كيف  ارسل رسالة الي  احد الاجهزة  في الشبكة

فورم به  2 مربع نص   وزر ارسال

RE: ارسال رسالة الي كمبيوتر في شبكة محلية - atefkhalf2004 - 21-09-15

الاساتذة الافاضل

احناج اي مثال

RE: ارسال رسالة الي كمبيوتر في شبكة محلية - سعود - 21-09-15

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

RE: ارسال رسالة الي كمبيوتر في شبكة محلية - atefkhalf2004 - 21-09-15

السيد القاضل سعود

اكثر من 5 ساعات ولم اصل الي مثال

للعلم بحت في جوجل
ولم اصل الي الكود السليم
برجا مثال

RE: ارسال رسالة الي كمبيوتر في شبكة محلية - سعود - 21-09-15

وهذا الم يلبي المطلوب؟
لو تواصل بالنقاش بدون انقطاع ممكن اقول لك على الطريقة اللي عندي خصوصا لو الاجهزة بالشبكة تتصل بجهاز رئيسي وهذا الجهاز فيه خادم iis

RE: ارسال رسالة الي كمبيوتر في شبكة محلية - atefkhalf2004 - 21-09-15

حضرتك الامثلة لم تنزل download
معلهش
تقبل منا الطلب
مثال من حضرتك

RE: ارسال رسالة الي كمبيوتر في شبكة محلية - abulayth - 21-09-15

تم نقل الموضوع الى قسم الاسئلة

يعطيكم العافية

RE: ارسال رسالة الي كمبيوتر في شبكة محلية - سعود - 21-09-15

(21-09-15, 10:05 PM)atefkhalf2004 كتب : حضرتك   الامثلة  لم  تنزل  download
معلهش
تقبل  منا  الطلب
مثال من حضرتك

اخي الكريم انت شفت الصفحة!!!
المسالة مش محتاجة تحميل مثال لان الكود بسيط ..
PHP كود :
If lstnames.SelectedItems.Count > 0 Then
  For Each strSeleted As String In lstnames.SelectedItems
    'somehow a list item is in fact a string
     Dim strname As String = " " & strSeleted
     Dim lngPos As Long = 1
     Do
         Dim lretval As Long = Shell("net send " & strname & _
    " """ & Mid(strMessage, lngPos, iChunk) & """", vbHide)
         lngPos += iChunk
         'pause to stop out of sequence message chunks
         Sleep(100)
     Loop Until lngPos > Len(strMessage)
     strStatus &= strname.ToString
  Next strSeleted
End If 


RE: ارسال رسالة الي كمبيوتر في شبكة محلية - atefkhalf2004 - 21-09-15

اين نضع رقم الجهاز ip

معلهش تعاون معي
واكمل المثال
كيف ارسل رسالة الي احد الاجهزة في الشبكة

فورم به 2 مربع نص وزر ارسال

RE: ارسال رسالة الي كمبيوتر في شبكة محلية - سعود - 21-09-15

الصراحة اني اكره التقيد بطريقة معينة
وطريقة التراسل ببروتوكلات الشبكات اتعبتني كثيرا ولم اتوصل  لشيء.
الاخوة الفضلاء باذن الله سيدلونك على الطريقة.
لان طريقتي مختلفة نوعا ما.
أعتذر