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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : مشكلة في اداة ونسوك 2 (/showthread.php?tid=10245)



مشكلة في اداة ونسوك 2 - ahmed3d - 26-08-13

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


مشكلة في اداة ونسوك 2 - VB_Coder - 27-08-13

السلام عليكم

- الكود صحيح في برنامج الإستقبال . لكن الكود في برنامج الإرسال فيه أخطاء بسيطه و وهذه الأسطر التي كان فيها خطأ , بعد التعديل :

كود :
Private Sub Command2_Click()
wsk.SendData "Text" + Text1.Text
End Sub

Private Sub Command3_Click()
wsk.SendData "mgbx" + Text1.Text
End Sub

Private Sub Command4_Click()
wsk.SendData "capt" + Text1.Text
End Sub

- تحياتي .


مشكلة في اداة ونسوك 2 - ahmed3d - 27-08-13

اخي في بي كود لرسالة لما توصل للمستقبل يطلعلي انو في غلط بالدالة lift ارجو انك تكون جربت البرنامج بعد التعديل


مشكلة في اداة ونسوك 2 - VB_Coder - 27-08-13

السلام عليكم

- المثال يعمل عندي جيدا , بعد التعديل البسيط الذي قلته في ردي السابق , ولاتوجد دالة Left في المثال , فقط دالة Mid , أرفقت لك المثال بعد التعديل .
- تحياتي .


مشكلة في اداة ونسوك 2 - ahmed3d - 28-08-13

اسف اخي انا كنت عامل دالة lift بعدين عدلتها عشان اجيب ال٤ حروف ااولى كنت عامل
s=lift(4,s)w
حرف الw زيادة لانو رد سريع ما في كود و شكرا على المثال