状态栏的进度条_JS特效代码

最新状态栏的进度条_JS特效代码html

如下是三零网为你们整理的最新状态栏的进度条_JS特效代码的文章,但愿你们可以喜欢!ide


 <script language=VBScript>
Dim Bar, Line, SP
Bar = 0  
Line = "|"
SP = 100spa

Function Window_onLoad()
  Bar = 95
  SP = 10
End Functionhtm

Function Count()
  If Bar < 100 Then
    Bar = Bar + 1
    Window.Status = "已经完成了" & Bar & "%" &  " " & String(Bar, Line)
    setTimeout "Count()", SP
  Else
    Window.Status = "欢迎你的光临电脑维护网!!!"
    Document.Body.Style.Display = ""
  End If    
End Functionip

Call Count()
</script>ci

转载来自:http://www.q3060.com/list3/list115/328.htmlget

相关文章
相关标签/搜索