البرنامج مع المرفقات و المشكلة بسيطة هى فى طريقة إرسال البيانات
حيث يكون ال Listbox
1
2
3
و عند الأستقبال 123
بأنتظار المساعدة :rolleyes:
المساعدة فى مشكلة هذا الكود(Winsock و Listbox )
مغلق
xhacker:
لا تعرض موضوع للإغلاق ..
السبب: لا ترفع سؤالك في نفس اليوم وبهذه السرعة ..
لا تستخدم هذا الأسلوب في الرد فقد يثير غضب البعض :D
اقتباسهيا يا شباببأنتظار الحل
اقتباسلا أعتقد أن الموضوع صعب إلى هذا الحدبأنتظار الردود
بإمكانك عمل فاصل بين المعلومات المرسلة ..
ما أعنيه إرسال شئ يفصل بين المعلومات بعد هذه الجملة
WSock.SendData lstMain.List(i)
وإن كان حجم المعلومات المرسلة في كل مرة متساوي فيمكن الإعتماد على هذه القيمة الثابتة لتجزيئة المعلومات المستقبلة ..
بصورة عامة مشكلتك هي في التعامل مع المعلومات المستقبلة فيجب تجزيئتها بشكل ما .... ربما هناك طريقة أخرى ..
تم تعديل هذه المشاركة بواسطة cipher في 19 يونيو 2006 في 12:58
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
معذرة يا أخى :unsure:
و على أى حال المثال بعد حل المشكلة مع المرفقات و لكن توجد مشكلة بسيطة و هى بدون OnErrorResumeNext يحدث خطأ :(
تم تعديل هذه المشاركة بواسطة xhacker في 19 يونيو 2006 في 13:52
اقتباستوجد مشكلة بسيطة و هى بدون OnErrorResumeNext يحدث خطأ
أتقصد إن لم تكن On Error Resume Next مضافة قبل ارسال المعلومات في cmdSend_Click سيحدث خطأ؟
هذا يحدث إن كنت لم تقم بعمل connect to server ...
عليك باضافة شرط لمعرفة حالة التوصيل بين الـ client والـ server .. كالآتي:
Private Sub cmdSend_Click() Dim i As Integer 'On Error Resume Next If WSock.State = sckConnected Then For i = 0 To lstMain.ListCount - 1 WSock.SendData "|" & lstMain.List(i) & "|" Next i End If End Sub
إن كان قصدك شئ آخر فعليك كتابة المشكلة بوضوح أكثر ...
"First they ignore you, then they laugh at you, then they attack you, then you win"
===
اقتباسحُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا
هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا
الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا
القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ
لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ
البردوني "أبو تمام وعروبة اليوم" 1971
===
اقتباسعبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــمو تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم
ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم
أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟
ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا
البردوني "نحن و الحاكمون "
لماذا لا تجمع كل ما في اللست و ارساله
dim i as integer dim x as string for i = 0 to list.listCount - 1 x = x & list.List(i) & vbcrlf next i sock.sendData x
راكان الحنيطي
Be Open Source
لأن المطلوب هو أن يستقبل الجزء الأخر من البرنامج القائمة فى Listbox أيضا و ليس فى صورة نص عادى
هذا الموضوع مغلق.