بسم الله الرحمن الرحيم
عساكم بخير شباب
اول موضوع لي بلمنتدا
خشيت باصدفة وشفة ولا في موضوع
قلت احط مواضيع ترفع راس المنتدا
بسم الله الرحمن الرحيم
كيفكم شباب واعضاء المنتدا الغالى
اليوم جايب لكم شرح مصور لبرمجة برنامج
خادم وعميل بلفيجوال بيسك 6
نبدا الدرس وتابعو وركزو على الصور والاكواد
والشرح من تصميمي
يالله نبدا
ا
افتح الفيجوال وسوي مثل الصورة
تابع الصور
بعد ماخترنا ه>>>>>>>>>هذ الشكل الى فوق
تابع ويش بنسوي الحين
حطينا الاداة في الفروم بعد مضهرة على شريط الادوات
تابع
تابع
تابع الكود
تابع
تابع
تابع
تابع
تابع
تابع وركز
تابع
الحين جربنا البرنامج
باقي الاكواد
حط هذا في الكود في تايمر
Label2.Caption = Winsock1.State
وهذا الكود في زر اتصال
Winsock1.Connect Text1.text, 100
وهذا الكود في زر قطع الاتصال
Winsock1.Close
وهذا الكود في
زر ارسال
Winsock1.SendData Text2.Text
بس مرح يرسال ولا يستقبل لان البرنامج الثاني لسا بنبرمجة الحين
تابع
خلى المشروع الاول مفتوح
ثم قم بفتح
الفيجوال
مرة ثانية من سطح المكتب
ثم تابع
هذا مشروع جديد البرنامج الثاني لكي نتصل عليه من البرنامج الاول اذا ارسلناه لضاحية يعتبر البرنامج الثاني بمثابة رسرفر
تابع
تابع الادوات
تابع
تابع
تابع
تابع
الحين للاكواد
هذا الكود في الفروم
اضغط عليه مرتين ثم الصق الكود فيه
Winsock1.LocalPort = 100
Winsock1.Listen
وهذا الكود في الخاصيةConnectionRequest
Winsock1.Close
Winsock1.Accept requestID
وهذا في الحدثDataArrival
Dim s As String
Winsock1.GetData s
MsgBox s
انتهينا من الاكواد الحين نجرب البرنامج
انتها
الشرح
اى استفسار انا حاضر
جميع الحقوق محفوضة
لhtt
او حمل البرنامجين مع الشرح من الرابك
او
http://arabsh.com/fp2gqudkv6x5.htmlمجلد_جديد.rar - 60.5 Kb جميع الحقوق محفوضة ل htt