ASP Sitenin yüklenme durumunu durum çubugunda gösteren kod

S
⚪ Konu sahibi son olarak 3609 gün önce görüldü
Kod: 
<SCRIPT language=VBScript>   <!--       Dim Bar, Line, SP   Bar = 0    Line = "|"   sP = 100       Function Window_onLoad()   Bar = 95   sP = 10   END Function       Function Count()   If Bar < 100 Then   Bar = Bar + 1   Window.Status = "Yükleniyor: " & Bar & "%" & " " & String(Bar, Line)   setTimeout "Count()", SP   Else   Window.Status = "Yükleme Bitti"   Document.Body.Style.Display = ""    End If    End Function       Call Count()       -->   </SCRIPT>
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri