これで合っているでしょうか?

ActiveBasicでのプログラミングでわからないこと、困ったことなどがあったら、ここで質問してみましょう(質問を行う場合は、過去ログやWeb上であらかじめ問題を整理するようにしましょう☆)。
返信する
メッセージ
作成者
yata

これで合っているでしょうか?

#1 投稿記事 by yata »

特定のエクセルファイルを開くショートカットのようなものを作ってみたいのですが、実行すると、最初にプロンプト画面が大きく出てしまうので、なんとか隠したいと思い、過去ログ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)
7
記事: 473
登録日時: 2005年5月31日(火) 18:51
お住まい: 新潟県
連絡する:

Re: これで合っているでしょうか?

#2 投稿記事 by 7 »

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

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

コード: 全て選択

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

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

これで合っていますか? のお礼

#3 投稿記事 by yata »

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