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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=38411)



اريد طريقة للدوران علي ملفات الرسورسز الخاصة بالبرنامج - أبو عبدالله الحلواني - 07-05-21

السلام عليكم ورحمة الله وبركاته
لدي ملفات بالرسورسز اريد ان استخدم for each لنسخها الي فولدر علي جهاز المستخدم
استخدم هذا الكود لنسخ ملف واحد من الرسورسز في كل مرة 
كود :
File.WriteAllBytes(strDestination & strFile, My.Resources.strFileName, True)

اريد المساعدة في الحصول علي العدد الكلي للملفات أو ان ادور علي كل الملفات داخل الروسورسز

باستخدام for each  أو for 

وجزاكم الله خيرا


RE: اريد طريقة للدوران علي ملفات الرسورسز الخاصة بالبرنامج - march - 08-05-21

(07-05-21, 08:26 PM)أبو عبدالله الحلواني كتب : السلام عليكم ورحمة الله وبركاته
لدي ملفات بالرسورسز اريد ان استخدم for each لنسخها الي فولدر علي جهاز المستخدم
استخدم هذا الكود لنسخ ملف واحد من الرسورسز في كل مرة 
كود :
File.WriteAllBytes(strDestination & strFile, My.Resources.strFileName, True)

اريد المساعدة في الحصول علي العدد الكلي للملفات أو ان ادور علي كل الملفات داخل الروسورسز

باستخدام for each  أو for 

وجزاكم الله خيرا

كود :
Dim res = My.Resources.ResourceManager.GetResourceSet(CultureInfo.CurrentCulture, True, True)
For Each txt In res.OfType(Of Object)().Where(Function(x) TypeOf x.Value Is String)
   File.WriteAllText(strDestination & strFile, txt.value)
Next



RE: اريد طريقة للدوران علي ملفات الرسورسز الخاصة بالبرنامج - أبو عبدالله الحلواني - 10-05-21

PHP كود :
Dim res My.Resources.ResourceManager.GetResourceSet(CultureInfo.CurrentCultureTrueTrue)
For 
Each txt In res.OfType(Of Object)().Where(Function(xTypeOf x.Value Is String)
 
  File.WriteAllText(strDestination strFiletxt.value)
Next 
عند تجربة الكود ظهر لي خطأ عند الجملة 
PHP كود :
res.OfType(Of Object
مفاد رسالة الخطأ أن OfType  ليست من عناصر ResourceSet 
وقد استبدلت OfType  بــ getType  أيضا ظهر خطأ مختلف انه لا يوجد برامترات لـ getType

آسف علي كثرة الأسئلة ولكن هكذا دائما المبتدئين متعبين  Big Grin

ملاحظة: الكود طلب استيراد المكتبة 
PHP كود :
Imports System.Globalization 

وجزاكم الله خيرا

ملاحظة: أخري ربما اختلفت أنواع الملفات في الرسورسز وليست كلها ملفات نصية


RE: اريد طريقة للدوران علي ملفات الرسورسز الخاصة بالبرنامج - أبو عبدالله الحلواني - 16-05-21

كل عام انتم بخير

لم تزل المشكلة قائمة لدي
وجزاكم الله خيرا