IE9のアドレスバー非表示について

このQ&Aのポイント
  • IE9のアドレスバーを非表示にする方法についてご質問です。
  • IE9では、vbsを使用してアドレスバーを非表示にすることができますが、実際にはうまく機能しない場合があります。
  • 対処方法として、IE9のセキュリティ設定やグループポリシーを調整することが必要です。
回答を見る
  • ベストアンサー

IE9のアドレスバー非表示について

IE9のアドレスバーを非表示にしようと思い、次のようにvbsを作ったのですが、ie7などでは非表示になるのですが、IE9ではなりません。 どうすればよいのでしょうか? test.vbs -------------------- Option Explicit On Error Resume Next Dim objIEApp Set objIEApp = CreateObject("InternetExplorer.Application") With objIEApp .Navigate "http://xxx/xxx.html" .AddressBar = False .Visible = True End With

質問者が選んだベストアンサー

  • ベストアンサー
  • LancerVII
  • ベストアンサー率51% (1060/2054)
回答No.1

こんにちは。 セキュリティの問題で非表示にできなくなっているはずです。 (昔は出来た) セキュリティレベルをカスタマイズすれば表示されなくなると思います。 要するにIEの設定次第です。

w0a15455
質問者

お礼

ありがとうございました。 ソースが間違っていないようなので、ほっとしました。

