Sayfa yükleniyor kodu
3 posters
1 sayfadaki 1 sayfası
Sayfa yükleniyor kodu
- Kod:
<SCRIPT language=VBScript><br />
<!--<br />
<br />
Dim Bar, Line, SP<br />
Bar = 0 <br />
Line = "|"<br />
sP = 100<br />
<br />
Function Window_onLoad()<br />
Bar = 95<br />
sP = 10<br />
END Function<br />
<br />
Function Count()<br />
If Bar < 100 Then<br />
Bar = Bar + 1<br />
Window.Status = "Yükleniyor: " & Bar & "%" & " " & String(Bar, Line)<br />
setTimeout "Count()", SP<br />
Else<br />
Window.Status = "Yükleme Bitti"<br />
Document.Body.Style.Display = "" <br />
End If <br />
End Function<br />
<br />
Call Count()<br />
<br />
--><br />
</SCRIPT>
Similar topics
» Sayfa yükleniyor kodu
» JavaScript Sayfa yönlendirme kodu
» Bulanarak sayfa geçişi
» Zikzaklı sayfa geçiş efekti
» iyisay.com kodu
» JavaScript Sayfa yönlendirme kodu
» Bulanarak sayfa geçişi
» Zikzaklı sayfa geçiş efekti
» iyisay.com kodu
1 sayfadaki 1 sayfası
Bu forumun müsaadesi var:
Bu forumdaki mesajlara cevap veremezsiniz