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

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



عملية نسخ الملفات لمسارات ذوات مستخدمين مختلفين - طالب 22 - 31-07-16

السلام عليكم ورحمة الله وبركاته

ومتابعة لمسيرتي العملية العلمية قمت بتصفح الكودات في الفيجوال بيسك لكي اتمكن من هذه اللغه

فاحببت ابدا بالاساسيات ووجدت كود نسخ الملفات

كود :
My.Computer.FileSystem.CopyFile("C:\Users\admin\new folder\1.doc", "C:\Users\admin\aa\1.doc", True)

ولنفرض ان اسم المستخدم في جهاز اخونا ادريس هو ادريس
وفلان هو فلان
وعلان هو علان
ولنفرض ان اسم المستخدم في جهاز اخونا علي هو علي

ولنفرض ان اسم المستخدم في جهاز اخونا الوادي هو wadi
ولنفرض ان اسم المستخدم في جهاز اخونا سعود هو  سعود

والكاتب هو الكاتب
طبعا عملية النسخ لن تتم بسبب اختلاف المستخدمين

اعتقد لابد من تعريف مسار المستخدم
كالتالي
Dim userpath As String = Environment.GetFolderPath(Environment.SpecialFolder.UserProfile)

بس لما اضع المتغير في الكود يجي لي رسالة خطأ في كتابة الكود


RE: عملية نسخ الملفات لمسارات ذوات مستخدمين مختلفين - الوادي - 31-07-16

كود Environment اللي وضعته يأتيك بمسار مجلد المستخدم ولكن لا تنتهي بعلامة (\)
كود :
C:\Users\admin

فلو وضعت بقيت المسار بعد userpath المستخدم مباشرة مثل
كود :
userpath & "new folder\1.doc"
سيكون الناتج
كود :
"C:\Users\adminnew folder\1.doc"

يعني المفروض إضافة علامة (\) مثل
كود :
userpath  & "\" & "new folder\1.doc"

النقطة الثانية مسألة الصلاحيات
فهناك مسارات لا يمكن الدخول لها الا بصلاحية مسؤول


RE: عملية نسخ الملفات لمسارات ذوات مستخدمين مختلفين - طالب 22 - 01-08-16

مدري وش اقول عنه ساحر يوم علم مشكلتي بالضبط ام انه عبقري زمانه يوم حلل مشكلتي واعطاني الحل السريع