تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
هناك مشكه في كود يطلب تحديث في كل مره
#1
هناك مشكه في كود انه عند تشغيل البرنامج اكثر من مره سوف يطلب تحديث في كل مره وهذا عبيب برنامج , إذا تم تحديث الاصدار لا تظهر الرساله مره اخرى عن وجود تحديث جديده و في الواقع لا يوجد تحديث جديد .

كود :
Dim regust As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("")
        Dim respnos As System.Net.HttpWebResponse = regust.GetResponse
        Dim sr As System.IO.StreamReader = New System.IO.StreamReader(respnos.GetResponseStream)
        Dim virsion As String = sr.ReadToEnd
        Dim update As String = Application.ProductVersion

        If virsion.Contains(update) Then

        Else
            AskUpdate.Show()

            'MsgBox("Available for you download the new version")
        End If

انا اريد فقط اظهار او اشعار عن وجود تحديثات الجديده فقط
الرد }}}}
تم الشكر بواسطة:
#2
كتبت رايي في موضوع هنا وهو الافضل وضع رقم للاصدار فقط ويقارن بالحالي
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
رحمك الله أبا الليث
الرد }}}}
تم الشكر بواسطة:
#3
كود :
Dim regust As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("الرابط")

الكود ناقص رابط الملف الموجود على الاستظافة ليقراء رقم الاصدار
الرد }}}}
تم الشكر بواسطة:
#4
كود :
Dim regust As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://tariq2812.com/uploads/1/up.txt")
        Dim respnos As System.Net.HttpWebResponse = regust.GetResponse
        Dim sr As System.IO.StreamReader = New System.IO.StreamReader(respnos.GetResponseStream)
        Dim virsion As String = sr.ReadToEnd
        Dim update As String = Application.ProductVersion


        If CInt(virsion.Replace(".", "")) > CInt(update.Replace(".", "")) Then

            MsgBox("يوجد نسخة حديثة")
        Else
            MsgBox("النسخة محدثة")

        End If
الرد }}}}
تم الشكر بواسطة:
#5
تسلمون يااخوان ... فعلا الان كل شي تمام
الله يعطيكم العافية
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  عند استدعاء تقرير يطلب مني كلمة السر لقاعدة البيانات samawi 3 109 05-05-17, 10:24 PM
آخر رد: samawi
  [VB.NET] هل هناك كود افضل من هذا لمشكلة الترقيم التلقائي ؟ 0theghost0 0 116 23-03-17, 07:32 PM
آخر رد: 0theghost0
  هل هناك كتاب معرب للvb2015? omferas 0 55 05-02-17, 08:58 AM
آخر رد: omferas
  ما هو كود تحديث عمود الاسعار فى جدول SQL السيد الجوهري 1 197 31-01-17, 09:40 AM
آخر رد: مساعدة
  هل هناك مراجع أو كتب أو دروس لشرح devexpress بالعربي ndjakoub 4 3,501 25-01-17, 04:54 AM
آخر رد: aBoFaiSaL
  [VB.NET] مشكلة عند عمل تحديث للبيانات Asmaa adel 3 285 27-11-16, 03:56 PM
آخر رد: Adrees
  [سؤال] هل يلزم تثبيت SQL Server في جهاز الزبون الذي ستبيع له برنامجك ام هناك طريقة اخرى؟ thevirus 3 397 06-11-16, 07:51 PM
آخر رد: العواد الصغير
  [VB.NET] كيفية عمل كود ب vb.net يعمل على تحديث جميع السجلات في الداتا بيز بشرط معين thevirus 2 262 24-10-16, 06:45 AM
آخر رد: thevirus
  [سؤال] رجاء المساعدة البرنامج لا يعمل تحديث للبيانات Asmaa adel 3 347 16-10-16, 09:48 AM
آخر رد: Asmaa adel
  [VB.NET] هل هناك كود يشبه this في VB.NET sniperjawadino 6 341 02-09-16, 09:51 PM
آخر رد: khodor1985

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم