|
场景恢复(pop-up window模式)中的function调用不成功
场景设置如下图
其中这个场景恢复有三步
keyboard chick
keyboard chick
function call
前两步都能正常执行出来
就最后那个调用function没有任何效果
不知道应该怎么弄,请各位老师帮忙看看
function为1.vbs
1.vbs的脚本内容如下:
Public Function logPrint(Object)
Dim PathWay,myTime,FileName,fso, logFile
PathWay="d:\"
myTime=now( )
TimeStamp=year(myTime)&month(myTime)&day(myTime)&hour(myTime)&minute(myTime)
FileName=PathWay&TimeStamp&".bmp"
Desktop.CaptureBitmap FileName
Set fso = CreateObject("Scripting.FileSystemObject")
Set logFile = fso.OpenTextFile("d:\runtime.log", 8, True) 'Open a file and write to the end of the file and open as Unicode
logFile.WriteLine(date() & " " & hour(now) & ":" & minute(now) & ":" & second(now) & ": " & "界面抛错")
logFile.Close
End Function |
|