[elgokr]

(01-09-18, 06:03 PM)العيدروس كتب : السلام عليكم
اخواني هذا ملف وجدتو بالنت لشخص اسمو حسين الربيعي بارك الله فيه.
لو سمحتو بعد اذنكم ارجو المساعدة ببعض الاضافات
1 - لما اختار صورة من الجهاز بتاعي و اقوم بالحفظ بمجلد المشروع تنمسح الصورة الاصلية من جهازي .. ما ادري ليش من المفروض الصورة الاصلية تبقى على جهازي ولا تنمسح
2 - اضافة زر التعديل و الحذف لما احذف ينحذف المجلد بتاع الشخص يلي حذفتو او عدلت عليه الله يبارك فيكم

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

بخصوص البند رقم 1 وهو حذف الصورة الرئيسية

الحفذ ما هو الا عملية نقل الصورة من المسار الرئيسيى الى المسار الجديد

ولحل هذه المشكلة عليك بالتالى

داخل Sub savedMurfacatfile ستجد هذا السطر

كود :

           My.Computer.FileSystem.MoveFile(CheckedListBox1.SelectedItem, path & "\" & dnames.Name)

قم باستبداله بهذا السطر

كود :

           My.Computer.FileSystem.CopyFile(CheckedListBox1.SelectedItem, path & "\" & dnames.Name, True)

بخصوص البند رقم 2

عند اتمام حذف البيانات كل ما عليك استخدام هذا السطر 

كود :

System.IO.Directory.Delete(path, True)

وهو لحذف المجلد المحدد

كل ما عليك استبدال كلمة path بمسار المجلد المطلوب حذفه

للتوضيح اكثر استخدم بهذا الشكل

كود :

       System.IO.Directory.Delete(Application.StartupPath & "/filesAdd/" & nameFolder, True)

مع تغيير nameFolder الى اسم الضخص اى المجلد المنشاء باسمه

وبخصوص عند التعديل طبق الكود التالى

كود :

       FileIO.FileSystem.RenameDirectory(Application.StartupPath & "/filesAdd/" & nameFolder, NameNew)

مع تغيير كلمة nameFolder لاسم المجلد القديم و NameNew بالاسم الجديد

تحياتى لك

وتمنياتى لك التوفيق