2017年11月
      1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30    
無料ブログはココログ

« 「フォルダショートカット」を作り分ける。 | トップページ | ショートカットに相対パスを指定する。(その3) »

2010年3月16日 (火)

複数の「ファイル名を指定して実行」を開く。

Vistaでは、なぜか「ファイル名を指定して実行」がひとつしか開きません。
そこで、.NETで作ります。

vbc /t:winexe FileRun.vb

Module Module1
Declare Auto Function SHRunDialog Lib "shell32" Alias "#61" (hWnd As Integer, hIcon As Integer, lpszPath As String, szTitle As String, szPrompt As String, uFlags As Integer) As Integer
Sub Main()
Dim sTitle As String = "ファイル名を指定して実行"
Dim sPrompt As String = "実行するプログラム名、または開くフォルダやドキュメント名、インターネット リソース名を入力してください。"
SHRunDialog(0, 0, Environment.CurrentDirectory, sTitle, sPrompt, 0)
End Sub
End Module

« 「フォルダショートカット」を作り分ける。 | トップページ | ショートカットに相対パスを指定する。(その3) »