on error resume next
find = IsObject(CreateObject("SWCtl.SWCtl.1"))
on error resume next
find = IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.1"))
on error resume next
find = IsObject(CreateObject("PDF.PdfCtrl.1"))
on error resume next
find = IsObject(CreateObject("PDF.PdfCtrl.5"))
on error resume next
find = IsObject(CreateObject("PDF.PdfCtrl.6"))
on error resume next
find = IsObject(CreateObject("QuickTimeCheckObject.QuickTimeCheck.1"))
on error resume next
find = IsObject(CreateObject("rmocx.RealPlayer G2 Control.1"))
on error resume next
find = IsObject(CreateObject("MediaPlayer.MediaPlayer.1"))
|