www.cakal.net Forumları YabadabaDuuuee - Tek Mesajı Görüntüle

**TiTaN** · 07-08-2007, 09:56 PM

PHP Code:


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

07-08-2007, 09:56 PM	#1
TiTaN ÇaKaL Üye Üyelik Tarihi: Jun 2007 Konum: Houston Mesajlar: 1,880 Teşekkür Etme: 32 Thanked 29 Times in 24 Posts Üye No: 43307 İtibar Gücü: 1800 Rep Puanı : 7482 Rep Derecesi : Cinsiyet : Erkek	Yükleniyor yazısı! PHP Code: `<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>` __________________ I walk this empty street on the boulevard of broken dreams where the city sleeps and I'm the only one and I walk alone!!