<!--
on error resume next
	dim flashVersion, i
	for i = 3 to 99
		IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash." & i))
		if Err = 0 then
			flashVersion = i
	end if
next
'-->'