Use this script to check if activeX is installed and ifa particular ActiveXelement is available.
--Copyright 1999 Chuck Neal
--chuck@mediamacros.com
--If you find this code helpful, send me an e-mail and let me know. :-)
on checkActiveX whatControl
set theList= []
if ActiveXInstalled() = -1 then
add theList, 1
else
add theList, 0
end if
if ActiveXControlQuery(whatControl) = -1 then
add theList, 1
else
add theList, 0
end if
return theList
end
on getBehaviorDescription me
return "This script verifies the presence of ActiveX and the presence of the specified ActiveX control. To get the control ID, open the ActiveX element, click the URL button and then click copy."
end
Contact
MMI
36 South Court Sq
Suite 300
Newnan, GA 30263
USA