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

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



ممكن كود فيجوال بيسك نقل ملف من ريسورس الى مستندات - jam3h - 22-12-20

ممكن كود فيجوال بيسك نقل ملف من ريسورس الى مستندات
لدي هذا الكود ولكن لم يعمل
My.Computer.FileSystem.WriteAllBytes("C:\Users/%username%/Documents\/salem.png", My.Resources.salem_png, False)


RE: ممكن كود فيجوال بيسك نقل ملف من ريسورس الى مستندات - alfaiz678 - 23-12-20

(22-12-20, 09:33 PM)jam3h كتب : ممكن كود فيجوال بيسك نقل ملف من ريسورس الى مستندات
لدي هذا الكود ولكن لم يعمل
My.Computer.FileSystem.WriteAllBytes("C:\Users/%username%/Documents\/salem.png", My.Resources.salem_png, False)

جرب
كود :
 IO.File.Copy("D:\New Folder\Entypo_2389_0__64.png", My.Resources._114.ToString)



RE: ممكن كود فيجوال بيسك نقل ملف من ريسورس الى مستندات - jam3h - 23-12-20

alfaiz678
لم يعمل الكود ربما الخطا %username% هل هذا كود يوزر لاي مستخدم.؟


RE: ممكن كود فيجوال بيسك نقل ملف من ريسورس الى مستندات - Ngm - 23-12-20

(23-12-20, 11:38 AM)jam3h كتب : alfaiz678
لم يعمل الكود ربما الخطا %username% هل هذا كود يوزر لاي مستخدم.؟

لتعرف مسار المستندات
كود :
Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)

وهذا التعديل
كود :
My.Resources.salem_png.Save(Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments) & "\salem.png")