Hallo, ich möchte gerne einen Ordner für meine Kinder unzugänglich machen. Wie macht man dies? Für Antwort wäre ich dankbar.
Allgemeines 21.950 Themen, 147.866 Beiträge
REPI 
al2 „Ordner für meine Kinder unzugänglich machen.“
Als Kindersicherung taugt dieser kleine VB-Script
pwd = Chr(114) & Chr(101) & Chr(112) & Chr(105)
pwd_out = InputBox _
("Bitte Passwort eingeben !", "SH V1.1 by RP")
If pwd_out = pwd Then
Set fs = CreateObject("Scripting.FileSystemObject")
ordner = InputBox("Bitte SubDir eingeben !!", "SH V1.1 by RP")
Hidden = ordner + ".{F3AA0DC0-9CC8-11D0-A599-00C04FD64434}"
If (fs.FolderExists(ordner)) Then
fs.movefolder ordner, Hidden
Else
If (fs.FolderExists(Hidden)) Then
fs.movefolder Hidden, ordner
End If
End If
Else
x = MsgBox("Passwort leider nicht korrekt !", 48, "SH V1.1 by RP")
End If
repi
