vbsでプログラムをオプション指定して起動する方法
- vbsからプログラムを実行する際に、オプションを指定する方法を教えてください。
- Firefoxを起動する際に-new-tabオプションとURLを指定する方法を教えてください。
- objWshShell.Runの後にオプションを記述する方法を教えてください。
- ベストアンサー
vbsでからプログラムを、オプションを指定して起動したい。
vbsから、プログラムを実行する歳に、オプションを指定する方法を教えてください。 Firefoxを起動する際に以下のオプションをつけて実行したいのですが 上手くいきません。 (1)-new-tabオプション (2)URL ＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝ Option Explicit Dim objWshShell Set objWshShell = WScript.CreateObject("WScript.Shell") objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe""" Set objWshShell = Nothing Firefoxを起動するだけであれば上の記述でいけますが (1)と(2)は objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe""" の後ろにどのように記述すればいいのでしょうか。
- kine_2009
- お礼率92% (104/112)
- その他(Windows)
- 回答数1
- ありがとう数2
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
オプションやURLをすべてRunの第１引数で指定します。 objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe"" -new-tab http://www.google.co.jp"
関連するQ&A
- 何とかFireFox用のVBSを作ってみたのですが、
何とかFireFox用のVBSを作ってみたのですが、 下のような記述ですとサイトの種類分ブラウザも 起動してきてしまいます。 タブで開きたいのですが、 どのように記述すればいいのでしょうか。 よろしくお願いいたします。 ＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝ Option Explicit Dim objWshShell Set objWshShell = WScript.CreateObject("WScript.Shell") objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe"" -new-tab http://www.google.co.jp" objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe"" -new-tab http://www.msn.co.jp" objWshShell.Run """c:\Program Files\Mozilla Firefox\firefox.exe"" -new-tab http://www.yahoo.co.jp" Set objWshShell = Nothing
- ベストアンサー
- Visual Basic
- ＶＢＳファイルをスタートアップフォルダに入れておいて、
エクセル2007の特定ファイルをそのＶＢＳファイルにより自動起動させる方法を教えてください。ちなみに、次のようなＶＢＳファイルを作成しましたがエラーとなってしまいます。 Option Explicit 'オブジェクト変数の宣言とWshShellオブジェクトの作成。 Dim objWshShell Set objWshShell = WScript.CreateObject("WScript.Shell") WScript.Sleep 1000 '1秒待機 objWshShell.Run "C:￥Program Files￥Microsoft Office￥Office12￥EXCEL.exe" です。
- ベストアンサー
- Windows Vista
- スタートアップフォルダにエクセルファイルを入れてＰＣ起動時の自動が実行可能ですか？
現在 [メモ帳.vbs]ファイルとして、次のような記述のファイルをスタートアップフォルダに入れてあります。 Option Explicit 'オブジェクト変数の宣言とWshShellオブジェクトの作成。 Dim objWshShell Set objWshShell = WScript.CreateObject("WScript.Shell") WScript.Sleep 10000 '10秒待機 '例としてメモ帳起動 objWshShell.Run "C:\Windows\System32\notepad.exe" これですと、notepad.exeファイルは自動実行されます。 しかし[エクセル.xlsm]というエクセルファイルを同様に単純にパスを通して[エクセル.vbs]ファイルを作成し、 スタートアップフォルダに入れてもエラーが出て実行されません。記述がわかる方いらっしゃったら、ぜひ教えててください。 お願いします
- 締切済み
- Windows Vista
- シャットダウン前にソフトを起動するには？
お世話になります。 どなたか教えてください。 WINDOWSのシャットダウンの前に、OKorキャンセルのメッセージを出し、 OKならあるソフトを起動し、シャットダウン操作をキャンセル。 キャンセルならそのままシャットダウン操作を続行したいのですが、 どうしたらいいでしょうか？ グループポリシー→Windowsの設定→スクリプト→シャットダウンの所に下記のスクリプトを追加しましたが、自己完結するソフトではなくユーザーが操作するソフトの場合はダメなようです。 タイミング的にはスタート→シャットダウン→ここでメッセージを出したい→Windowsのシャットダウンのダイアログ 追加しようと思っているスクリプト Option Explicit 'オブジェクト変数の宣言とWshShellオブジェクトの作成。 Dim objWshShell Set objWshShell = WScript.CreateObject("WScript.Shell") If MsgBox("ソフトを起動するには『キャンセル』ボタンを押してください。 " _ , vbOKCancel) = vbcancel Then 'ソフトを起動。 objWshShell.Run """C:\Program Files\ソフト名.exe""" End If Set objWshShell = Nothing 質問のカテゴリーもここで良いのかどうかはっきりしませんが、どうぞよろしくお願いいたします。
- 締切済み
- Visual Basic
- VB6のWScript.Shellについて
ＶＢ６のWScript.Shellで、他のＶＢ６プログラムを起動する時の戻り値について教えてください。 ＡというＶＢプログラムからＢというＶＢプログラムを起動するシステムがあります。 Ｂというプログラムで取得した値をＡに返す方法はありますでしょうか？ Ａのソースは以下の通りです。 --------------------------------------------- sub test() dim objWshShell set objWshShell = Wscript.CreateObject("WScript.Shell") objWshShell.Run "C:\B.exe" & " " & hikisu1 & " " & hikisu2 , 1, wait End Function ---------------------------------------------- objWshShell.Runの戻り値はtrueまたはfalseのみのようです。 Ｂ.exeからtrue、false以外の値を取得する方法はありますか？ また、やり方はobjWshShell.Runでなくてもよいです。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- VBSで2バイト文字の送り方の質問です。
VBSで質問です。環境はXP Proです。 InputBoxで入力した日本語を他のアプリケーションに入力をしたいのですが、Sendkeysが2バイト文字は不可とわかり頓挫しました。sendkeys以外で使える技を教えてくださいませ。下記のコードを考えてましたが挫折しました。 -------------------------------------------------- Option Explicit Dim Name Name = InputBox("名前を入力してください") 'シェルを用意 Dim objWshShell Set objWshShell = Wscript.CreateObject("Wscript.Shell") 'notepad起動 objWshShell.Exec "notepad.exe" 'notepadアクティブにする objWshShell.AppActivate "objWshShell.Exec.ProcessID" wscript.sleep 1000 'notepadに名前を入力する objWshShell.Sendkeys Name ***sendkeys以外で文字を送る技を期待しています。
- ベストアンサー
- その他（プログラミング・開発）
- VBSでエラーとなってしまいます
VBS(WSH)超初心者です。どうぞよろしくご教授ください。 Pcomm(AS400クライアント接続ソフト）のサイレントインストールを、VBS（WSH)でやりたいと思っていますがスクリプトエラーとなってしまいます。 ＜質問内容＞ 下記スクリプトを実行すると、PcommPath=の行で「ステートメントの末尾が不正です」となってしまいます。 多分、ダブルクォーテーションの使い方が間違ってると思うのですが、色々調べてみましたがわかりません。 どなたかご教授くださいませ。 なお、（VBSではなく）「ファイル名を指定して実行」からなら問題なくサイレントインストールできます （コメントアウトしてる D:\install・・・/qb"部分を実行） どうぞよろしくお願いいたします。 [スクリプト] Option Explicit Dim objWshShell,objWshScriptExec,PcommPath 'D:\install\pcomm\setup.exe /s /v"USEINI=\"C:\Pcomm.ini\" /qb" '上記中のPcom.iniはカストマイズ用のファイル。 ’上記で、「ファイル名を指定して実行」からなら問題なくサイレントインストールされます PcommPath="D:\install\pcomm\setup.exe /s /v"USEINI=\"C:\Pcomm.ini\" /qb"" Set objWshShell=WScript.CreateObject("WScript.Shell") Set objWshScriptExec=objWshShell.Exec(PcommPath) （以下略）
- 締切済み
- その他（プログラミング・開発）
- メモ帳を、IME入力モード「あ」で開く構文について
メモ帳を起動したとき、IMEの入力モードが、通常、半角英数「A」で開くようになっています。そのメモ帳を、IMEの入力モードが、ひらがな「あ」で開くようにしたいのですが、何度、試しても、うまくできません。 次の(1)に、(2)を、どこに、どのように、追加すればよいか、お教えください。 構文が、間違っておりましたら、ご指摘くださいますよう、お願いいたします。 よろしく、お願いいたします。 (1) Option Explicit Dim objWshShell Set objWshShell = WScript.CreateObject("WScript.Shell") objWshShell.Run "C:\Windows\System32\notepad.exe" Set objWshShell = Nothing (2) Sub IMEの初期入力モードをひらがなに設定する() If IMEStatus <> vbIMEModeHiragana Then SendKeys "{kana}", True End If End Sub
- ベストアンサー
- その他([技術者向] コンピューター)
- vbscriptを用いて他のVBSファイルを実行
プログラム ---------------------------------------------------------------- option explicit dim objwshell set objwshell = createobject("wscript.shell") objwshell.run "ファイルのフルパス", 1, false set objwshell = nothing --------------------------------------------------------------- その「ファイルのフルパス」上に「notepad.exe」と入力するとメモ帳が起動するんですけど、他のファイル（ｖｂｓ、ｊｓなど）を指定するとエラーが出ます。 もしかしてこれは拡張子が「.exe」のファイルだけしか起動できないのでしょうか？ ちなみに上のファイルを保存するときの拡張子は「.vbs」です。
- 締切済み
- その他（プログラミング・開発）
- ASPからVBScriptの実行
ASPから下のVBScriptを実行使用とすると "500"Internal Server Error が出力されて困ってます。 へるぷみー Dim objWSHShell Set objWSHShell=WScript.CreateObject("WScript.Shell") objWSHShell.Run "cscript.exe d:\test.bat" objWSHShell=Nothing
- 締切済み
- Microsoft ASP
お礼
ご回答有り難うございました。 無事できました