0

私はいくつかのスクリプトをマッシュアップして、WebカメラにリンクされたURLでFirefoxのポータブルバージョンを起動しています。私の目的は、同じFF.exeを使用して2つの異なるURL/IPにアクセスする2つのスクリプトを作成することです。スクロールバー、メニュー、ステータスを削除してブラウザ機能を制限しようとしています。これにより、Webカメラのコントロールとビューのみが表示されます。

これは現在のコードですが、URLが表示されておらず、起動時のデフォルトのみであるため、エラーが発生したようです。サイジングは完璧です。

dim wshshell

FirefoxProfile = "Profile"
FirefoxPath = "C:\ADMIN\FF\FF.exe"
webappurl = "http://Domain.com"
Height = "870"
Width = "920"

Set wshshell = WScript.CreateObject("WScript.Shell")

wshshell.run """" & FirefoxPath & """ -P """ & FirefoxProfile & """ -Height """ & Height & """ -Width """ & Width & "" & webappurl

Set wshshell = Nothing
wscript.quit

あなたが提供できるどんな助けでも、あるいは正しい方向に少しだけ微調整することは最もありがたいです。これは私が見つけた他の何かなので、おそらくこれを使用することができますが、残念ながら、それ自体では何の用途でもないと思います。

window.open('Domain.com',null,"height=100px,width=100px,status=0,toolbar=0,menubar=0,location=0");

作業コード：

dim wshshell

Function qq(str)
qq = Chr(34) & str & Chr(34)
End Function

FirefoxProfile = "Profile"
FirefoxPath = "C:\ADMIN\FF\FF.exe"
webappurl = "172.22.111.8"
Height = "700"
Width = "920"
Status ="0"
Toolbar = "0"
Menubar = "0"

Set wshshell = WScript.CreateObject("WScript.Shell")

wshshell.run qq(FirefoxPath) & " -P " & qq(FirefoxProfile) _
& " -status " & qq(status) & " -Toolbar " & qq(toolbar) & " -menubar " & qq(menubar) _
& " -Height " & qq(Height) & " -Width " & qq(Width) _
& " " & webappurl

Set wshshell = Nothing
wscript.quit
4

1 に答える 1

0

私はあなたの問題がここにあると思います：

wshshell.run ... & """ -Width """ & Width & "" & webappurl

その命令の最後""は、おそらく最後の二重引用符の後にスペースが必要な場合は、空の文字列です。

wshshell.run ... & """ -Width """ & Width & """ " & webappurl

私は通常、quotefusionを避けるためにquoting関数を使用することをお勧めします。

Function qq(str)
  qq = Chr(34) & str & Chr(34)
End Function

'...

wshshell.run qq(FirefoxPath) & " -P " & qq(FirefoxProfile) _
  & " -Height " & qq(Height) & " -Width " & qq(Width) _
  & " " & webappurl
于 2013-03-06T19:09:03.793 に答える