ab.com コミュニティ

７さん　有難うございました。1行だけでうまく行きました。
Basicプログラムだから　＃N88BASICを付けなければならないと思っていました。勉強になりました。
7さんには度々ご指導いただき感謝いたしております。
Bookのショートカットを作ればすむことですが、[b]好奇心[/b]と、このBookを会社内でサーバーの階層の深いところへ置きますので、利用する人が探して、ショートカットを作ってもらうよりも、開くためのアプリを配布した方がいいのかな？と思いました。
いつも頓珍漢な質問に対して、丁寧な回答を頂有難うございます。

ShellExecute(0,"Open","C:\Documents and Settings\MyName\デスクトップ\TestB.xls",NULL,NULL,SW_SHOW)

> 先頭に　ShowWindow(_PromptSys_hWnd,SW_SHOWMINIMIZED)を追加してみました。
> 瞬間的には画面が見えてしまうのですが、もっと良い方法があれば教えていただけないでしょうか？。
prompt.sbpファイルの中にプロンプトウィンドウを作っているコードが有るんですが、それを書き換えるとウィンドウが表示されないようになるかもしれません。

ショートカットのようなものを作ってみたいのであれば、以下のようなコードにすると良いと思います。

[code]ShellExecute(0,"Open","C:\Documents and Settings\MyName\デスクトップ\TestB.xls",NULL,NULL,SW_SHOW)[/code]
ただこれだけです。 [b]#N88BASIC[/b] などの記述は一切要りません。
コンパイルした物を実行してみると件のファイルが開かれるはずです。

素直にショートカット使った方が良いと思いますけどね(笑)

特定のエクセルファイルを開くショートカットのようなものを作ってみたいのですが、実行すると、最初にプロンプト画面が大きく出てしまうので、なんとか隠したいと思い、過去ログ0121を参考にして、
先頭に　ShowWindow(_PromptSys_hWnd,SW_SHOWMINIMIZED)を追加してみました。
瞬間的には画面が見えてしまうのですが、もっと良い方法があれば教えていただけないでしょうか？。

#N88BASIC
ShowWindow(_PromptSys_hWnd,SW_SHOWMINIMIZED)

ShellExecute(0,"Open","C:\Documents and Settings\MyName\デスクトップ\TestB.xls",NULL,NULL,SW_SHOW)

SendMessage(_PromptSys_hWnd,WM_CLOSE,0,0)