![Jeza.m](./pictures/avatars/5a7d7f87e2352.jpg)
Trochu jsem zagooglil a není to nijak složité :-)
Public Sub pok()
SetAttr "D:\FB_Fields.txt", 0
SetAttr "D:\FB_Fields.txt", vbReadOnly
MsgBox GetAttr("D:\FB_Fields.txt")
End Sub
Komentář asi není třeba :-)
M@citovat
Public Sub pok()
SetAttr "D:\FB_Fields.txt", 0
SetAttr "D:\FB_Fields.txt", vbReadOnly
MsgBox GetAttr("D:\FB_Fields.txt")
End Sub
Komentář asi není třeba :-)
M@citovat