VB側からスクリプト上のJS関数を実行できないか?

解決


nori  2004-09-18 14:37:59  No: 116376  IP: [192.*.*.*]

お世話になってます。また勉強させて下さい

フォーム上のWebBrowserコントロールで
このようなHTMLファイルを表示させたとして・・

<html><head>
<script language="javascript" src="hoge.js"></script>
</head>
<body>test</body></html>

で、JSファイルにはこの記述だけを・・
function hoge(){ alert("test"); }

で質問なのですが、VB側からスクリプト上のhoge関数を実行できないものでしょうか
MSHTML.HTMLScriptElementを利用してhogeを指定するのではないかと推測してますが、
いい凡例を得られないのでこちらに質問させていただきました

またまた宜しくお願いします

編集 削除
nori  2004-09-25 03:59:57  No: 116377  IP: [192.*.*.*]

時効ですかね
ありがとうございました

編集 削除
IMA  2004-09-25 07:23:45  No: 116378  IP: [192.*.*.*]

noriさん、こんにちは

Resが無いのは寂しいですよね。  

ところで私も、"JS関数"とは、てっきり "Justsystem"製品の関数かと思って
本文を見ませんでした。  (^_^;)

一応解決となっていますが、以下で呼び出せるはずですが


WebBrowser1.Navigate2 "C:\hoge.htm"
Do While WebBrowser1.Busy
    DoEvents
Loop
WebBrowser1.Document.parentWindow.execScript "jscript:hoge()"

(  この例では hoge.jsはC:\に有ります )

ご参考までに

編集 削除
nori  2004-09-25 23:13:30  No: 116379  IP: [192.*.*.*]

IMAさん、返信ありがとうございます
もうあきらめていたので今この返信に気付きました
すごいうれしいです!ネ申だ!!

提示頂いたソースを動かしてみたところバッチリです
お世話になりました。ありがとうございます!!

編集 削除