ShowMe中ActiveX文件夹下有现成的范例，打开看一下，主要是以下几句：
--this is the ID of the control, you can determine the ID by clicking Options and then URL from the Sprite Icon Properties dialog box.
IDFlash:= "{D27CDB6E-AE6D-11CF-96B8-444553540000}"
if ActiveXControlQuery(IDFlash) = 0 then
-- check for the security settings that will allow us to download all controls
MB_Returnedvalue:=6
repeat while (ActiveXDownloadSetting() = "Disabled" | ActiveXSecuritySetting() ="High"
& MB_Returnedvalue=6
MB_Caption:="ActiveX Security Settings"
MB_BodyText:="Your ActiveX Security settings may prevent this application from installing an ActiveX control. You must enable ActiveX downloading and set the Security Method to Medium or None. Would you like to change your settings now?"
MB_BoxNumber:=36
MB_Returnedvalue:=MessageBox(WindowHandle,MB_BodyText,MB_Caption,MB_BoxNumber)
if MB_Returnedvalue=6 then
ActiveXSecurityDialog()
end if
end repeat
-- call the download function of the control
ActiveXControlDownload(IDFlash, "swflash.cab", -1, -1, -1, -1)
end if
