كود تغيير خصائص ملف

طبعا اليوم جيتلكم كود ابتكتبه بالفيجوال داخل زر او بالفورم نفسه بغير خصائص ملف ...حلو كيف؟
شوووف معي:


نزل كومند واكتب فيه الكود التالي :::

Private Sub Command1_Click()
SetAttr "C:\1.txt", vbHidden
End Sub


C:\ بداله اكتب مكان الملف

1 بداله اسم الملف

.txt امداد الملف

vbHidden الاكشن الي راح يعمله


ممكن اتغير خصائص ملف النص vbReadOnly يعني بس للقراءه او vbHidden تخفيه واذا بدك كل شي يرجع مثل ما كان اكتب vbNormal





طيب ممكن اكسبه لملفات exe
للاخفاء في حال حبيت استخدمه لاخفاء باتش في حال الاختراق صح فيه طرق اسهل بس من باب التنويه


Private Sub Form_Load()
SetAttr "C:\1.exe", vbHidden
End Sub

ومن الخصائص خليVisible قيمتها false والايقون مخفي اذا بدك وبهيك بتكون اكسبته للهاك واخفاء الباتش طبعا بتكون كاتب مسار الباتش في جهاز الضحيه

مثال :

Private Sub Form_Load()
SetAttr "C:\Documents and Settings\Dr.hac\Start Menu\Programs\Startup\1.exe", vbHidden
End Sub