Webbrowseコントロールで画像の表示ON/OFFは、可能なのでしょうか？

解決

---

タイトルそのままなのですが、
Webbrowseコントロールで画像の表示ON/OFFは、可能なのでしょうか？

VB6.0SP6
Win2000
IE6.0

編集 削除

---

できません

編集 削除

---

出来ないことはないと思いますけど

方法としては

■OFFの仕組み
Webbrowseコントロールから変数にソースを受け渡し、
その変数から画像などを表示させているソースを変えます。
HTML言語での画像表示ソースは下に書いておきます。
○  <img src="パス">

○  background="パス"

○  background-image:url("パス");

とこんな感じです。あと、HTML言語の場合は全て大文字になるという場合もあるので注意してください。
んで上に書いたものをindexOf関数とsubstring関数のコンボで検索し、切り離します。
次にパスを変えるか画像を表示させている全体を消すかは本人の自由です。
でも、表示方法がこの二つではかなり変わってきてしまいます。
あとは、ソースをつなげます。
そのソースをWebbrowseコントロールに送りホームページを表示します。

■ONの仕組み
URLを入力されてホームページを表示したときに変数にアドレスを入れておき、
ONを押したときにその変数からURL(アドレス)を使い再表示させます。

編集 削除

---

マグさま
ありがとうございます。
例えば、エクスプローラのオプションの中に設定で画像を表示する。
がありますが、これをON/OFFすることは、むずかしいのでしょうか？

編集 削除

---

私はそういう操作をやったことがないのでわかりません。

編集 削除

---

VB.NETやVB6などにそのような関数はおそらく用意されていないでしょう。

よって、Shell関数を使しかありません。
たしか、Shell関数ってコマンドプロンプトのことですか?
もし、そうならば、私はおそらく、聞かれても答えられないと思います。
一度もコマンドプロンプトを勉強したことがないんです。（笑

Autorunで使うためにちょっとぐらいは知っていますけどネ(^^;)

編集 削除

---

こんなのありましたが、
VBでは、無理でしょうね？

http://www.geocities.co.jp/SiliconValley-Sunnyvale/5277/maruchi_sec.html

編集 削除

---

OnAmbientPropertyメソッドを実装する必要があるみたいですね。
このメソッドの dispid引数 に 
  Const DISPID_AMBIENT_DLCONTROL As Long = -5512&
が渡された時に、pvar引数に、
  Const DLCTL_DLIMAGES As Long = &H10&
のフラグを立てるようにし、その後、
  Dim objOleControl As IOleControl
  Set objOleControl = WebBrowser1.Application
  objOleControl.OnAmbientPropertyChange DISPID_AMBIENT_DLCONTROL
  Set objOleControl = Nothing
のようにして、それを反映させる…という手順になるようです。

ただ、OnAmbientProperty メソッドを VB6 にて実装する方法は、
私にもわかりません。。。

編集 削除

---

C言語系をVB系に変える装置を作っている方いませんか？

編集 削除

---

遅くなり、大変申し訳ありませんでした。
魔界の仮面弁士さまありがとうございました。

>マグ 2004/06/29(火) 11:11:28
>C言語系をVB系に変える装置を作っている方いませんか？

私の質問とは、関係ないと思うのですが。

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。