function show_cmd_swf(url,vars,_width,_height,id,Function){
str="<script language=VBScript>sub "+id+"_FSCommand(command,args):call "+id+"_DoFSCommand(command,args):end sub</script>";
str+=('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" ');
window[id+"_DoFSCommand"]=Function;
str+=('codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0" width="'+_width+'" height="'+_height+'" align="middle" id='+id+'>');
str+=('<param name="allowScriptAccess" value="sameDomain" />');
str+=('<param name="WMode" value="transparent" />');
str+=('<param name="movie" value="'+url+'" />');
if(vars)str+=('<param name="FlashVars" value="'+vars+'" />');
str+=('<param name="quality" value="high" />');
str+=('<param name="bgcolor" value="#000000" />');
str+=('<embed name='+id+' src="'+url+'" quality="high" bgcolor="#000000" width="'+_width+'" height="'+_height+'" align="middle" allowScriptAccess="sameDomain" FlashVars="'+vars+'" wmode="transparent" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" /></object>');
document.write(str);
}