関連するQ&A

  • インターネットで調べてVBSで下のようなものを作ってみました。

    インターネットで調べてVBSで下のようなものを作ってみました。 やりたいことは、IEを起動して複数のサイトを複数のタブで表示 したいのですが、サイトの種類分IEも起動してしまいます。 考えているようなことはできないのでしょうか。 ========ここから下です======== Option Explicit Dim objIE Dim objShell 'Shell.Application Set objShell = CreateObject("Shell.Application") Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True 'IEウィンドウを表示 objIE.Navigate2 "http://www.okwave.jp/" Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True 'IEウィンドウを表示 objIE.Navigate2 "http://www.google.co.jp/" Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True 'IEウィンドウを表示 objIE.Navigate2 "http://www.yahoo.co.jp/" ======================= よろしくお願いいたします。

  • VBscriptからIE11起動

    windows7(x64) IE11 IEを起動するスクリプトを.vbs作成しました。 vbsファイルをダブルクリックすると、↓エラーが発生するときがあります。 「 WScript.CreateObject: "InternetExplorer.Application" というオブジェクトを作成 できませんでした。」 ↓SRCです。 Dim IE Set IE = WScript.CreateObject("InternetExplorer.Application", "Event_") IE.Visible = True IE.Navigate ("http://www.yahoo.co.jp") set IE = nothing 数秒待ったり、vbsを連打すると起動します。 プロパティ(vbs右クリック)のスクリプトタブで実行時間を10秒にしてみても起動できないことがあります。 オブジェクトを作成しない方法はありますか? また、失敗している原因はなんでしょう?

  • 複数のタブを開きたい IE

    IE9を使っています。 画像のようにタブを二つ開くにはどうすればいいでしょうか? Sub test() Dim objIE As InternetExplorer Set objIE = CreateObject("InternetExplorer.application") objIE.Visible = True objIE.Navigate "http://www.yahoo.co.jp/" Set objIE = Nothing End Sub だと一つのタブしか開けません。 Sub test() Dim objIE As InternetExplorer Set objIE = CreateObject("InternetExplorer.application") objIE.Visible = True objIE.Navigate "http://www.yahoo.co.jp/" objIE.Navigate "http://www.yahoo.co.jp/" Set objIE = Nothing End Sub にしても Sub test() Dim objIE As InternetExplorer Set objIE = CreateObject("InternetExplorer.application") objIE.Visible = True objIE.Navigate "http://www.yahoo.co.jp/" objIE.Navigate2 "http://www.yahoo.co.jp/" Set objIE = Nothing End Sub にしても1つのタブしか開けないです。 ご回答よろしくお願いします。

  • vbsでホームページ表示について

    vbsファイル ・Dim objIE ・Set objIE = CreateObject("InternetExplorer.Application") ・objIE.Visible = True ・objIE.Navigate2 "http://***.***1/" ・objIE.Navigate2 "http://***.***2/", &H1000 ・objIE.Navigate2 "http://***.***3/", &H1000 ・Set objIE = Nothing この中で「, &H1000」を a=", &H1000" objIE.Navigate2 "http://***.***3/" & a とすると正常に表示できません。 変数??に代入するにはどうすればいいのでしょうか。 アドバイス、よろしくお願いします。

  • VBAでIEオブジェクトを呼ぶとアドレスバーが出ません

    初めて投稿します。 会社でインターネットの自動ログインのマクロを組みました。 ネットで調べても分からずお手上げ状態です↓ ・マクロで新しくインターネットを開くと、アドレスバーなどが消えて開くようになり、プライバシーの鍵のマークが表示されなくなりました。 先週まではうまく表示されていたのですが、共有のPCなので誰がいつ使ったか分かりません。 インターネットオプションや参照設定など見た限りでは変更されていないようでした。 何か原因に心当たりのある方いらっしゃいましたら、ご教授いただければ幸いです。 参考にマクロを載せておきます(うろ覚えですが…)。 Sub test()  Set ie = CreateObject("InternetExplorer.application")  ie.Visible = True  ie.Navigate ("http://www.google.co.jp/")  ……省略…… End Sub

  • vbsよりIEをアクティブに開きたい

    お世話になります。 Windows7Pro サーバー上にあるhtmlファイルをvbsより開いてます。 また、5秒で閉じるようにしてます。 現状、vbsを実行するとhtmlファイルが開くことは開くの ですが、他ウィンドウの後ろになってしまいます。 どこをどうすれば開いたhtmlファイル(IE)を最前面で起動 することができますでしょうか。 【vbsの内容】 Option Explicit On Error Resume Next Dim strUrl ' 表示するページ Dim objIE ' IE オブジェクト strUrl = "サーバー上にあるhtmlファイルのパス" Set objIE = WScript.CreateObject("InternetExplorer.Application") objIE.ToolBar = False If Err.Number = 0 Then objIE.Navigate strUrl objIE.Visible = True objIE.Width = 800 objIE.Height = 400 objIE.Top = 0 objIE.Left = 480 WScript.Sleep 5 * 1000 objIE.Quit Else WScript.Echo "エラー:" & Err.Description End If 【htmlの内容】 <html> <head> <title>テスト</title> </head> <BODY> <IMG src="画像のパス"> <font size="7">TEST</font> </div> </body> </html> ご教示の程、宜しくお願い致します。

  • ExcelVBAでIE画面データの取り込みかた

    http://www.geocities.co.jp/SiliconValley-Bay/1992/excel/web.html このページの記述を見てYahoo!のページはとりこめました。 ただ、新たにURLを指定してIEを立ち上げるのではなく、すでに開いているIE画面のデータを取りこむにはどのように直せばよいのでしょうか? ご教授ください。 Option Explicit Sub test()  Dim ie As Object  Dim x As Object  Set ie = CreateObject("internetexplorer.application")  Set ie = GetObject("", "InternetExplorer.application")  ie.Visible = False  ie.navigate ("http://www.yahoo.co.jp/")  While ie.Busy Or ie.ReadyState <> 4: DoEvents: Wend  Set x = New DataObject  x.SetText ie.document.documentElement.innerText  x.PutInClipboard  ActiveSheet.PasteSpecial  Set x = Nothing  Set ie = Nothing End Sub

  • ie 64bit 32bit どちらが開いてる?

    Sub Sample() Dim objIE As InternetExplorer Set ObjIE = CreateObject("InternetExplorer.application") ObjIE.Visible = True ObjIE.Navigate "http://www.yahoo.co.jp/" Set ObjIE = Nothing End Sub で、vbaからieを開いた場合、64bit 32bitのどちらで開かれるのでしょうか? 私の環境はwin7、IE9です。

  • WSHでのIE制御について

    現在、WSHにて、メニューバー、ステータスバー、ツールバー、アドレスバーの 無いIEのウインドウを開いています。ソースは以下の通りです。  Set objIE = WScript.CreateObject("InternetExplorer.Application")  objIE.Navigate("http://www.goo.ne.jp")  objIE.MenuBar = False  objIE.StatusBar = False  objIE.ToolBar = False  objIE.AddressBar = False  objIE.Visible = True  Set objIE = nothing  WScript.Quit これで、やりたい事は出来ているのですが、アドレスバーを非表示にした場合、 ウインドウタイトルが、 http://www.goo.ne.jp - goo Microsfot Internet ... と、ページのアドレスが表示されます。 アドレスバーを表示した場合には、 goo Microsfot Internet ... と、アドレスは表示されません。 ここで、質問なのですが、アドレスバーを非表示にしたままで、後者の様に、 タイトルバーにアドレスが表示されない様にする事は可能なのでしょうか?。 以上、よろしくお願いします。

  • IEではなくファイアフォックスを指定することは

    VBAでブラウザを開く場合、 IEではなくファイアフォックスを指定することは可能ですか? 既定のブラウザはIEにしています。 Sub test1() Dim objIE As Object Set objIE = CreateObject("InternetExplorer.Application") objIE.Navigate "http://www.ocn.ne.jp/" objIE.Visible = True Set objIE = Nothing End Sub の Set objIE = CreateObject("InternetExplorer.Application") の部分を Set objIE = CreateObject("firefox.exe") に変えてみたら、 【ActiveX コンポーネントはオブジェクトを作成できません。(Error 429)】 になりました。

専門家に質問してみよう