用ASP+CSS實現網頁隨機背景
2006/11/30 11:33:46
隨機背景--當你每次進入該頁面時,從已指定的圖片文件夾中,隨機選取一個圖片作為背景顯示。這里介紹的方法是用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文件里。

返回列表
返回首頁 主站蜘蛛池模板: 亚洲色图欧美在线| 久99久热只有精品国产女同| 熟妇人妻中文字幕| 国产一精品一av一免费爽爽| 天堂久久久久久中文字幕| 在线视频中文字幕| 免费观看a黄一级视频| 青柠直播在线观看高清播放| 国产精品久久久久久亚洲小说| avtt在线观看| 性xxxxx大片免费视频| 久久99九九国产免费看小说| 日韩美女在线视频网站免费观看| 亚洲成a人片在线看| 爱情岛亚洲论坛福利站| 六月丁香婷婷天天在线| 色噜噜一区二区三区| 国产女人aaa级久久久级| 老司机激情影院| 国产美女一级做a爱视频| aaa毛片免费观看| 奷小罗莉在线观看国产| 一道本在线视频| 打屁股xxxx| 久久久精品久久久久三级| 日韩精品一区二区亚洲av观看| 亚洲午夜一区二区三区| 老司机深夜影院| 在线视频亚洲欧美| а√最新版地址在线天堂| 成人欧美在线视频| 久久99精品波多结衣一区| 日本精品高清一区二区| 久热这里只有精品视频6| 欧美一级黄色片免费看| 亚洲成a人片在线观看中文动漫| 波多野结衣伦理片在线观看| 人人添人人澡人人澡人人人爽| 隔壁老王国产在线精品| 国产成人精品免费久久久久 | 再深一点再重一点|