Yukleniyor Yazısı

**Black Wildness** · 10-29-2006, 10:06 AM

navbar templatesi'nin en altına alttaki kodları ekle....

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>

**shAnk** · 12-17-2006, 01:50 PM

saoL Ama ßana GüzeL ßi indEx Lazım Ordan Yönlendirme yapıcam :) güzeL ßişi Bulamadım gitti

10-29-2006, 10:06 AM	#1 (permalink)
Black Wildness Görev Alma Vakti Ezberim Üyelik BiLgilerim Üyelik tarihi: Aug 2006 Nerden: ..::Forever Me-tallica::.. Yaş: 2 Üye No: 22 Mesajlar: 1.238 Ezberim Tşk İstatistikleri Tesekkür: 79 72 Mesajına 140 Kere Teşekkür Edildi Ezberim Rep PuanLaması İtibar Gücü: 82 Rep Puanı: 5690 Rep Derecesi:	Yukleniyor Yazısı navbar templatesi'nin en altına alttaki kodları ekle.... 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>

12-17-2006, 01:50 PM	#2 (permalink)
shAnk Ezberci Olmuş Ezberim Üyelik BiLgilerim Üyelik tarihi: Dec 2006 Yaş: 16 Üye No: 11002 Mesajlar: 31 Ezberim Tşk İstatistikleri Tesekkür: 7 7 Mesajına 16 Kere Teşekkür Edildi Ezberim Rep PuanLaması İtibar Gücü: 0 Rep Puanı: 160 Rep Derecesi:	saoL Ama ßana GüzeL ßi indEx Lazım Ordan Yönlendirme yapıcam :) güzeL ßişi Bulamadım gitti

Konu Araçları
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder