on error resume next
FlashInstalled = (IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.4")))
If FlashInstalled = False then
location.href = "index2.html"
End If