- 締切済み
vbでCreateObjectの使い方で困っています。Internet
vbでCreateObjectの使い方で困っています。InternetExploreを呼び出すときに引数(-extoff)をつけて起動したいのですが、どうしても付け方がわかりません。ご存知の方、ぜひ教えてください。お願い致します。 Set objIE = CreateObject("InternetExplorer.Application") で呼び出しています。規定のプログラムの改造なのでほかの手段が使えません。
- usi30
- お礼率60% (3/5)
- その他(ソフトウェア)
- 回答数1
- ありがとう数1
- みんなの回答 (1)
- 専門家の回答
みんなの回答
- y0OilIo1lm
- ベストアンサー率39% (83/210)
vbは良く知らないのですが、英文ではありますが下記のページで同じような疑問をもたれている方がいますね。参考になりますでしょうか? ****************下の行から********************** http://www.microsoft.com/communities/newsgroups/en-us/default.aspx?dg=microsoft.public.scripting.vbscript&tid=41bebf0f-7acf-4d1d-9f58-f0cc232562d4&cat=&lang=&cr=&sloc=&p=1 ****上の行までがURL(途中のブランクあれば要削除)****** 上記ページで次のような個所があるはずです。 ざっとコードを見た限りではダイレクトに(簡単に)IEを呼び出す場合はご希望のオプションをつけることが出来ないようですね。ご希望のオプションをつける場合は少々面倒になるようです。 set oshellapp = createobject("shell.application") oshellapp.shellexecute "iexplore.exe", "about:blank -extoff", _ "C:\Program Files\Internet Explorer"
関連するQ&A
- NewはCreateObjectと同じ意味?
Sub test01() Dim objIE As InternetExplorer Set objIE = CreateObject("InternetExplorer.application") objIE.Visible = True End Sub Sub test02() Dim objIE As New InternetExplorer objIE.Visible = True End Sub この二つのコードを比較した場合、 Dim objIE As New InternetExplorer で宣言すれば、 Set objIE = CreateObject("InternetExplorer.application") がなくても、 objIE.Visible = True をしてみるとブラウザが立ち上がっているのですが、 これは NewはCreateObjectと同じ意味という事でしょうか?
- ベストアンサー
- Excel(エクセル)
- インターネットで調べて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/" ======================= よろしくお願いいたします。
- ベストアンサー
- その他(プログラミング・開発)
- CreateObjectとはどういう意味なのでしょ
CreateObjectとはどういう意味なのでしょうか? よく、IEを立ち上げたい時に Set ObjIE = CreateObject("InternetExplorer.application") を使ってましたが、 Debug.Print CreateObject("Wscript.NetWork").ComputerName でコンピューター名を取得できる事を知りました。 CreateObjectは、オブジェクトやインスタンスを作成するものだと思っていたのですが、 CreateObject("Wscript.NetWork").ComputerNameは、 オブジェクトやインスタンスを作成してないですよね? なので混乱しています。 あと、CreateObjectは関数なのでしょうか?メソッドなのでしょうか?
- ベストアンサー
- その他MS Office製品
- VBからInternet Explorer
こんにちは。 VBから、現在開いているInternet Explorerのウィンドウに特定のページを表示させることはできないでしょうか。 Dim ObjIE As Object Set ObjIE = CreateObject("InternetExplorer.Application") ObjIE.Navigate "なんたらかんたら" ObjIE.Visible = True でいったん、ブラウザを新規に開きました。いま作ったObjIEに別のページを開くときは、Set ObjIE = Notingを実行せずにObjIE.Navigateでまた別のページを指定すればいいのはわかったのですが、その前にユーザがIEの×ボタンを押してブラウザを閉じてしまった場合、ObjIEがないのでObjIE.Navigateが実行できず、エラーが出てしまいます。 ObjIEがまだ開いているときはそこに開き、ObjIEが閉じられてしまったときは新規に開くには、どうしたらいいでしょうか。 ObjIEが閉じられたかどうか参照する方法があるのかどうかがわかりません。 知っている方がいらしゃいましたらよろしくお願いします。
- 締切済み
- Visual Basic
- 複数のタブを開きたい 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つのタブしか開けないです。 ご回答よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- vbaでIEを閉じるだけの処理
オフィス2003を使用しています。 「IEを開いて閉じる」は Sub TEST() Set ObjIE = CreateObject("InternetExplorer.application") ObjIE.Visible = True '見えるようにする '文字列で指定したURLに飛ぶ ObjIE.navigate "http://www.yahoo.co.jp/index.html" '表示終了まで待つ Do While ObjIE.Busy = True DoEvents Loop ObjIE.Quit End Sub と言うことがわかったのですが 開くのは他の作業をしたときに行うので 「閉じる」だけをvbaで行いたいのですがどうすればいいのかわかりません。 Sub TEST2() Set ObjIE = CreateObject("InternetExplorer.application") ObjIE.Visible = True '見えるようにする ObjIE.Quit End Sub だと また新たなIEが起動してしまい「現在起動しているIEを閉じる」と言うことができません。 アドバイスをお願い致します。
- ベストアンサー
- オフィス系ソフト
- VB4でエラーが出ます CreateObject Scripting.FileSystemObject
VB6で Set fso = CreateObject("Scripting.FileSystemObject") と書いてうまく動いていたbasを VB4のプログラムに移植したところうまく動かないのですが、 どなたか分かりませんでしょうか?
- ベストアンサー
- Visual Basic
- 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)】 になりました。
- ベストアンサー
- Visual Basic
- vb(Visual Basic)でインターネットエクスプローラ(ver6.0)を起動させたい
vb(Visual Basic)でインターネットエクスプローラ(ver6.0)を起動させたいです。 Dim IE Set IE = WScript.CreateObject("InternetExplorer.Application") この記述では、 実行時エラー '424': オブジェクトが必要です。 とエラーが発生します。 素人です、よろしくお願いいたします。
- ベストアンサー
- Visual Basic
- 現在表示されているURLを取得したいのですが
Sub test1() Dim objIE As InternetExplorer Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True objIE.Navigate "http://www.goo.ne.jp/" Do While objIE.Busy = True Or objIE.ReadyState <> 4 DoEvents Loop Debug.Print objIE.Navigate Set objIE = Nothing End Sub //////////////////////////////////////////////// をやろうとすると、 Debug.Print objIE.Navigate の部分で、「引数は省略できません。」とエラーになります。 どう修正すればいいか教えてください。 ("http://www.goo.ne.jp/"はダミーです)
- ベストアンサー
- オフィス系ソフト