做一个首页叫default.asp,内容如下：

<%
Dim Myvalue
randomize
Myvalue = Int((5 * Rnd) + 1)
if Myvalue=1 then
Response.redirect("index1.htm")
elseif Myvalue=2 then
Response.redirect("index2.htm")
elseif Myvalue=3 then
Response.redirect("index3.htm")
elseif Myvalue=4 then
Response.redirect("index4.htm")
end if%>

其中index1---------4.htm是随机显示的叶面。把站点的默认首页设为default.asp。ok