banner.js

Visual Basic开发实用编程200例 网络编程实例

function show_swf(n)
{
		with(document)
		{
			write("<object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000' codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0' width='468' height='60'>");
			write("<param name=movie value='http://www.263.net/imgad/"+img[n]+"'>");
			write("<param name=quality value=high>");
			write("<embed src='http://www.263.net/imgad/"+img[n]+"' quality=high pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash' width='468' height='60'></embed></object>");
		}
}

var array_val=9;

var url = new Array(array_val);

url[0] = "#";
url[1] = "#";
url[2] = "www.bol.com.cn/cgi-bin/bol/bol/hmp_dp_006.jsp?referCode=33191";
url[3] = "#";
url[4] ="china.alibaba.com/index.html?263=2631";
url[5]="#";
url[6]="#";
url[7]="#";
url[8] = "#" ;
url[9] = "china.alibaba.com/index.html?263=2631" ;

var img = new Array(array_val);

img[0] = "96600_468__2231028.swf";
img[1] = "egg_468x60.swf";
img[2] = "bv441031_468x60_cd11.gif";
img[3] = "95963_20031111.swf";
img[4] = "alibaba_01.gif";
img[5] = "sea_468x60_2003814.swf";
img[6] = "95963_20031111.swf";
img[7] = "sinobnet468_20031021.swf";
img[8] = "smsgame468-_20030829.swf" ;
img[9] = "alibaba_01.gif" ;



var n= Math.round(Math.random() * (array_val));

if (n<=array_val)
{
	if ( n==0 || n==1 || n==3 || n==5 || n==6 || n==7 || n==8 )
	{
		show_swf(n);
	}
	else
	{
		document.write("<a target=_blank href=http://"+url[n]+"><img src=http://www.263.net/imgad/"+img[n]+" border=0 width=468 height=60></a>");
	}
}