今、exeファイルのアイコン上に任意のファイルをドラッグ&ドロップして、
そのファイルのパスを取得したいのです。
でも、command関数を使っても、ファイル名が8文字までしか認識されません。
しかも、WinMeだとフルパス認識出来るのに、Win98SE以下だと駄目なのです。
APIを使っても、まずファイル名をプログラム内で指定しないと駄目ですし、
どうしようか、手詰まりになっています。
わかる方いらっしゃいましたら教えていただけないでしょうか?
以下、コードです。

Dim args1, args2 As String
Dim nn As Integer
args1 = Command()
nn = Len(args1)
args2 = Mid(args1, 1, nn)
Open "C:\My Documents\Doc検索\minami.txt" For Output As #1
Print #1, args2
'Print #1, nn
Close #1
ret = Shell("C:\Program Files\FileMaker\ファイルメーカーPro 5.5\ファイルメーカーPro.exe C:\My Documents\Doc検索\Docu検索01.fp5", 1)
End
End Sub