2015-05-05 73 views
0

以下代碼每次迭代都會寫入屏幕。根據我對the DateDiff documentation的理解,它應該每30秒寫一次。我做錯了什麼?每30秒VBScript回顯

lasttime = Now 
Do While Not data.eof 
    'looping through database records 
    if DateDiff(s,lasttime,Now) >= 30 Then 
     lasttime = Now 
     WScript.Echo "It's been 30 seconds..." 
    End if 
Loop 
+0

WScript.Sleep 30000「等待30秒移動到下一行之前是遠更容易 – saj

+0

沒有,這將暫停執行。我絕對不希望那樣! –

回答

1

改變這一行:

if DateDiff(s,lasttime,Now) >= 30 Then 

對此(注意圍繞 「S」 引號)

if DateDiff("s",lasttime,Now) >= 30 Then 
+0

當這件事很簡單時,我無法決定是否愛上它。謝謝! :) –

+0

沒問題:-)不要忘記標記答案接受;-) – garryp

+0

必須等待10分鐘:) –