TPM überprüfen.
Command Box öffnen und folgendes eingeben:

tpm.msc

Aktivieren:

Manage-BDE -on c:
manage-bde -protectors -enable c:
manage-bde -protectors -add c: -RecoveryPassword

Nach dem Neustart wird die lokale Festplatte C: verschlüsselt. (Analog kann das für weitere Festplatten verwendet werden)

Deaktivieren:

Manage-BDE -off c:

Key auslesen:

manage-bde -protectors -get c:

Status abfragen:

Manage-BDE -status

Der zu importierende Key wäre folgender:

Windows Registry Editor Version 5.00 
[HKEY_CURRENT_USER\SOFTWARE\Microsoft\Office\16.0\Access\Security\Trusted Locations\Location0] 
"Path"="C:\\Users\\Knut.lixd\\AppData\\Roaming\\MyAccessApp\\"
"Description"=""
"Date"="16/06/2022 9:20"

Das Problem dabei: Im Pfad steht nicht nur mein Name Knut ( %username%) sondern auch die Domäne (lixd). Somit kann ich die Umgebungsvariable %Username% nicht einfach verwenden und muss mir dies anders zusammenbauen. Verwende ich %Userprofile%, dann fehlen mir die doppelten „\“.
Die Idee war nun aus %Userprofile% das C:\Users zu entfernen und in den String oben einzubauen.

Dies geht am einfachsten wie folgt:

@echo off
setlocal enabledelayedexpansion
set "uprofile=%userprofile%"
set "uprofile=!uprofile:C:\Users\=!"
echo %uprofile%

In der Variable die Variable uprofile kann ich nun weiter verwenden um mir eine Registry (trust.reg) Datei für den Import (reg Import trust.reg /reg:64) zu bauen:

:: Trustcenter bearbeiten
echo Bearbeite Trustcenter
echo Windows Registry Editor Version 5.00 > %temp%\trust.reg
echo [HKEY_CURRENT_USER\SOFTWARE\Microsoft\Office\16.0\Access\Security\Trusted Locations\Location0] >> %temp%\trust.reg
echo "Path"="C:\\Users\\%uprofile%\\AppData\\Roaming\\MyAccessApp\\"  >> %temp%\trust.reg
echo "Description"=""  >> %temp%\trust.reg
echo "Date"="16/06/2022 9:20"  >> %temp%\trust.reg
reg import %temp%\trust.reg /reg:64
del %temp%\trust.reg

Damit dies nicht bei jedem Batch lauf passiert sollte man sich entsprechende Marker setzten und entsprechend abfragen. Per Datei oder Registry Eintrag, je nach belieben. Dies beschreibe ich (vermutlich) man in einem anderen Beitrag.

Zwei Gedanken noch dazu:

• Ist in der Registry Location0 schon vorhanden, so wird diese überschrieben. Das kann man sicherlich besser lösen, war bei dem Kunden mit komplett neuen Benutzerprofilen nicht von Relevanz.
• Das Benutzerprofil muss nicht zwingender Weise auf C: liegen. Bei Servergespeicherten Profilen muss man den String anders zusammenbauen. ( set „uprofile=!uprofile:\=\\!“ )

Um eine Route unter Windows permanent zu merken, muss man den Parameter „-p“ zusätzlich verwenden.

Aus einem

route ADD 10.10.10.0/24 192.168.178.254

wird ein

route -p ADD 10.10.10.0/24 192.168.178.254

echo off
cls

:: Variablen setzen

:: Bei Bedarf Variablen anpassen
::
set IconTitle="%HomePath%\desktop\Fernwartung SystemTechnics.lnk"
set Target="https://www.systemtechnics.de/fernwartung/"
set WorkingDirectory="%temp%"
set Description="Download Link zum aktuellen Teamviewer"
set VBSFile=%date%-sc001
set IconNum=15

:: Hier nichts mehr anpassen
::

cls
echo .........................................................
echo .
echo . Erstelle Icon %IconTitle% - %Target%
echo .
echo .........................................................

:: Datum wg. Temp-File ermitteln
for /f "tokens=1-4" %%a in ('cmd.exe /c "echo. | date"') do if %%a == Aktuelles set date=%%d

:: Icon auf Desktop vorhanden?
if exist %IconTitle% echo Icon vorhanden
::if exist %IconTitle% goto icon_skip

:: Temp VBScript anlegen
::
 >%temp%\%VBSFile%.vbs echo Set objShell=WScript.CreateObject("Wscript.Shell")
>>%temp%\%VBSFile%.vbs echo Set objShortcut=objShell.CreateShortcut(%IconTitle%)
>>%temp%\%VBSFile%.vbs echo objShortcut.TargetPath=%Target%
>>%temp%\%VBSFile%.vbs echo objShortcut.Description=%Description%
>>%temp%\%VBSFile%.vbs echo objShortcut.WorkingDirectory=%WorkingDirectory%
>>%temp%\%VBSFile%.vbs echo objShortCut.IconLocation = "C:\Windows\SystemResources\shell32.dll.mun, %IconNum%"
>>%temp%\%VBSFile%.vbs echo objShortcut.Save

::... anschliessend starten ...
cscript //nologo %temp%\%VBSFile%.vbs

::... und wieder entfernen.
del %temp%\%VBSFile%.vbs

:icon_skip
exit

Eine umfangreiche Liste mit freier Icons ist unter https://github.com/topics/icon-pack zu finden. Man kann diese dann sicherlich in eine ICO-Datei exportieren und im Script entsprechend bereitstellen.

Dazu wechseln wir in das Verzeichnis „c:\Program Files (x86)\Microsoft Office\Office14“ und führen folgenden Befehl aus:

cscript ospp.vbs /act

Anschliessend sollte Office aktiviert sein.

net accounts /domain

(In der Datei userlist.txt stehen die Benutzernamen. Diese könnte man zuvor auch aus dem AD extrahieren)

@echo off
for /f %%a in (userlist.txt) do call :minisub "%%a"
pause
exit

:minisub
set name=%~1
echo %name%</code>
if not exist e:\ausgangsverzeichnis\%name%_xyz mkdir e:\ausgangsverzeichnis\%name%_xyz
net share %name%_xyz="e:\ausgangsverzeichnis\%name%_xyz" /GRANT:%name%,Full
icacls.exe "e:\ausgangsverzeichnis\%name%_xyz" /T /grant:r %name%:(OI)(CI)(M)
goto :eof

Das Script ist so natürlich noch nicht perfekt und es sollten die Pfad und Berechtigungen den eigenen Bedürfnissen angepasst werden. Ein Denkanstoß sollte es aber schon mal liefern.