[RaggiTech]

كاتب الموضوع : أحمد جمال

بسم الله الرحمن الرحيم .
السلام عليكم ورحمة الله وبركاته .

مقدمة :
في الدرس السابق من هذه السلسلة تعلمنا كيفية عمل Web Service في أبسط صوره ، كما قمنا بتجربته أيضاً على جهاز المبرمج ، وفي هذا الدرس سوف نتعلم سوية بمشيئة الله تعالى كيفية استخدام هذه الـ Service في المشاريع الأخرى .

الدرس :

لنفترض أننا نريد الاستفادة من خدمة ويب في برنامج مثلاً للعمليات الحسابية ، ونريد أن نستخدم Web Service الذي قمنا به في الدرس السابق والذي يقوم بالتحويل من فهرنهايت إلى درجة مئوية والذي كان له الإسم ConvertSW .

قم الآن بانشاء تطبيق ويندوز عادي ، ومن قائمة Project اختر Add Web Refernce .
سيظهر لك مربع حواري قم باختيار ConvertSW.asmx الذي قمنا ببرمجته في الدرس السابق ، وكخدمة اضافية من Viusal Studio فسيتم عرض الخصائص والدوال التي تحتويها هذه الخدمة .
والآن ننتقل سريعاً إلى الكود ، وإذا كنت مبرمج VB.net فأنت تحتاج إلى أمر بهذا الشكل مثلاً :

كود :

Dim conv As New LocalHost.ConvertSW()

أما إذا كنت مبرمج سي شارب فكما اتفقنا لا فرق إلى في ال Syntex لذا ستغير جملتك لتكون بالشكل التالي :

كود :

LocalHost.ConvertSW conv=new LocalHost.ConvertSW()

والآن قم مثلاً بوضع Textbox1 و Label1 حيث أنك تقوم بادخال درجة الحرارة في الأول وتنتظر لكلي تعرض لك في الثاني ، الكود الكامل لهذه العملية يحتوي على الأمر السابق الخاص بتعريف الأوبجكت conv ، اضافة للسطر التالي :

كود :

Label1.Text = Convert.toString(conv.Convert(textBox1.text))

طبعاً لا تنس اضافة ; لو كنت مبرمج سي شارب ، ولو كنت مبرمج VB.net تأكد من وجود Convert.toString ايضاً في VB.net أو ابحث عن دالة بديلة للتحويل إلى نص String .

خلاص خلصنا . تمت المهمة بنجاح .

التنبيه الأخير قبل انهاء هذه الدرس هو انك إذا قمت بعمل تعديل في الخدمة ، قم في البرنامج الذي يستخدمها بعمل تحديث Update لها عن طريق الضغط عليها بزر الماوس الأيمن ومن ثم اختيار Update Web Reference .

والله الموفق ..
والسلام عليكم ورحمة الله وبركاته .