2017年11月
      1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30    
無料ブログはココログ

« IE7の「リンク」バーからアプリを起動する。 | トップページ | コンソールコマンドを実行して、そのコンソールログを採取するコマンドをVB.NETで作る »

2008年9月 5日 (金)

ShellWindowsでWindows SearchのItem(n).Documentを見るとエラーになる。

Windows Searchを開いていると、Item(n).Documentを見るだけで、エラーになります。

エラー: クラスはオートメーションをサポートしていません。
コード: 800A01AE

この対処法は、エラーを拾ってもよいのですが、次でも迂回できます。

For Each ie In CreateObject("Shell.Application").Windows()
  If Right(ie.LocationName,17)=" - Windows Search" Then
    MsgBox "Windows Search"
  Else
    MsgBox TypeName(ie.Document)
  End If
Next

« IE7の「リンク」バーからアプリを起動する。 | トップページ | コンソールコマンドを実行して、そのコンソールログを採取するコマンドをVB.NETで作る »