سؤال: اخفاء الملفات

في هذا المثال استخدمت OpenFileDialog و Button فقط

اكتب الكود التالي في الزر :

		  If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
			Dim path As String = OpenFileDialog1.FileName

			If (File.GetAttributes(path) And FileAttributes.Hidden) = FileAttributes.Hidden Then
				' Show the file.
				File.SetAttributes(path, FileAttributes.Archive)

			Else
				' Hide the file.
				File.SetAttributes(path, File.GetAttributes(path) Or FileAttributes.Hidden)
			End If

		End If

مع ملاحظة انه يجب عليك استيراد

Imports System.IO

شكرا اخي على ردك لكني اعرف هذه الطريقة

لكن سؤالي كيف اخفي الملف كأنه ملف نظام

ساشرح لك كيف

في My Computer اذهب الى Tools ثم Folder Options

ثم View ابحث عن Hidden files and folders

ضع على التبويت الثاني Show hidden files and folders

ثم اسفلها قم بأزالة اشارة الصح من تحت

Hide protected operating system files (Recommended)

اذهب الى السواقة c: سوف يظهر لك ملفات النظام المخفية

فهنا سؤالي كيف لي ان اخفي ملف بهذه الطريقة مثل ملفات النظام عن

طريق كود على فيجوال بيسك دوت نت, مع شكري على ردك

نفس طريقة الأخ Scoool ولكن استخدم FileAttributes.System بالإضافة إلى FileAttributes.Hidden

مثال:

للإخفاء

File.SetAttributes("path\Filename.ext", File.GetAttributes("path\Filename.ext") Or FileAttributes.Hidden Or FileAttributes.System)

للإظهار

File.SetAttributes("path\Filename.ext", File.GetAttributes("path\Filename.ext") And FileAttributes.Hidden And FileAttributes.System)