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

سوف تطبق الفكرة بستخدام موقع PasteBin الذي من خلاله يمكنك نشر ملف نصي وعرضه من خلال رابط والمميز في هذا الموقع والأمر الذي سوف يسمح لنا
بتطبيق الفكرة هو أنه يمكنك التعديل على المحتوى الذي بداخل الملف المنشور بدون أن يتغيير الرابط

يوجد ملف نصي بسم version.txt على موقع PasteBin يحتوي على رقم الإصدار الجديد للبرنامج
يوجد ملف نصي ثاني بسم url فيه رابط تحميل الإصدار الجديد

الفكرة
أنو نكتب كود تروح على رابط الملف version.txt تسحب المحتوى الذي بداخله وتضعه في متغيير NewVersion
ثم نقوم بإنشاء متغيير بسم CurrentVersion في الإصدار الحالي للبرنامج

ثم نقوم بالمقارنة بين الإصدار الذي بداخل المتغيير NewVersion مع الإصدار الحالي CurrentVersion
إذا كان الإصدار NewVersion يساوي CurrentVersion يطبع رسالة لايوجد تحديث جديد
وإذا NewVersion أكبر من CurrentVersion يطبع رسالة أنه يوجد تحديث جديد ثم يذهب لقراءة الرابط الذي يحمل اسم url والذي يحتوي على رابط تحميل الاصدار الجديد
ويضع الرابط في متغيير ثم يتم تحميل الملف الذي بداخل المتغيير الذي يحمل رابط الإصدار الجديد

كتبت هذا الكود ولكنه يحتاج إلى أن يتم إكمال أرجو من أصحاب الخبرة والناس التي فهمت الموضوغ إكمال الكود وشكرا لكم


  Dim txt As String = "https://pastebin.com/raw/316wFpv4"
        Dim WC As WebClient = New WebClient()
        Dim Read As StreamReader = New StreamReader(WC.OpenRead(txt))
        Dim NewVersion As String = Read.ReadToEnd

        Dim CurrentVersion As Version
        CurrentVersion = Assembly.GetExecutingAssembly().GetName().Version
الرد }}}
تم الشكر بواسطة: سعود , ابراهيم ايبو
#2
انت ماشاء الله عليك كتبت اصعب الاكواد وما تبقى سهل...لكن ماهو؟
اظن المشكلة هو في النوع ..تحتاج التحويل الى نوع رقم حتى تقارن صحيح؟
 اضف 
PHP كود :
.tostring 
بعد كلمة 
PHP كود :
.version 
لتكون
PHP كود :
.version.tostring 


ثم بتبقى التحويل الى رقم باي نوع تحب سواء
Cint
او غيره
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو , محمد كريّم , asemshahen5
#3
جرب يا باشا دا كدا

http://vb4arb.com/vb/showthread.php?tid=34164

عدل بس على الروابط مش اكتر
إِنْ يَنْصُرْكُمُ اللَّهُ فَلَا غَالِبَ لَكُمْ وَإِنْ يَخْذُلْكُمْ فَمَنْ ذَا الَّذِي يَنْصُرُكُمْ مِنْ بَعْدِهِ وَعَلَى اللَّهِ فَلْيَتَوَكَّلِ الْمُؤْمِنُونَ

لَيْسَ لَهَا مِنْ دُونِ اللَّهِ كَاشِفَةٌ


الرد }}}
تم الشكر بواسطة: asemshahen5


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة عند نقل البرنامج من فيجوال 2013 الى فيجوال 2017 strongriseman 5 149 12-03-24, 10:37 AM
آخر رد: strongriseman
  [VB.NET] تحديث بيانات فى كلاس من جدول سيكوال asdfar1977 6 184 26-02-24, 01:07 AM
آخر رد: asdfar1977
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 112 22-02-24, 12:09 PM
آخر رد: AHMED213
  مطلوب كود الطباعة لهذا البرنامج melad2002 2 234 13-01-24, 06:42 PM
آخر رد: melad2002
  مشكلة تعليق البرنامج في حال عدم وجود ماسح ضوئي متصل بالكمبيوتر صالح عبدالله 1 210 09-01-24, 10:51 PM
آخر رد: صالح عبدالله
  اريد طباعة الباركود المحدد فقط مع الكمية new_programer 5 431 09-01-24, 08:40 PM
آخر رد: new_programer
  اريد مساعدة في العملية الحسابية melad2002 3 406 29-12-23, 09:10 PM
آخر رد: melad2002
  [كود] اريد كود إرسال البيانات من الفيجوال بيسك إلىPDF issamsaidd 10 5,829 25-12-23, 06:30 PM
آخر رد: الحزين اليماني
  [VB.NET] اريد تعديل في الكود عند طباعة DGV abu_hisham7 1 431 03-12-23, 02:40 AM
آخر رد: abu_hisham7
  حل مشكلة بعد تثبيت البرنامج في جهاز العميل Adel27213 3 467 02-12-23, 11:00 PM
آخر رد: justforit

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


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