<!--
on error resume next
If action = "ie_exec" then
	FlashInstalled =(IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.4")))
End If
If FlashInstalled = "True" then
	flash4 = "yes"
End If
//-->