with(document) {
	writeln('<script language="VBScript">');
	writeln('function detectFlashActiveX()');
	writeln('on error resume next');
	writeln('detectFlashActiveX=(IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash.5")))');
	writeln('end function');
	writeln('</script>');
}
var gotFlash=false;
if( ( navigator.mimeTypes && navigator.mimeTypes['application/x-shockwave-flash'] && parseInt( navigator.mimeTypes['application/x-shockwave-flash'].enabledPlugin.description.substring( navigator.mimeTypes['application/x-shockwave-flash'].enabledPlugin.description.indexOf( '.' ) - 1 ) ) >= 5 ) || ( navigator.userAgent.indexOf( 'MSIE' ) && navigator.userAgent.indexOf( 'Windows' ) != -1 ? eval( "detectFlashActiveX" + "()" ) : false ) ) {
	gotFlash=true ;
} else { 
	gotFlash=false;
}