Netzwerkressource ohne Laufwerksbuchstabe via Batch bzw. Scrip erstellen

function New-Shortcut {
> 
>     param (
>         $TargetUri,
>         $ShortcutFilePath
>     )
> 
>     if (($ShortcutFilePath -inotlike "[I].lnk") -and ($ShortcutFilePath -inotlike "[/I].url")) {  
>         Write-Error "ShortcutFilePath does not have a '.lnk' or '.url' ending!"  
>         return
>     }
> 
>     $WScriptShell = New-Object -ComObject WScript.Shell
>     $Shortcut = $WScriptShell.CreateShortcut($ShortcutFilePath)
>     $Shortcut.TargetPath = $TargetUri
>     $Shortcut.Description = $TargetUri
>     $Shortcut.Save()
> 
> }
> 
> function New-FileFolder {
>     
>     param (
>         $TargetFolder,
>         $FileFolderPath
>     )
> 
>     if (Test-Path -Path $FileFolderPath) {
>         Write-Error "$FileFolderPath does already exist and will not be modified to prevent data loss."  
>         return
>     }
> 
>     # Create file folder
>     $FileFolder = New-Item -ItemType Directory -Path $FileFolderPath
>     $fileFolder.Attributes = "ReadOnly"  
> 
>     # Create desktop.ini
>     $DesktopIni = New-Item -ItemType File -Path $(Join-Path -Path $FileFolderPath -ChildPath "desktop.ini")  
>     "[.ShellClassInfo]" | Out-File -FilePath $DesktopIni -Append -Encoding ascii  
>     "CLSID2={0AFACED1-E828-11D1-9187-B532F1E9575D}" | Out-File -FilePath $DesktopIni -Append -Encoding ascii  
>     "Flags=2" | Out-File -FilePath $DesktopIni -Append -Encoding ascii  
>     $DesktopIni.Attributes = "Hidden, System"  
> 
>     # Create target.lnk
>     New-Shortcut -TargetUri $TargetFolder -ShortcutFilePath $(Join-Path -Path $FileFolderPath -ChildPath "target.lnk")  
> }

New-FileFolder -TargetFolder "\\eine\netzwerk\freigabe" -FileFolderPath "$env:APPDATA\Microsoft\Windows\Network Shortcuts\EineFreigabeImNetzwerk"