昨日、VBAでショートカット作成とアイコンの設定の記事を書きましたが、これをPowerShellでやったらどうなるか試しに作ってみました。
#WshShellオブジェクトを作成
$shell = New-Object -ComObject WScript.Shell
#ショートカットへのオブジェクトを作成
$lnk = $shell.CreateShortcut("$Home\Desktop\見積書.lnk")
#リンク先パス設定
$lnk.TargetPath = "C:\work\powershell\見積書.accdb"
#アイコンファイルパス設定
$lnk.IconLocation = "C:\work\powershell\document_mitsumorisyo.ico"
#ショートカットを保存
$lnk.Save()
実行すると、このようにショートカットが作成されアイコンが変更されます。
スポンサーリンク