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

اريد  سورس كود إظهار معلومات البرنامج المختار من openfiledialog
الرد }}}
تم الشكر بواسطة:
#2
جمعة مباركة للجميع

هل من مجيب لسؤالي
الرد }}}
تم الشكر بواسطة:
#3
وعليكم السلام ورحمة الله وبركاته

والله يباركك بعمرك


تفضل سورس اظهار جميع البرامج مع امكانيات حذف اي برنامج


الملفات المرفقة
.rar   Uninstalle.rar (الحجم : 292.78 ك ب / التحميلات : 36)
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , السندبااد
#4
ربنا يبارك في عمرك اخي سعود على الرد السريع

ولكن قصدي اختار ان الملف بنفسي .. تابع صورة البرنامج

http://www10.0zz0.com/2017/10/06/20/650317452.jpg
الرد }}}
تم الشكر بواسطة: سعود الشامان , سعود الشامان
#5
أعتذر منك اخي فهمتك خطأ

قم بعمل مشروع جديد :-

وضيف فيه :
OpenFileDialog1
Button1
Label1
Label2
Label3
Label4
Label5
Label6
Label7


والصق هذا الكود في حدث الضغط على الزر Button1

كود :
       OpenFileDialog1.Filter = "EXE files (*.exe)|*.exe"
       OpenFileDialog1.FileName = ""
       If OpenFileDialog1.ShowDialog = vbOK Then

           Dim myFileVersionInfo As FileVersionInfo = FileVersionInfo.GetVersionInfo(OpenFileDialog1.FileName)

           If myFileVersionInfo.FileDescription <> "" Then
               Label1.Text = myFileVersionInfo.FileDescription
               Label2.Text = myFileVersionInfo.CompanyName
               Label3.Text = myFileVersionInfo.Language
               Label4.Text = myFileVersionInfo.FileVersion
               Label5.Text = myFileVersionInfo.LegalCopyright
               Label6.Text = myFileVersionInfo.LegalTrademarks
               Label7.Text = myFileVersionInfo.OriginalFilename
           End If

       End If

المشروع بالمرفقات


                Label1.Text = myFileVersionInfo.FileDescription  ' اسم الملف
                Label2.Text = myFileVersionInfo.CompanyName ' اسم الشركة
                Label3.Text = myFileVersionInfo.Language ' لغة الملف
                Label4.Text = myFileVersionInfo.FileVersion ' اصدار الملف
                Label5.Text = myFileVersionInfo.LegalCopyright
                Label6.Text = myFileVersionInfo.LegalTrademarks
                Label7.Text = myFileVersionInfo.OriginalFilename ' اسم الملف الاصلي

بعد الدوت تظهر كل الخيارات الخاصة بعلومات عن الملف



الملفات المرفقة
.rar   GetFileInfo.rar (الحجم : 68.6 ك ب / التحميلات : 29)
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , السندبااد
#6
ربنا يبارك فيك اخي مسعود على الرد

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة عند نقل البرنامج من فيجوال 2013 الى فيجوال 2017 strongriseman 5 126 12-03-24, 10:37 AM
آخر رد: strongriseman
  سورس كود الارسال الى الواتس -يعمل يرجي التعاون للتطوير new_programer 5 210 03-03-24, 08:45 PM
آخر رد: new_programer
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 103 22-02-24, 12:09 PM
آخر رد: AHMED213
  مطلوب كود الطباعة لهذا البرنامج melad2002 2 217 13-01-24, 06:42 PM
آخر رد: melad2002
  مشكلة تعليق البرنامج في حال عدم وجود ماسح ضوئي متصل بالكمبيوتر صالح عبدالله 1 204 09-01-24, 10:51 PM
آخر رد: صالح عبدالله
  [VB.NET] مطلوب سورس كود مبيعات h2551996 2 345 17-12-23, 08:03 PM
آخر رد: dr.programming
  حل مشكلة بعد تثبيت البرنامج في جهاز العميل Adel27213 3 456 02-12-23, 11:00 PM
آخر رد: justforit
  كيف اجعل البرنامج في بداية الشهر ينفذ حدث معين بالاصح اريد البرنامج في تاريخ واحد من Adel27213 3 473 05-11-23, 01:45 AM
آخر رد: justforit
  [VB.NET] كيف اجعل البرنامج يحدد اخر يوم من كل شهر Adel27213 2 351 03-11-23, 06:50 AM
آخر رد: Adel27213
  [سؤال] عمل البرنامج على أى resoluation dr.programming 0 241 02-11-23, 12:08 AM
آخر رد: dr.programming

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


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