כיצד מורידים ATTRIBUTE

[erani5]

כיצד מורידים ATTRIBUTE

כיצד מוריצים דרך קוד ATTRIB של READ-ONLY למחיצה שלמה ולתת מחיצות שתחתיה?.. הבעיה נוגעת למעכת הפעלה WIN98/95/ME ששם מערכת ההפעלה לא עושה זאת אוטומטי כמו בWIN XP כאשר מעתיקים קובץ למחיצה. נ.ב - אני לא אמור לדעת את שמות הקבצים שנמצאים במחיצה. בתודה מראש..

 

[DarkArcher]

בבקשה...

אתה יכול להשתמש בפונקציה API הבאה SetFileAttributes הגדרתה היא : Declare Function SetFileAttributes Lib "kernel32" Alias "SetFileAttributesA" (ByVal lpFileName As String, ByVal dwFileAttributes As Long) As Long וע"י שימוש ב- findfirst ן- findnext תוכל לעבור על כל הקבצים בהצלחה!

 

[erani5]

תודה