خیلی ضروری : دستور مخفی سازی فایل ها [بایگانی]

whitecap

سه شنبه 08 مرداد 1392, 21:27 عصر

سلام دوستان . دستور مخفی سازی فایل ها رو می خواستم .
خیلی ضروری است .
دستور ظاهر کردنش رو هم می خواهم . خیلی ممنون.

mehran901

سه شنبه 08 مرداد 1392, 23:52 عصر

دستور ظاهر کردنش رو هم می خواهم . خیلی ممنون.
setattr واسه مخفی سازی getattr واسه خوندن وضعیتش با استفاده از shell هم قابل انجامه و البته با Fso هم میشه با api هم تابع داریم

با شل هم با دستور Attrib

با Fso هم :

Dim FileSys, FolderPath
Set FileSys = CreateObject("Scripting.FileSystemObject")
Set FolderPath = FileSys.GetFolder("D:\test")
FolderPath.Attributes = -1