小池啓仁 ヒロヒト応援ブログ By はてな

小池啓仁(コイケヒロヒト)の動画など。

小池啓仁 ヒロヒト応援ブログ By はてな

VB2005でショートカットを作成する

以下のサンプルは、"All Users"のスタートアップにアプリケーションAP.exeのショートカットを作成します。
AP.exeは、引数とワークのフォルダにあるファイルを使います。

Dim objShell As Object = CreateObject("WScript.Shell")
Dim objShortcut As Object = objShell.CreateShortcut("C:\Documents and Settings\All Users\スタート メニュー\プログラム\スタートアップ\AP.lnk")
objShortcut.Description = "説明"                      '省略可能
objShortcut.TargetPath = "C:\Program Files\AP\AP.exe" 'リンク元の実行ファイル名
objShortcut.Arguments = "STARTUP"                     '実行ファイル名の引数(省略可能)
objShortcut.WorkingDirectory = "C:\Program Files\AP"  'ワークのフォルダ(省略可能)
objShortcut.Save()

ちなみに、"All Users"のスタートアップフォルダにショートカットを作成すると、すべてのユーザがログインした時にそれが自動実行されます。
また、スタートアップフォルダにはショートカットを置き、実行ファイルそのものではNGです。