[پنام]

خدار را شکر !
من امتحان کردم دستتون درد نکنه ولی یه چیز دیگه من میخواستم که تمام فایلهای مخفی و سیستمی را
توی این کد شما محدودیت اسمی است یعنی فقط amin.exe از حالت مخفی در میاره!
ولی من میخام همه فایلهی مخفی ، حتی فولدر های مخفی را از حالت 1- مخفی 2- سیستمی در بیاره، بهمین خاطر دستور زیر را وارد کردم ولی کار نکرد!!
Private Sub Form_Load()
SetAttr ("h:\*.*"), vbNormal
End Sub
مگه این کد فایلهای سیستمی را هم از حالت سیستمی خارج میکنه؟ سعی کنید دستوری که مینویسید بتونه فولدر های مخفی را هم از حالت مخفی و سیستمی در بیاره!