08-09-15, 12:29 PM
08-09-15, 12:32 PM
اذا لديك الفيجوال كامل بما فيه web developer انقر ملف ثم فتح موقع File>Open Website
08-09-15, 03:49 PM
سلام
استخدمت EscapeUriString و UnescapeDataString ونجحت، لا ادري اذا هذا الاسلوب هو الصحيح ام يوجد حل افضل
يخصوص المكتبي فقط هذا السطر
بخصوص الوب - استخدمت الشرط عشان ما يظهر خطا nothong
![[صورة مرفقة: 1441709275041.png]](http://store1.up-00.com/2015-09/1441709275041.png)
كانني فهم ما ترمي اليه، اذا لو تستخدم الوب سيرفس فهي افضل بكثير واسهل.
موفقين
استخدمت EscapeUriString و UnescapeDataString ونجحت، لا ادري اذا هذا الاسلوب هو الصحيح ام يوجد حل افضل
يخصوص المكتبي فقط هذا السطر
كود :
lblstate.Text = System.Uri.UnescapeDataString(res.Headers("ok"))بخصوص الوب - استخدمت الشرط عشان ما يظهر خطا nothong
كود :
If un IsNot Nothing Then Response.AddHeader("ok", System.Uri.EscapeUriString(un))
'If un IsNot Nothing Then Response.Headers.Add("ok", System.Uri.EscapeUriString(un))![[صورة مرفقة: 1441709275041.png]](http://store1.up-00.com/2015-09/1441709275041.png)
كانني فهم ما ترمي اليه، اذا لو تستخدم الوب سيرفس فهي افضل بكثير واسهل.
موفقين
08-09-15, 06:10 PM
ماشاء الله لا قوة الا بالله
الصراحة لا ادري ماهو الاسلوب الانسب كل اللي اريد اعرفه لماذا النص لا يرجع كما هو اما الان وجدت الحل على يدك.
لكن كيف الويب سيرفس؟
الفكرة هذي فحص بيانات مرسلة من تطبيق مكتبي .
الصراحة لا ادري ماهو الاسلوب الانسب كل اللي اريد اعرفه لماذا النص لا يرجع كما هو اما الان وجدت الحل على يدك.
لكن كيف الويب سيرفس؟
الفكرة هذي فحص بيانات مرسلة من تطبيق مكتبي .
08-09-15, 06:25 PM
بالنسبة لي ما ضبط معي حتى مع
Response.Write(un)
Response.Write(un)
08-09-15, 07:29 PM
(08-09-15, 06:25 PM)أبو عمر كتب : [ -> ]بالنسبة لي ما ضبط معي حتى مع
Response.Write(un)
تحتاج طريقة اكيد.
المهم ان الاستقبال يعمل .. والان ساكمل التجربة وارفع المثال(باذن الله)
08-09-15, 08:27 PM
سلام
لعمل وب سيرفس
نعمل مشروع جديد ونختار من مجموعت Web المشروع ASP.NET Empty Web Application
![[صورة مرفقة: 1441727616611.png]](http://store2.up-00.com/2015-09/1441727616611.png)
بعد ما يفتح المشروع طبعا فاضي لاننا اخترنا Empty نقوم نضيف له Web Service عن طريق Add New Item او اختصارا الضغط على الازارير الثلاثه (Ctrl + Shift + A) وهنا نحدد اسم مناسب للوب سيرفس
![[صورة مرفقة: 144172761672.png]](http://store2.up-00.com/2015-09/144172761672.png)
تظهر صفحت الكود وننشا فنكشن مثل التالي - ولازم ننتبه لاهميت وجود الباترن WebMethod قبل اسم الفنكشن وطبعا لازم يكون Public
![[صورة مرفقة: 1441727616823.png]](http://store2.up-00.com/2015-09/1441727616823.png)
الان نقوم بتشغيل مشروع الوب سيرفس وراح يفنح المتصفح - المهم هنا ننسخ العنوان كامل عشان مشروع الويندوز اللتي حيتعامل معاه
![[صورة مرفقة: 1441727616914.png]](http://store2.up-00.com/2015-09/1441727616914.png)
نعمل مشروع ويندوز ونضيف مرجع للخدمه ولكن هنا نختار Add Service Reference تجدها من القائمه Project
![[صورة مرفقة: 14417276175.png]](http://store2.up-00.com/2015-09/14417276175.png)
تفتح نافذه نقوم بلصف عنوان الصفحه اللي نسخناه في Address ونضغط Go فيبحث عن الوب سيرفس فاذا وجدها تظهر في قائمت Sevices ضع اسم مناسب لمرجع الخدمه في Namespace
![[صورة مرفقة: 1441727617096.png]](http://store2.up-00.com/2015-09/1441727617096.png)
سنجد بعد قليل انه تمت اضافت مرجع الخدمه في قائمت ملفات المشروع
![[صورة مرفقة: 1441727698511.png]](http://store2.up-00.com/2015-09/1441727698511.png)
نقوم باضافت زر ومربع نص ونضع هذا الكود
ونلاحظ في الكود اننا اخترنا الذي ينتهي ب SoapCleint مع اسم مرجع الخدمه
وهذه النتيجه ختى مع اللغه العربيه التي لم تطلب اي تشفير
![[صورة مرفقة: 1441727698592.png]](http://store2.up-00.com/2015-09/1441727698592.png)
تستطيع وضع الكثير من الفنكشن في الوب سيرفس الواحد التي تادي الخدمات التي تريها
وذا اردت تجربتها على موقع يدعم ASP.NET اخبرني
موفقين
لعمل وب سيرفس
نعمل مشروع جديد ونختار من مجموعت Web المشروع ASP.NET Empty Web Application
![[صورة مرفقة: 1441727616611.png]](http://store2.up-00.com/2015-09/1441727616611.png)
بعد ما يفتح المشروع طبعا فاضي لاننا اخترنا Empty نقوم نضيف له Web Service عن طريق Add New Item او اختصارا الضغط على الازارير الثلاثه (Ctrl + Shift + A) وهنا نحدد اسم مناسب للوب سيرفس
![[صورة مرفقة: 144172761672.png]](http://store2.up-00.com/2015-09/144172761672.png)
تظهر صفحت الكود وننشا فنكشن مثل التالي - ولازم ننتبه لاهميت وجود الباترن WebMethod قبل اسم الفنكشن وطبعا لازم يكون Public
كود :
<WebMethod()> _
Public Function HelloUser(ByVal un As String) As String
Return "مرحبا بك: " & un
End Function![[صورة مرفقة: 1441727616823.png]](http://store2.up-00.com/2015-09/1441727616823.png)
الان نقوم بتشغيل مشروع الوب سيرفس وراح يفنح المتصفح - المهم هنا ننسخ العنوان كامل عشان مشروع الويندوز اللتي حيتعامل معاه
![[صورة مرفقة: 1441727616914.png]](http://store2.up-00.com/2015-09/1441727616914.png)
نعمل مشروع ويندوز ونضيف مرجع للخدمه ولكن هنا نختار Add Service Reference تجدها من القائمه Project
![[صورة مرفقة: 14417276175.png]](http://store2.up-00.com/2015-09/14417276175.png)
تفتح نافذه نقوم بلصف عنوان الصفحه اللي نسخناه في Address ونضغط Go فيبحث عن الوب سيرفس فاذا وجدها تظهر في قائمت Sevices ضع اسم مناسب لمرجع الخدمه في Namespace
![[صورة مرفقة: 1441727617096.png]](http://store2.up-00.com/2015-09/1441727617096.png)
سنجد بعد قليل انه تمت اضافت مرجع الخدمه في قائمت ملفات المشروع
![[صورة مرفقة: 1441727698511.png]](http://store2.up-00.com/2015-09/1441727698511.png)
نقوم باضافت زر ومربع نص ونضع هذا الكود
ونلاحظ في الكود اننا اخترنا الذي ينتهي ب SoapCleint مع اسم مرجع الخدمه
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ws As New CheckMeReference.CheckMeSoapClient
MsgBox(ws.HelloUser(TextBox1.Text))
End Subوهذه النتيجه ختى مع اللغه العربيه التي لم تطلب اي تشفير
![[صورة مرفقة: 1441727698592.png]](http://store2.up-00.com/2015-09/1441727698592.png)
تستطيع وضع الكثير من الفنكشن في الوب سيرفس الواحد التي تادي الخدمات التي تريها
وذا اردت تجربتها على موقع يدعم ASP.NET اخبرني
موفقين
08-09-15, 08:28 PM
جميلة مع الاجاكس خصوصا في البحث واظهار قوائم منسدلة الخ
لكن لم اجرب استخدامها مع ويندوز ابليكشن
مشروع الاستاذ سعود فيه قراءة من جدول والتحقق من وجود او عدم وجود وبعجها يتم الرد لنفس البرنامج
سعود دائما يجيب افكار تبهذل تفكيري
لكن نرجع ونقول
كل الطرق تودي لروما
لكن لم اجرب استخدامها مع ويندوز ابليكشن
مشروع الاستاذ سعود فيه قراءة من جدول والتحقق من وجود او عدم وجود وبعجها يتم الرد لنفس البرنامج
سعود دائما يجيب افكار تبهذل تفكيري
لكن نرجع ونقول
كل الطرق تودي لروما
08-09-15, 08:50 PM
الطريقة ممتازة جدا ولاول مرة ارى لها طريق.
الجزئية هذي انتهيت منها.
كما اني شلت(نزعت) من راسي دالة gd لانها غير عملية البتة.
احاول اتذكر المقارنة بين التواريخ من نمط Shortdate
ومعرفة كم بقي يوم.
الجزئية هذي انتهيت منها.
كما اني شلت(نزعت) من راسي دالة gd لانها غير عملية البتة.
احاول اتذكر المقارنة بين التواريخ من نمط Shortdate
ومعرفة كم بقي يوم.
08-09-15, 09:05 PM
سلام
ما هي الدله gd
ماذا تقصد (المقارنة بين التواريخ من نمط Shortdate ومعرفة كم بقي يوم)؟
موفقين
ما هي الدله gd
ماذا تقصد (المقارنة بين التواريخ من نمط Shortdate ومعرفة كم بقي يوم)؟
موفقين