+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=10158)
الصفحات:
1
2
حذف مجلد به ملفات ادارية - ali.alfoly - 20-08-13
السلام عليكم عملت مجلد به ملفات جعلت خاصيه الملفات اتها
System و Hidden و ReadOnly
فعند حذف هذا المجلد لايستطيع حذف هذا الملف فكيف استطيع حذف مجلد مهما كان به
فعند حذف هذا المجلد لايستطيع حذف هذا الملف فكيف استطيع حذف مجلد مهما كان به
حذف مجلد به ملفات ادارية - ali.alfoly - 20-08-13
عملت نفسى لائيم هههههههههه
كود :
[color=#0000FF]Dim[/color][color=#000000] Pth [/color][color=#0000FF]As[/color] [color=#0000FF]String[/color][color=#000000] = [/color][color=#A31515]"مسار المجلد"[/color]
[color=#0000FF]For[/color] [color=#0000FF]Each[/color][color=#000000] Fil [/color][color=#0000FF]As[/color] [color=#0000FF]String[/color] [color=#0000FF]In[/color][color=#000000] IO.[/color][color=#2B91AF]Directory[/color][color=#000000].GetFileSystemEntries(Pth)[/color]
[color=#000000] IO.[/color][color=#2B91AF]File[/color][color=#000000].SetAttributes(Fil, IO.[/color][color=#2B91AF]FileAttributes[/color][color=#000000].System [/color][color=#0000FF]Xor[/color][color=#000000] IO.[/color][color=#2B91AF]FileAttributes[/color][color=#000000].System)[/color]
[color=#0000FF]Next[/color]
[color=#000000] System.IO.[/color][color=#2B91AF]Directory[/color][color=#000000].Delete(Pth, [/color][color=#0000FF]True[/color][color=#000000])[/color]حذف مجلد به ملفات ادارية - سعود - 20-08-13
ياليت تشرح الكود .. الظاهر انه خطير
حذف مجلد به ملفات ادارية - ali.alfoly - 20-08-13
عملت جلب لكل الملفات الادارية الموجودة على المسار المطلوب ووضعتها فى تكرار
قمت بالغاء خاصية System لكل الملفات عن طريق الدالة SetAttributes فهى دالة خطيرة جدا
يمكنك التعديل على خصائص اى ملف مهما كان ولمعرفة هذه الدالة
ثم بعد ذلك قمت بحذف المجلد وانا مطمئن
حذف مجلد به ملفات ادارية - hoob computer - 21-08-13
كود خطير جداً
حذف مجلد به ملفات ادارية - hoob computer - 21-08-13
لكن لو كان على وندوز 7 أو وندوز 8, فهل تحتاج إلى تصريح administrator لتغيير و مسح هكذا ملفات؟ بإعتبار أن هذه الملفات هي ملفات نظام
حذف مجلد به ملفات ادارية - ali.alfoly - 21-08-13
انا شغال على ويندوز 7
اصلا انا لم اعتمد على المسح المباشر
انا غيرت خاصية السيستم ثم قمت بالحذف
حذف مجلد به ملفات ادارية - MSDOS - 21-08-13
ali.alfoly كتب :عملت نفسى لائيم هههههههههه
كود :
[color=#0000FF]Dim[/color][color=#000000] Pth [/color][color=#0000FF]As[/color] [color=#0000FF]String[/color][color=#000000] = [/color][color=#A31515]"مسار المجلد"[/color]
[color=#0000FF]For[/color] [color=#0000FF]Each[/color][color=#000000] Fil [/color][color=#0000FF]As[/color] [color=#0000FF]String[/color] [color=#0000FF]In[/color][color=#000000] IO.[/color][color=#2B91AF]Directory[/color][color=#000000].GetFileSystemEntries(Pth)[/color]
[color=#000000] IO.[/color][color=#2B91AF]File[/color][color=#000000].SetAttributes(Fil, IO.[/color][color=#2B91AF]FileAttributes[/color][color=#000000].System [/color][color=#0000FF]Xor[/color][color=#000000] IO.[/color][color=#2B91AF]FileAttributes[/color][color=#000000].System)[/color]
[color=#0000FF]Next[/color]
[color=#000000] System.IO.[/color][color=#2B91AF]Directory[/color][color=#000000].Delete(Pth, [/color][color=#0000FF]True[/color][color=#000000])[/color]
تسمحلي بتصحيح بسيط
كود :
Dim Pth As String = "مسار المجلد"
For Each Fil As String In IO.Directory.GetFileSystemEntries(Pth)
IO.File.SetAttributes(Fil, [color=#FF0000]IO.File.GetAttributes(Fil) And Not IO.FileAttributes.System[/color])
Next
System.IO.Directory.Delete(Pth, True)حذف مجلد به ملفات ادارية - ali.alfoly - 21-08-13
جزاك الله خيرا اخى الحبيب
MSDOS ممكن توضيح لانى لا اعرف
GetAttributes
حذف مجلد به ملفات ادارية - MSDOS - 22-08-13
GetAttributes هي قراءة سمات الملف لنغير ما نحتاج لتغييرة من سمات دون التأثير على السمات الأخرى
ممكن تقول لي وليه التعب دة طالما أنا راح أحذف الملف أو المجلد
حرد عليك وأقول من خلال متابعتي لمواضيعك وجدت أنك تريد الشغل المرتب (زي اتجاه الأستاذ أبو إيهاب في البرمجة الاحترافية)، لذلك حتى لو بتحذف شيء احذفة بشغل مرتب ليكون هذا سلوكك في البرمجة الاحترافية.
OR لإضافة سمه.
And Not لحذف سمة.
هذه معلومات زائدة
شكل السمات في الذاكرة
كود :
FFFF (Word)
┌───────╨───────┐
FF (Byte) FF (Byte)
┌───╨───┐ ┌───╨───┐
F F F F
┌─┬╨┬─┐ ┌─┬╨┬─┐ ┌─┬╨┬─┐ ┌─┬╨┬─┐
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 File Attribute Bits
│ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │
│ │ │ │ │ │ │ │ │ │ │ │ │ │ │ └──── 1 ReadOnly
│ │ │ │ │ │ │ │ │ │ │ │ │ │ └────── 2 Hidden
│ │ │ │ │ │ │ │ │ │ │ │ │ └──────── 4 System
│ │ │ │ │ │ │ │ │ │ │ │ └────────── 8 --------
│ │ │ │ │ │ │ │ │ │ │ └──────────── 16 Directory
│ │ │ │ │ │ │ │ │ │ └────────────── 32 Archive
│ │ │ │ │ │ │ │ │ └──────────────── 64 Device
│ │ │ │ │ │ │ │ └────────────────── 128 Normal
│ │ │ │ │ │ │ └──────────────────── 256 Temporary
│ │ │ │ │ │ └────────────────────── 512 SparseFile
│ │ │ │ │ └──────────────────────── 1024 ReparsePoint
│ │ │ │ └────────────────────────── 2048 Compressed
│ │ │ └──────────────────────────── 4096 Offline
│ │ └────────────────────────────── 8192 NotContentIndexed
│ └──────────────────────────────── 16384 Encrypted
└────────────────────────────────── 32768 --------العمليات المنطقية
كود :
OR
╔═══╤═══╤═════════╗
║ A │ B │ A or B ║
╠═══╪═══╪═════════╣
║ 0 │ 0 │ 0 ║
╟───┼───┼─────────╢
║ 0 │ 1 │ 1 ║
╟───┼───┼─────────╢
║ 1 │ 0 │ 1 ║
╟───┼───┼─────────╢
║ 1 │ 1 │ 1 ║
╚═══╧═══╧═════════╝
XOR
╔═══╤═══╤═════════╗
║ A │ B │ A xor B ║
╠═══╪═══╪═════════╣
║ 0 │ 0 │ 0 ║
╟───┼───┼─────────╢
║ 0 │ 1 │ 1 ║
╟───┼───┼─────────╢
║ 1 │ 0 │ 1 ║
╟───┼───┼─────────╢
║ 1 │ 1 │ 0 ║
╚═══╧═══╧═════════╝
NOR
╔═══╤═══╤═════════╗
║ A │ B │ A nor B ║
╠═══╪═══╪═════════╣
║ 0 │ 0 │ 1 ║
╟───┼───┼─────────╢
║ 0 │ 1 │ 0 ║
╟───┼───┼─────────╢
║ 1 │ 0 │ 0 ║
╟───┼───┼─────────╢
║ 1 │ 1 │ 0 ║
╚═══╧═══╧═════════╝
XNOR
╔═══╤═══╤═════════╗
║ A │ B │ A xnor B║
╠═══╪═══╪═════════╣
║ 0 │ 0 │ 1 ║
╟───┼───┼─────────╢
║ 0 │ 1 │ 0 ║
╟───┼───┼─────────╢
║ 1 │ 0 │ 0 ║
╟───┼───┼─────────╢
║ 1 │ 1 │ 1 ║
╚═══╧═══╧═════════╝
AND
╔═══╤═══╤═════════╗
║ A │ B │ A and B ║
╠═══╪═══╪═════════╣
║ 0 │ 0 │ 0 ║
╟───┼───┼─────────╢
║ 0 │ 1 │ 0 ║
╟───┼───┼─────────╢
║ 1 │ 0 │ 0 ║
╟───┼───┼─────────╢
║ 1 │ 1 │ 1 ║
╚═══╧═══╧═════════╝
NAND
╔═══╤═══╤═════════╗
║ A │ B │ A nand B║
╠═══╪═══╪═════════╣
║ 0 │ 0 │ 1 ║
╟───┼───┼─────────╢
║ 0 │ 1 │ 1 ║
╟───┼───┼─────────╢
║ 1 │ 0 │ 1 ║
╟───┼───┼─────────╢
║ 1 │ 1 │ 0 ║
╚═══╧═══╧═════════╝