زكريا1

hi please answer this quastion : what is the difference between the classes and modules in details? thanks

شكرا اخي دلفي لا كن انا ما اعرف اي شيء عن winsock.API ولا ويش الفرق بينها وبين winsock.cox ادا احد عنده اي شيء مشروح بالتفصيل الممل ارجو ان يقدمه لنستفيد جميعا شكرا

شكرا اختي بنت اليمن ساجرب البرنامج ومع ذلك المشكلة اختي ليست في تقبل اكثر من client ولا كن في اشتغال البرنامج مثلا الحالة الأولى: ادا جربت البرنامج على كمبيوتري يعمل ودلك بستخدام ip address :127.0.0.1 الحالة الثانية: ادا جربت البرنامج على كمبيوترين مختلفين وحط…

شكرا يا اخي كلامك صح خطأ مطبعي 127.0.0.1 بس مثل ما قلت الكود شغال بس على هدا الايبي لكن ادا عندك كمبيوترين موصلين بالنت جرب الكود على الكمبيوترين طبعا بتغير الايبي ip address وراح تشوف اللي اقصده البعض قال لي ان الاداة مو مسجلة وانا اسئل هل النسخهالي عندي فيها…

السلام عليكم ورحمة الله وبركاته الرجاء ان تنظر للموضوع المرفقوتحديد المشكلة البرنامج يعمل على نفس الكمبيوتر بقم الايبي 127.0.0.0 ولكن في حالة تشغيله على كمبيوترين لا يعمل وطبعا غيرة رقم الايبي الى رقم الممبيوتر الثاني ارجو الرد السريع وشكرا zakarya.zip

السلام عليكم الرجاء النظر للمشروع التالي المشكلة هي ادا استخدمة IP:127.0.0.0 يشتغل على كمبيوتري بيرفكت ولا كن ادا استخدمة كمبيوترين وعطيته رقم IP لكمبيوتر زميلي لايعمل البرنامج او بشكل ادق لايفعل اي شيء افيدونا رحمكم الله وافادكم وشكرا zakarya.zip

المشروع يعمل ادا كتبت رقم ip وبعدين كتبته مرت ثانية

برنا مج ال server هو Private Sub Form_Load() wsk.LocalPort = 1234 wsk.Listen Label1.Caption = " LISTENING......." End Sub Private Sub wsk_ConnectionRequest(ByVal requestID As Long) If wsk.State <> 0 Then With wsk .Close .Accept requestID Label1.Caption = " CON…

يوجد برنا مج server لكن المشكلة في بالتحديد في سطر wsk.CONNECT IP.Text, Val(PO.Text) ارجو ملاحضة الخطاء ماهو لا اعلم

السلام عليكم لمادا ادا ادخلت الكود التالي لما ادخل ال IP ADDRESS واضغط كونكت مايصير اي شي ولما ارجع ادخل IP ADDRESS كل شي يصير اوكي ولما استخدم البرنامج على كمبيوترين وادخل ال ip address مايصير كونكت Dim b As Integer Private Sub CONNECT_Click() wsk.Close wsk.C…

Dim b As Integer Private Sub CONNECT_Click() wsk.Close wsk.CONNECT IP.Text, Val(PO.Text) End Sub Private Sub SEND_Click() If wsk.State = 7 Then wsk.SendData " hi bi " DoEvents End If End Sub Private Sub wsk_Connect() Label1.Caption = " CONNECTION IS ESTABLISHE…

السلام عليكم ورحمة الله وبركاته لما اشغل البرنا مج وادخل الip address البرنامج ما يشتغل لكن لما ادخل البرنامج مرة ثانيه البرنامج يشتغل واذا اخليه على كمبيوتر بعيد مايشتغل ليشششششش؟؟؟؟؟؟؟؟؟ Dim b As Integer Private Sub CONNECT_Click() wsk.Close wsk.CONNECT IP.T…