这里应用了ASP随机函数。
首先准备了10 张图片,名称为 1.gif 至 10.gif ,只要得到 1-10 的随机数就 OK !
‹%
randomize
dim k
k=cint(rnd*10)
if k=0 then
k=k+1
end if
%›
‹img src="‹%=k%›.jpg" width="..." height="..."›
说.明
ASP 程序主要遵循 Visual Basic 的语法。
Rnd 函数随机产生0到1之间的单倍精确浮点数,会返回固定顺序的随机数,这个顺序称之为随机数初始值。
单倍精确浮点数 = Rnd [(指定数值或数值表达式)]
参数 > 0,随机产生
参数 = 0,复制最近一次的随机数
参数 < 0,产生固定值的随机数
Randomize 函数依据用户指定的随机数初始值决定随机数的顺序。
Cint 函数依据四舍六入的原则将表达式转换成整数。一般说来,Cint 函数根据小数位数和整数位数不同,而有不同的进位方式。 整数 = Cint (表达式)
小数部分 < 0.5,舍弃小数
小数部分 > 0.5,进位
小数部分 = 0.5,如整数为奇数,进位;如整数为偶数,舍弃小数
注.意
1 程序中应该先设置随机数初始值 Randomize
2 程序取整的是小数部分第一位的数值,会得到 0-10 的整数