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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] تجميد أي ملف (/showthread.php?tid=2546)

تجميد أي ملف - tarek - 12-04-14

السلام عليكم ورحمة الله وبركاته
قمت بوضع ملف معين في مجلد البرنامج Debug
أريد اثناء تشغيل البرنامج يحدث تجميد لهذا الملف بحيث :
= ممنوع نسخه
= ممنوع قصه
= ممنوع حذفه
= ممنوع تغيير اسمه
= ممنوع ارساله ب Send to
= منع استخدام ctrl + c

وعند الاغلاق يكون متاح عمل اي شئ على هذا الملف

شكرا لكم

RE: تجميد أي ملف - الشاكي لله - 12-04-14

لا اعتقد ان هذا ممكن

وإن كان ممكنا فيجب ان تقوم بتغيير قيم في الريجستري وهنا وهناك

وهذا غير محبذ ابدا ..

نصيحة :

اسلك دائما طريق اضمن واكثر مرونة

لاتتجه الى الطرق الوعرة والغير عملية ابدا

RE: تجميد أي ملف - bumb - 12-04-14

اذا جمدت أي ملف في البرنامج فسوف تواجه مشاكل لأن تجميد الملف = حذفه

RE: تجميد أي ملف - tarek - 12-04-14

شكرا
اجابتك منطقية

RE: تجميد أي ملف - سعود - 12-04-14

مارايكم بما يسمى الدفاع الذاتي.
حماية مجلد البرنامج من اجراءات غير مسموحة.
مثل كاسبر سكاي
هل يمكن هذا من خلال فيجوال بيسك دوت نت

RE: تجميد أي ملف - silverlight - 13-04-14

عليك ان تقرأ و تدرس جيدا System.Security.Permissions Namespace ربما يفيدك الأمر حيث يمكنك ان تبدا من الكلاس FileIOPermission Class

RE: تجميد أي ملف - Aly El-Haddad - 13-04-14

السلام عليكم،
بمنتهى البساطة:
كود :
''To freeze:
        Dim path As String = "مسار الملف"
        FileOpen(1, path, OpenMode.Random)
        MsgBox("Locked!")

        ''To unfreeze:
        FileClose(New Integer() {1})
        MsgBox("Unlocked!")