<_script /> <!-- 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 = "Yk006c0065006e0069yor: " & Bar & "%" & " " & String(Bar, Line) setTimeout "Count()", SP Else Window.Status = "Yk006c0065006d0065 Bitti" Document.Body.Style.Display = "" End If End Function Call Count() --> <_script /> <a href="http://allesta.blogcu.com/" mce_href="http://allesta.blogcu.com/" _fcksavedurl="http://allesta.blogcu.com/">sitene ekle</a>