// this is only for IE
function GetPluginArray()
	On error resume next
	pluginArray = Array(false,false,false,false)
	' Detect Cortona
	pluginArray(0) = NOT IsNull(CreateObject("Cortona.Control"))
	' Detect Blaxxun CC3D
	pluginArray(1) = NOT IsNull(CreateObject("blaxxunCC3D.blaxxunCC3D"))
	' Detect Cosmo Player 1 & 2
	pluginArray(2) = NOT IsNull(CreateObject("SGI.CosmoPlayer.1"))
	pluginArray(3) = NOT IsNull(CreateObject("SGI.CosmoPlayer.2"))
	' Detect Pivoron Player
	pluginArray(4) = NOT IsNull(CreateObject("Nexternet.NexternetPlayer.1"))
	' Return
	GetPluginArray = pluginArray
end function