www.cakal.net Forumları YabadabaDuuuee

www.cakal.net Forumları YabadabaDuuuee (http://www.cakal.net/index.php)

- Eskiler (Arşiv) (http://www.cakal.net/forumdisplay.php?f=188)

- - Yükleniyor yazısı! (http://www.cakal.net/showthread.php?t=74992)

TiTaN

07-08-2007 09:56 PM

Yükleniyor yazısı!

PHP 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>

Saat Dururmu GMT +3. Şimdiki Zaman 05:08 PM.