教程中国
PHOTOSHOP CS9.0中文版 MAYA 8.5 FOR WINDOWS Corel Painter v9.0 Flash MX2004 中文版 Illustrator cs2 中文版
VC++6.0含sp6 中英文版 VB6.0 +sp6 简体中文版 Borland Delphi 7汉化版 MSDN for vb6.0中文版 Visual Studio 2005简体
教程中国下属 文件存储共享专家BIBIDU.COM 提供大型软件,教材,源码,电影,音乐,图书等下载 更多精品请点此进入
  您目前所在位置: 教程中国 >> 编程基地 >> ASP >> 动态显示图片的函数(显示广告条) RSS订阅
动态显示图片的函数(显示广告条)
教程(视频,书籍)下载:  ASP.NET AutoCAD 数据库 C# ASP java photoshop 网页设计 delphi 3dmax Flash C++ VB 张孝祥 实例   更多请进入BIBIDU搜索
IT搜索引擎   
function ShowAd(){
var Ad_Img=new Array(10);
var Ad_Link=new Array(10);
var Ad_Showtime=new Array(10);
var Totle_Showtim=0;

//投放广告的图片路径
Ad_Img[0]="/img/Banner/01.jpg";
Ad_Img[1]="/img/Banner/02.gif";
Ad_Img[2]="/img/Banner/03.gif";
Ad_Img[3]="/img/Banner/04.gif";
Ad_Img[4]="/img/Banner/05.gif";
Ad_Img[5]="/img/Banner/06.gif";
Ad_Img[6]="/img/Banner/07.gif";
Ad_Img[7]="/img/Banner/08.gif";
Ad_Img[8]="/img/Banner/09.gif";
Ad_Img[9]="/img/Banner/10.gif";

//投放广告的链接名称
Ad_Link[0]="#";
Ad_Link[1]="#";
Ad_Link[2]="#";
Ad_Link[3]="#";
Ad_Link[4]="#";
Ad_Link[5]="#";
Ad_Link[6]="#";
Ad_Link[7]="#";
Ad_Link[8]="#";
Ad_Link[9]="#";

//投放广告的出现概率,数值越大可能性越大,必须大于等于0
Ad_Showtime[0]=0;
Ad_Showtime[1]=1;
Ad_Showtime[2]=2;
Ad_Showtime[3]=3;
Ad_Showtime[4]=4;
Ad_Showtime[5]=5;
Ad_Showtime[6]=6;
Ad_Showtime[7]=7;
Ad_Showtime[8]=8;
Ad_Showtime[9]=9;

var i;

for(i=0;i<10;i++){
Totle_Showtim+=Ad_Showtime[i];
}

for(i=0;i<10;i++){
if(i!=0){
Ad_Showtime[i]+=Ad_Showtime[i-1];
}
}

for(i=0;i<10;i++){
Ad_Showtime[i]/=Totle_Showtim
}

var Display_Ad;
var rnd;
rnd=Math.random();

if(rnd<=Ad_Showtime[0]){
Display_Ad=0;
}
else if(rnd<=Ad_Showtime[1]){
Display_Ad=1;
}
else if(rnd<=Ad_Showtime[2]){
Display_Ad=2;
}
else if(rnd<=Ad_Showtime[3]){
Display_Ad=3;
}
else if(rnd<=Ad_Showtime[4]){
Display_Ad=4;
}
else if(rnd<=Ad_Showtime[5]){
Display_Ad=5;
}
else if(rnd<=Ad_Showtime[7]){
Display_Ad=6;
}
else if(rnd<=Ad_Showtime[7]){
Display_Ad=7;
}
else if(rnd<=Ad_Showtime[8]){
Display_Ad=8;
}
else {
Display_Ad=9;
}

writeHTML="<a href="http://www.blue1000.com/article/+Ad_Link[Display_Ad]+"><img src="../../+Ad_Img[Display_Ad]+" border=0></a>";
document.write (writeHTML);
}



来源:upschool.com.cn
作者:
关键字:动态显示图片,函数,显示广告条
发表日期:2004-6-21

网页显示有限 阅读全文请下载本文完整版WORD文档

上一篇:base64编码、解码函数   下一篇:一种在父窗口中得知window.open()出的子窗口关闭事件的方法


2008-11-21 18:06:27
本文的相类似文章
  • VB简单计算函数的编写过程
  • API函数快速入门--怎样在VB中声明和使用API函数
  • 注册表操作函数集
  • Oracle聚合函数RANK和dense_rank的使用
  • Oracle学习之Oracle分析函数(二)
  • 查查oracle函数宝典,看看函数大全
  • Oracle 9i 分析函数参考手册
  • SQL Server和Oracle的常用函数对比
  • 如何在Oracle/2000中调用Windows API函数
  • 如何创建隐藏IP地址的最后一项的函数
  • 在学习中进步 在进步中成长 教程中国相随您的成长之路
    华腾联合科技股份有限公司版权所有
    广告联系:Rosibo@163.com