Put the following at the bottom of the page: Code You can.
Copy code The Code is as follows: <SCRIPT>
Function flashrun ()
{
VaR d = Document. getelementsbytagname ("object ")
For (x = 0; x <D. length; X ++)
{
VaR A = string (d [X]. classid)
If (! = "CLSID: D27CDB6E-AE6D-11cf-96B8-444553540000") continue
VaR aw = d [X]. Width
VaR Ah = d [X]. Height
VaR sr = ""
VaR d1 = d [X]. getelementsbytagname ("Param ")
For (xx = 0; XX <d1.length; XX ++)
{
If (d1 [xx]. Name = "move") Sr = D1 [X]. Value
}
If (SR! = "")
VaR T = '<object classid = "CLSID: D27CDB6E-AE6D-11cf-96B8-444553540000" codebase = "http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,0,0" width =' + aw + 'height = '+ AH +'>'
+ '<Param name = movie value = "' + Sr + '">'
+ '<Param name = wmode value = transparent>'
+ '<Param name = loop value = true>'
+ '<Param name = Quality value = high>'
+ '<Embed src = "' + Sr + '" loop = true wmode = opaque Quality = high swliveconnect = false width =' + aw + 'height = '+ AH + 'Type = "application/X-Shockwave-flash" pluginspage = "http://www.macromedia.com/shockwave/download/index.cgi? P1_prod_version = shockwaveflash "> </embed>'
+ '</Object>'
D [X]. outerhtml = T
}
}
</SCRIPT>