一個實現VBS倒計時的代碼  

以下內容為程序代碼: 

<script language="VBScript"> 
       Dim oTime : oTime = 5 
       Function STime 
            document.all("oInput").value = "00:00:" & oTime 
            If oTime>0 Then 
               oTime = oTime - 1 
               window.setTimeout "STime", 1000 
            Else 
               MsgBox "時間到了！" 
            End If 
       End Function 
       Sub Window_Onload 
             Call STime 
       End Sub 
msgbox(value) 
</script> 
<input id="oInput" type="text"> 



把上面這段保存為001.html可以成為一個完整的倒計時器，哪位幫我把他改成VBS一下，讓其能變成VBS倒計時器！