第2个回答 2011-09-08
Dim hwnd,SZ
Delay 2500
Plugin hwnd=Window.GetKeyFocusWnd()
VBS SZ=0
While SZ=0
Plugin Window.SendKeyPress(hwnd,49)
Delay 30000
EndWhile
------------------------------------------------------------------------
PS:30000就是30秒,可自己改本回答被提问者采纳