ショートカットを作成するには？

解決

あっぷる 2005-01-30 00:19:24 No: 119276

はじめまして。初心者です。どうぞよろしくお願いします。
同じフォルダの中に、ショートカットを作成したいのですが、どのように
したらよいかわかりません。
C:\test\test.exeのショートカットをC:\testフォルダの中に作りたいの
です。
過去ログやホームページをいろいろ検索したのですが、Setup1.vbpを修正
したりとか、難しくてわかりませんでした。
助けてください。

Say 2005-01-30 00:54:04 No: 119277

単にショートカットを作りたいだけなら
シェルエクステンションで可能ですが、
WSHが使える環境なら
WshShell.CreateShortcut("ショートカット名.lnk")
でWshShortcutオブジェクトを生成して、
各種設定後に設定をsaveするのが簡単かと・・・。

魔界の仮面弁士 2005-01-30 02:22:21 No: 119278

どんな方法でも構わないのであれば、

    Dim F As Integer
    F = FreeFile()
    Open "C:\TEST\Link.url" For Output As #F
    Print #F, "[InternetShortcut]"
    Print #F, "URL=file:///C:/TEST/test.exe"
    Print #F, "IconIndex=0"
    Print #F, "IconFile=C:\test\test.exe"
    Close #F

という方法もあります。(VBA/VB6などの場合)

あっぷる 2005-01-30 06:53:06 No: 119279

Sayさん、魔界の仮面弁士さん、どうもありがとうございます。
インターネットショートカット作成できました。
よろしければ、もう少し教えていただきたいのですが。

リンク元のアイコンに矢印がついたショートカットの作成方法が
知りたいです。

実は、「VisualBasic6.0 300の技」を購入したのですが、
これを見ても解決しないのです。
どうぞよろしくお願いします。

(XP/VB6)

魔界の仮面弁士 2005-01-30 08:01:33 No: 119280

拡張子 .url ではなく、拡張子 .lnk のショートカットですね。

それについては、このサイトの過去ログにも幾つかありますので、検索してみてください。
http://madia.world.coocan.jp/vb/vb_bbs/200310_03100053.html

あっぷる 2005-01-30 08:20:28 No: 119281

魔界の仮面弁士さん、何度もありがとうございました。
過去ログすべてチェックしたと思っていたのですが・・・
よく読んで勉強します。

本当にお手数お掛けしまして、すみませんでした。
また、わからないことがありましたら、その節はどうぞ
よろしくお願いします。