VB側よりHTMLのjavascriptをキック、その後表示していたPDFが表示されなくなる現象を回避するには？

こう 2011-06-07 20:45:53 No: 102949

いつも大変お世話になっております、こうです。

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>