Konuyu Oyla:
  • Toplam: 1 Oy - Ortalama: 1
  • 1
  • 2
  • 3
  • 4
  • 5
Sayfa yükleniyor
#1
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>
Ara
Cevapla PGM
Teşekkür verenler:
#2
Teşekkürler. Direk mi eklicez?
Ara
Cevapla PGM
Teşekkür verenler:
#3
Teşekkürler.
Ara
Cevapla PGM
Teşekkür verenler:
#4
Nereye eklencek ?
Cevapla PGM
Teşekkür verenler:
#5
Bu normal forum siteleri icin Gecerli deildir. eger eklicem diyorsan bütün sayfalarda gözükmesi icin footer yada header e ekleyiniz.
Ara
Cevapla PGM
Teşekkür verenler:
#6
Ben eklemicem de eklemek isteyenler için sordum, saol...
Cevapla PGM
Teşekkür verenler:


Hızlı Menü:


Şu anda bu konuyu okuyanlar: 1 Ziyaretçi



Reklam yaziniz bostur. ayarlardan duzenleyiniz:medi -

Online Shopping App
Online Shopping - E-Commerce Platform
Online Shopping - E-Commerce Platform
Feinunze Schmuck Jewelery Online Shopping