エディタで起動又は正しく表示させるには？ (ID:75908)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Windows2000 VB6(SP5)を使用しています。 VB上から、テキストエディタを起動させて、指定ファイルをエディタで表示させるプログラムをつくりました。 が、デスクトップ上のファイルが、ノートパッドでは正しく開けましたが、他のエディタでは開くことが出来ない又は対象ファイルが正しく開けませんでした。 対応策を教えて下さい。 試したエディタは、ノートパッド・スペース・MIFES・ワードパッドです。 ソース抜粋 s = String(256, vbNullChar) s = "エディタの実行ファイル名" s = s + " " s = s + "D:\Documents and Settings\以下対象ファイルのあるパス\対象ファイル名" Shell s, vbNormalFocus sExe = "e:\space\space.exe" sPrm = "D:\Documents and Settings\以下対象ファイルのあるパス\対象ファイル名" ret = ShellExecute(App.hInstance, "open", sExe, sPrm, _ vbNullChar, SW_NORMAL) s = String(256, vbNullChar) s = "エディタの実行ファイル名" s = s + " " s = s + "D:\Documents and Settings\以下対象ファイルのあるパス\対象ファイル名" batName = App.Path + "\" + "editor.bat" fileNum = FreeFile Open batName For Output As #fileNum Print #fileNum, s Close #fileNum Shell batName, vbHide