منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تخزيم المشـروع أستفسـار تكفون يالخبـره - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تخزيم المشـروع أستفسـار تكفون يالخبـره (/showthread.php?tid=21983)



تخزيم المشـروع أستفسـار تكفون يالخبـره - طـلال - 04-10-17

عندي مشـروع وحاب أسوي له تخزيم 

أشلون أضيف ملفات النت فريم ورك + التقارير الكرستال ربورت والأيقونات 

والأٍستفسـار الأخر : 
الآن عند تخزيم المشـروع هل أستطيع عمل نسخه وحده تعمل لنظامين 32 -64 أول لكل نسخه وحدها ..؟


RE: تخزيم المشـروع أستفسـار تكفون يالخبـره - سعود الشامان - 04-10-17

(04-10-17, 09:54 PM)طـلال كتب : عندي مشـروع وحاب أسوي له تخزيم 

أشلون أضيف ملفات النت فريم ورك + التقارير الكرستال ربورت والأيقونات 

والأٍستفسـار الأخر : 
الآن عند تخزيم المشـروع هل أستطيع عمل نسخه وحده تعمل لنظامين 32 -64 أول لكل نسخه وحدها ..؟

أستطيع إجابتك على الإستفسار الآخر

يمكنك إستخدام هذا الكود



كود :
       Dim Is64Bit As Boolean
       Is64Bit = Not String.IsNullOrEmpty(Environment.GetEnvironmentVariable("PROCESSOR_ARCHITEW6432"))
       If Is64Bit Then
           'إذا كان النظام 64 بت

       Else
           'إذا لم يكن النظام 64 بت

       End If






RE: تخزيم المشـروع أستفسـار تكفون يالخبـره - طـلال - 05-10-17

(04-10-17, 10:42 PM)سعود الشامان كتب :
(04-10-17, 09:54 PM)طـلال كتب : عندي مشـروع وحاب أسوي له تخزيم 

أشلون أضيف ملفات النت فريم ورك + التقارير الكرستال ربورت والأيقونات 

والأٍستفسـار الأخر : 
الآن عند تخزيم المشـروع هل أستطيع عمل نسخه وحده تعمل لنظامين 32 -64 أول لكل نسخه وحدها ..؟

أستطيع إجابتك على الإستفسار الآخر

يمكنك إستخدام هذا الكود



كود :
       Dim Is64Bit As Boolean
       Is64Bit = Not String.IsNullOrEmpty(Environment.GetEnvironmentVariable("PROCESSOR_ARCHITEW6432"))
       If Is64Bit Then
           'إذا كان النظام 64 بت

       Else
           'إذا لم يكن النظام 64 بت

       End If



ممكن توضح أكثر عشان أفهم

لقيت شروحات كثير لتخزيم لكن للأسف مافيها ضم النت فريم ورك والكرستال لملف الستب


RE: تخزيم المشـروع أستفسـار تكفون يالخبـره - سعود الشامان - 05-10-17

للأسف لدي معلومات بسيطة عن التخزيم

لكن  النت فريم أفضل ما تحطه مع البرنامج

قم بإخبار العميل او المستخدم بأن يقوم بتحميل النت فريم الإصدار الفلاني وهو يقوم بتنزيله


وهل جربت هذه الطريقة ؟

برنامج inno setup لعمل ملف تنصيب (setup) للبرامج

https://www.youtube.com/watch?v=Y1aLb4vHq20

قم بعمل نسخة 32بت ونسخة 64 بت

وبعد الإنتهاء

إفتح الفيجوال وإعمل شروع جديد

وضع في My.Resources النسختين 32بت و 64 بت



وأستخدم الكود

كود :
Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim Is64Bit As Boolean
       Is64Bit = Not String.IsNullOrEmpty(Environment.GetEnvironmentVariable("PROCESSOR_ARCHITEW6432"))
       If Is64Bit Then
           'إذا كان النظام 64
'قم بفتح النسخة 64


       Else
           'إذا لم يكن النظام 64
'قم بفتح النسخة 32
       End If
   End Sub
End Class

وبخصوص  كيفية تشغيل برنامج من Resources

شوف هذا الموضوع


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


RE: تخزيم المشـروع أستفسـار تكفون يالخبـره - طـلال - 05-10-17

يعطيك العافيه 
بس قابلت مشكله وهي أرفاق النت فريم ورك 4 وتقارير كرستال ريبورت وجدت شرح للأستاذ خالد السعداني 
ولكن لم أجد ملف مكيرسوفت أس دي كي 

وأنا أستخدم فجوال ستديو 2010 

أحتاج ملفات النت فريم ورك و الكرستال ريبورت 

عندي ملفات كرستال ريبورت بس الأستاذ خالد السعداني يقول في شرحه أن لازم تحقق نفس الأصدر 

وما أعرف أوصل للبيانات اللي نفس الأصدار لأني مثبت فجوال 2010 و 2015


RE: تخزيم المشـروع أستفسـار تكفون يالخبـره - سعود الشامان - 05-10-17

الله يعافيك وللأسف لا أسطيع إفادتك أكثر من ذالكك , هذا حد علمي في خصوص هذا الموضوع

إن شاء الله الشباب ما راح يقصرو معكك