Gönderen Konu: Sitenin Yüklenme Durumunu Durum Çubuğunda Gösteren Kod.  (Okunma sayısı 2851 defa)  Share 

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı Faik Özkara

  • "Hedef Bilgi Toplumu" - TRT Bilişim Rüzgarı
  • Genel Yönetici
  • Usta
  • *****
  • İleti: 4616
  • Toplam: 208
  • Kocaeli Üniversitesi Otomotiv Teknikeri
    • http://flavors.me/FaikOzkara
<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>

                   
                                 Not:Alıntıdır.
You are not allowed to view links. Register or Login

Çevrimdışı netron

  • İlk Adım
  • *
  • İleti: 10
  • Toplam: 0
  • Bilgi Paylaştıkca Çoğalır Emeğe Saygı varsa ):
    • Webmaster Paylaşım Portalı :)
BİDE BÖLESİ VAR
« Yanıtla #1 : 22 Eylül 2007, 21:01:36 »
Arkadaşım Teşşkür ederim öncelikle Bide Şölesi var  :P hizmet açısından

Sanki Bölesi Daha

-------------------KOD----------------------

<style type="text/css">
<!--
#loading {
    width: 200px;
    height: 100px;
    position: absolute;
    left: 50%;
    top: 50%;
    margin-top: -50px;
    margin-left: -100px;
    text-align: center;
}
-->
</style>
 
<div align="center">
   <table width="93%" cellspacing="0" cellpadding="0" style="padding-top: 1px; padding-bottom: 1px">
   <tr>
     <td></td>
      <td bgcolor="#ffffff" align="center" >


<script type="text/javascript">
document.write('<div id="loading"><br><br><b><font face="Tahoma" size="2">Sayfa Yükleniyor, Lütfen Bekleyin..</div></font></b></div>');
window.onload=function(){
document.getElementById("loading").style.display="none";
}
</script> 

<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 = "Sayfamız Yükleniyor Lütfen Bekleyiniz : " & Bar & "%" & " " & String(Bar, Line)
setTimeout "Count()", SP
Else
Window.Status = "COPYRİGHT bY Dursun Koca"
Document.Body.Style.Display = ""
End If
End Function

Call Count()

-->
</SCRIPT>

Çevrimdışı muradcevik

  • Çömez
  • **
  • İleti: 52
  • Toplam: 5
Ynt: Sitenin Yüklenme Durumunu Durum Çubuğunda Gösteren Kod.
« Yanıtla #2 : 16 Mart 2008, 15:46:25 »
bakalım hangisi daha güzel
BİR TÜRK DÜNYAYA BEDEL ON TÜRK DÜNYAYI FETHEDER.

Bilişim Forum

Ynt: Sitenin Yüklenme Durumunu Durum Çubuğunda Gösteren Kod.
« Yanıtla #2 : 16 Mart 2008, 15:46:25 »

 

İstediğiniz Sorudan Başlayabilirsiniz | Doktor a Sor