变态重口极致另类在线-波多久久夜色精品国产-波多野结衣在线观看一区-波多野结衣在线观看一区二区-污污的网站免费阅读-污污视频网址

當(dāng)前位置: 首頁(yè)IT技術(shù) → 用ASP+CSS實(shí)現(xiàn)隨機(jī)背景的實(shí)例代碼分享

用ASP+CSS實(shí)現(xiàn)隨機(jī)背景的實(shí)例代碼分享

更多

這篇文章提供給大家分享學(xué)習(xí)的是關(guān)于用ASP+CSS實(shí)現(xiàn)隨機(jī)背景的實(shí)例代碼,希望能夠給大家?guī)?lái)幫助或啟發(fā)。

隨機(jī)背景--當(dāng)你每次進(jìn)入該頁(yè)面時(shí),從已指定的圖片文件夾中,隨機(jī)選取一個(gè)圖片作為背景顯示。這里介紹的方法是用ASP+CSS來(lái)實(shí)現(xiàn)的。

ASP--來(lái)自ASP101

以下是引用片段:
Const IMGS_DIR = "/images" 
 '設(shè)定圖片文件夾的地址,隨機(jī)顯示該文件夾內(nèi)任一張圖片
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(<%= strImageSrcText %>) no-repeat;
    margin: 2em auto;
}

上面代碼要加在header區(qū),不能放在外部CSS文件里。

熱門評(píng)論
最新評(píng)論
發(fā)表評(píng)論 查看所有評(píng)論(0)
昵稱:
表情: 高興 可 汗 我不要 害羞 好 下下下 送花 屎 親親
字?jǐn)?shù): 0/500 (您的評(píng)論需要經(jīng)過(guò)審核才能顯示)
主站蜘蛛池模板: 香蕉成人在线视频 | 日本一区二区在线播放 | 欧美一级亚洲一级 | 伊人激情 | 狠狠色狠狠色综合人人 | 夜色在线影院 | 色婷婷狠狠 | 很黄很黄很刺激的视频免费 | 91成人高清在线播放 | 欧美高清videosex极品 | 免费国产高清精品一区在线 | 久久精品国产欧美日韩亚洲 | 麻豆国产高清在线播放 | 国产欧美亚洲另类第一页 | 性色a v 一区| 欧洲一级毛片免费 | 国产真实乱freesex | 爽爽视频在线观看 | 国产亚洲欧美日韩综合综合二区 | 婷婷狠狠干 | 污视频免费在线播放 | 免费大香伊蕉在人线国产 | 日韩欧美一区黑人vs日本人 | 国产欧美日韩一区二区三区 | 国产亚洲精品自在久久77 | 国产日韩欧美911在线观看 | 夜夜狠| 国产特级全黄一级毛片不卡 | 在线中文字幕播放 | 青青草娱乐 | 1024香蕉视频 | 黄色免费在线观看网址 | 色迷迷网免费站视频在线观看 | 色香蕉在线观看网站 | 久久综合香蕉 | 欧美成人性生活片 | 久草视频精品 | 新版天堂中文资源官网 | 亚洲综合男人的天堂色婷婷 | 日本三级在线观看免费 | 欧美精品在线免费观看 |