打印本文 打印本文  关闭窗口 关闭窗口  
教你用ASP+CSS实现网页随机背景
作者：陈鹏  文章来源：eNet  点击数  更新时间：2009/9/12 8:44:42  文章录入：陈鹏  责任编辑：陈鹏
    随机背景--当你每次进入该页面时，从已指定的图片文件夹中，随机选取一个图片作为背景显示。这里介绍的方法是用ASP+CSS来实现的。

　　ASP源代码：

以下是引用片段：
　　Const IMGS_DIR = "/images"
　　'设定图片文件夹的地址，随机显示该文件夹内任一张图片
　　Dim objFSO, objFolderObject, objFileCollection, objFile
　　Dim intFileNumberToUse, intFileLooper
　　Dim objImageFileToUse
　　Dim strImageSrcText
　　Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
　　Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR))
　　Set objFSO = Nothing
　　Set objFileCollection = objFolderObject.Files
　　Set objFolderObject = Nothing
　　Randomize()
　　intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1
　　intFileLooper = 1
　　For Each objFile in objFileCollection
　　If intFileLooper = intFileNumberToUse Then
　　Set objImageFileToUse = objFile
　　Exit For
　　End If
　　intFileLooper = intFileLooper + 1
　　Next
　　Set objFileCollection = Nothing
　　strImageSrcText = IMGS_DIR & objImageFileToUse.Name
　　Set objImageFileToUse = Nothing

　　CSS源代码：

以下是引用片段：
　　#pic{
　　width: 400px;
　　height: 300px;
　　background: url() no-repeat;
　　margin: 2em auto;
　　}

　　上面代码要加在head区，不能放在外部CSS文件里。
打印本文 打印本文  关闭窗口 关闭窗口