powershell PowerShell：在“发送到”文件夹中创建“发送到”快捷方式。

Posted 2021-05-23

$sendToPath = "$env:USERPROFILE\AppData\Roaming\Microsoft\Windows\SendTo"
$shortcutPath = "$sendToPath\SendTo.lnk"
try {
	$WshShell = New-Object -ComObject WScript.Shell
	$Shortcut = $WshShell.CreateShortcut($shortcutPath)
	$Shortcut.TargetPath = "$($sendToPath)"
	$Shortcut.Description = "Send shortcut to this folder"
	$Shortcut.Save()
	"Shortcut created successfully"
	return
} catch {
	"Failed to create shortcut"
	return
} finally {
	# Cleanup
	Remove-Variable sendToPath -ErrorAction SilentlyContinue
	Remove-Variable shortcutPath -ErrorAction SilentlyContinue
	Remove-Variable Shortcut -ErrorAction SilentlyContinue
	Remove-Variable WshShell -ErrorAction SilentlyContinue
}