Frage : Zu wie ich Erlaubnis auf Faltblatt-APP angebracht also einstelle, hat jeder Schreibzugriff

Wie kann ich die Installierungfaltblatterlaubnis einstellen, also jeder hat Schreibzugriff, wenn ich die APP anbringe?

Antwort : Zu wie ich Erlaubnis auf Faltblatt-APP angebracht also einstelle, hat jeder Schreibzugriff

Hallo,

Dieses stellt volle Kontrolle für „jeder“ in Ihrem Faltblatt ein, während beibehaltene gegenwärtige Erlaubnis auf diesem Faltblatt:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:

Funktion SetPermissions ()
	Schwaches strHomeFolder, strHome, strUser
	Schwaches intRunError, objShell, objFSO

	strHomeFolder = „C:\Test“

	objShell = CreateObject („Wscript.Shell“) einstellen
	objFSO = CreateObject („Scripting.FileSystemObject“) einstellen
	Wenn objFSO.FolderExists (strHomeFolder) dann
		intRunError = objShell.Run („%COMSPEC% /c Echo Y| cacls“ _
		u. strHomeFolder u. „/e /c /g jeder: F“, 2, zutreffende)
		
		Wenn intRunError <> 0 dann
			Wscript.Echo, die, die, die, die, die, die, die, die, die, die, die, zuweist „Störung, die Erlaubnis für Benutzer“ _
			u. strUser u. „Faltblatt“ u. strHomeFolder automatisch ansteuern
		Beenden wenn
	Beenden wenn
Funktion beenden
Weitere Lösungen  
 
programming4us programming4us