windowsでコマンドラインから複数のURLを一つのタブに開く方法

Question

windowsでコマンドラインからURLを指定してブラウザを起動する事は可能ですが、通常新規ウィンドウ（ブラウザの設定により新規タブ）で開きます。

コマンドでいくつかのURLを開いた際に、新規タブを増やしていくのではなく、一つのタブを上書きさせたいです。

その様な方法はあるのでしょうか？

試した事としては、新規で開いたタブにjavascriptのwindow.openを用意しました。
第２引数のウィンドウ名を同じにする事で、新たに開いたタブと共通のポップアップウィンドウにならないかと検証しましたが、それぞれ別のポップアップウィンドウとして表示される結果となりました。

何か良い方法はありませんでしょうか？

Comments

[yambejp]

ブラウザとはどのブラウザのことを指しますか？

[teratailmacr2]

ご回答ありがとうございます。

ブラウザはWEBブラウザを指しています。

Internet Explorer 11、Edge、Google Chrome、Firefoxあたりで叶えばどれでも構いません。

[yambejp]

開いているタブに開いたら前のページを読まないこととおなじでは？
開く間に何かをするのでしょうか？
.vbsファイルなどで実行してもよいのでしょうか？

[teratailmacr2]

常に最新の情報をだけを表示したいので、以前の内容はなくなってしまっても問題ありません。

また、windowsコマンドで実行出来る形であれば.vbsファイルでも構いません。

Answer 1

適当ですが・・・
//test.vbs

Dim ie 
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
ie.navigate2 "https://www.google.com"
wscript.sleep 3000
ie.navigate2 "https://www.yahoo.co.jp"

実行

wscript test.vbs

追記

IEが開いていたらそちらを利用する

Dim ie
set ie=Nothing
Dim obj
For Each obj In CreateObject("Shell.Application").Windows
If TypeName(obj.Document) = "HTMLDocument" Then
Set ie = obj
Exit For
End If
Next
If ie Is Nothing Then
Set ie = CreateObject("InternetExplorer.Application")
end if
ie.Visible = True
ie.navigate2 "https://www.google.com"
wscript.sleep 3000
ie.navigate2 "https://www.yahoo.co.jp"

Comments

[teratailmacr2]

ご連絡の方が遅くなりまして申し訳ありません。

ご回答ありがとうございます。
試してみたところ理想に近い形で実行されました！

ちなみに、プログラム実行前にIEを立ち上げていた場合、既存のウィンドウとは別に新規ウィンドウで立ち上がりますが、それは制御不可能でしょうか？

と言いますのも、やりたい事としては、CTIミドルウェアからの着信信号を受信した際に特定のコマンドを実行する仕組みがあるのですが、その際ブラウザに着信番号等のパラメータを付加してアクセスさせ、サーバーサイドでリクエストパラメータの着信履歴をDBに保存しつつ、該当の顧客情報をレスポンスしてブラウザに表示させたいと考えています。
実行コマンドを普通に「start "https://example.com/incoming/?tel=09000000000"」等とすると、初回は新規ウィンドウが立ち上がって想定通りの動作をするのですが、次回着信があった際、同じコマンドを実行すると、今度は別のウィンドウ（タブ）が開く為、着信の度に画面が増えてどれが今かかってきた着信か判断ができなくなってしまいます。

お教えいただいたtest.vbsの実行コマンドに引数を取る形にすれば、好きなURLを開かせる事が出来るかと思いますが、test.vbsを実行する度に別のウィンドウが立ち上がってしまいます。
これは解決不可能でしょうか？

[yambejp]

追記しておきました
IEが開かれていたらそれを利用、そうでない場合はIEを開きます

[teratailmacr2]

追記ありがとうございます！

ほぼやりたい事に近づいてきました！

VBの事は全くわからないのでこれから勉強してみますが、あとはスクリプト実行時にパラメーターを引数として渡せれば完璧です！

技術的に無理かと諦めかけていたのですが、希望が見えてきました！

ご丁寧にありがとうございました！

[yambejp]

パラメータのとり方はWscript.Argumentsを参照して下さい

Dim args
Dim str
set args=Wscript.Arguments

for i = 0 to args.Count -1
if(str<>"") then
str=str+"_"
end if
str=str+args(i)
next
Wscript.echo str

//以下実行

wscript test.vbs 1 2 3→GUIのメッセージボックスが表示
cscript test.vbs 1 2 3→コマンドライン上に表示

[teratailmacr2]

ご回答ありがとうございます。

最高です・・・。

まさに私が求めていたものです！！

なぜこんな事が出来るんでしょうか。
検証した限りでは一番古いウィンドウの一番古いタブが指定のURLに切り替わるので、OSがその順番を保持していて、指定がなければ最古のものが自動的に利用される感じでしょうか。
OSでなければIEかもしれませんが、その場合、他のブラウザでは出来ないのでしょうか。