ショートカットファイル作成（Windows *.lnkファイル、VB script 利用で）

こんにちは。
Google Chrome へのショートカットファイルを作成する方法を考えてみました（Windows OS の *.lnkファイルです）。

下記内容を VB script のファイルとして保存し、そのファイル（のアイコン）をダブルクリックして実行させれば、目的とするショートカットファイルがデスクトップに作成されます

shortcut.vbs

'このファイル（のアイコン）をダブルクリックして実行させます。
'create a short cut of Google Chrome exe by using VB script
Set fso = CreateObject("Scripting.FileSystemObject")
Set ws  = CreateObject("WScript.Shell")
desktop = ws.SpecialFolders("Desktop")
Set shortcut = ws.CreateShortcut(desktop & "\chrome.lnk")
With shortcut
  .TargetPath = """C:\Program Files\Google\Chrome\Application\chrome.exe"""
  .Arguments  = "--allow-file-access-from-files --disable-web-security --user-data-dir --enable-easy-off-store-extension-install"
  .WorkingDirectory = desktop
  .Save
End With

なおこちらに情報がまとめられています。

• 「起動オプション」（Google Chrome まとめWiki）