


sRandomFileName = SetRandomFileName()
sFilePath = Temp(sRandomFileName)

Shell Subst$("touch &1; echo 'ZEILE 1\nZEILE 2' > &1", sFilePath) Wait
Chown sFilePath To User.Name
Chgrp sFilePath To sGroup

(1)
Chmod sFilePath To "rwxrw-r--"
Path = /tmp/gambas.1000/5750/f4ec9844.tmp
File-Type (Integer) = 1
File-Type = Regular file
Permissions (Symbolic notation) = rwxrw-r--
File-Modus (Numeric Notation)   = 764
Sticky-Bit set? = False
SetUID set? = False
SetGID set? = False

hans@mint-183 ~ $ stat -c "%a %A" /tmp/gambas.1000/5750/f4ec9844.tmp
764 -rwxrw-r--

------------------------------------------------------------------------

(2)
Chmod sFilePath To "rwSrwSr-T"
Path = /tmp/gambas.1000/5180/161632d2.tmp
File-Type (Integer) = 1
File-Type = Regular file
Permissions (Symbolic notation) = rwSrwSr-T
File-Modus (Numeric Notation)   = 7664
Sticky-Bit set? = True
SetUID set? = True
SetGID set? = True

hans@mint-183 ~ $ stat -c "%a %A" /tmp/gambas.1000/5180/161632d2.tmp
7664 -rwSrwSr-T

------------------------------------------------------------------------

(3)
Chmod sFilePath To "rwsrwsrwt"
Path = /tmp/gambas.1000/5829/fb60cd7b.tmp
File-Type (Integer) = 1
File-Type = Regular file
Permissions (Symbolic notation) = rw-rw-rw-
File-Modus (Numeric Notation)   = 666
Sticky-Bit set? = False
SetUID set? = False
SetGID set? = False

hans@mint-183 ~ $ stat -c "%a %A" /tmp/gambas.1000/5829/fb60cd7b.tmp
666 -rw-rw-rw-