装载页面进度条

zgqtxwd

于 2008-04-30 06:07:00 发布

阅读量321

点赞数

分类专栏： javascript delphi 文章标签： input border function class

delphi 同时被 2 个专栏收录

758 篇文章 0 订阅

订阅专栏

javascript

589 篇文章 0 订阅

订阅专栏

<title>loadpage</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<!--

.unnamed1 { background-color: #000000}

-->

</style>

</head>

<body>

<tr>

<p>
<input type=text name=chart size=46 style="font-family:Arial; font-weight:bolder;

color:#00FF00; background-color:black; padding:0px; border-style:none;">
          <br>
          <br>
          <input type=text name=percent size=46 style="font-family:Arial; color:#00FF00;

text-align:center; border-width:medium; border-style:none;" class="unnamed1">
          <br>
          <br>
          <font color="#00FF00" size="2" >
          <script>
var bar = 0

var line = "||"

var amount ="||"

count()

function count(){

bar= bar+2

amount =amount + line

document.loading.chart.value=amount

document.loading.percent.value=bar+"%"

if (bar<99)
{
setTimeout("count()",100);
}

else
{
alert("载入完毕")
window.location = "http://www.csdn.net";
}

}

</script>

          <noscript></noscript></font></p>

                  </td>