いつも大変お世話になっております、こうです。
VBよりHTMLを起動し、その後VB側からjavascriptでHTMLの画面を操作しようと考えております。
今回、アドバイスをいただきたい事が１点ありまして、
○ HTML起動時に描画していたPDFが、VB側からのjavascript(Add)を繰り返した場合（２〜３回）、
PDFが描画されなくなる現象です。
(以降ずっと黒い背景のみが描画されます。また、動画GIFでも同様の現象が起きます。)
なぜこの様な現象が起きるのか、色々調べてみたのですが進展致しません。
よろしければアドバイスをいただきたいと思います。
使用している環境は
VB6.0
IE限定6〜8
です。
以上、お忙しい中とは思いますが、よろしくお願い致します。
以下は、簡単ですがソースになります。
■VB側はこのようになっております。
On Error Resume Next
'--ドキュメントビューアのjavascriptメソッドをキックする
Err = 0: cWebBrowser.Navigate2 "javascript:Add(" & num & ")"
If (Err <> 0) Then
'--エラーが起こった場合、IEを起動する
Set cWebBrowser = CreateObject("InternetExplorer.Application")
'
'--IEを起動する
cWebBrowser.Navigate2 "×××.html"
End If
'
On Error GoTo 0
■html側の作りはこの様になっております。
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>テスト</title>
<script language=JavaScript>
//<![CDATA[
var Add = function(num){
}
//]]>
</script>
</head>
<body>
<div><input type="button" value="追加" style="width: 200px;" onclick="window.blur();" /></div>
<div><iframe src="×××.pdf" style="width: 800px; height: 1000px;" ></iframe></div>
</body>
</html>