تقييم الموضوع :
  • 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
تسلمون يااخوان ... فعلا الان كل شي تمام
الله يعطيكم العافية
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل هناك كتاب معرب للvb2015? omferas 0 31 05-02-17, 08:58 AM
آخر رد: omferas
  ما هو كود تحديث عمود الاسعار فى جدول SQL السيد الجوهري 1 90 31-01-17, 09:40 AM
آخر رد: مساعدة
  هل هناك مراجع أو كتب أو دروس لشرح devexpress بالعربي ndjakoub 4 2,875 25-01-17, 04:54 AM
آخر رد: aBoFaiSaL
  [VB.NET] مشكلة عند عمل تحديث للبيانات Asmaa adel 3 190 27-11-16, 03:56 PM
آخر رد: Adrees
  [سؤال] هل يلزم تثبيت SQL Server في جهاز الزبون الذي ستبيع له برنامجك ام هناك طريقة اخرى؟ thevirus 3 302 06-11-16, 07:51 PM
آخر رد: العواد الصغير
  [VB.NET] كيفية عمل كود ب vb.net يعمل على تحديث جميع السجلات في الداتا بيز بشرط معين thevirus 2 222 24-10-16, 06:45 AM
آخر رد: thevirus
  [سؤال] رجاء المساعدة البرنامج لا يعمل تحديث للبيانات Asmaa adel 3 276 16-10-16, 09:48 AM
آخر رد: Asmaa adel
  [VB.NET] هل هناك كود يشبه this في VB.NET sniperjawadino 6 270 02-09-16, 09:51 PM
آخر رد: khodor1985
  [VB.NET] اريد تحديث برنامجي من عن بعد medoddd 1 250 27-08-16, 12:21 PM
آخر رد: سعود
  تحديث البيانات في الكريستال ريبورت محمد خلف زكي 0 163 06-08-16, 10:16 PM
آخر رد: محمد خلف زكي

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


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