Vb Script Not Running

[David Flaks]

I am having a problem with a vb script:[C:\Telecaller\Rendon\DB_Human.vgs]

172522.55 0 Script Load C:\Telecaller\Rendon\DB_Human.vgs

172522.55 6 Loaded VbsAtHangup into:2

172522.56 6 tapi Reply (LineEvReply) ok 66476 0

172522.56 6 timer clear

172522.58 6 [update Database] Running VB Script...

172522.58 6 rv replace start (strlen>500)

172522.58 6 rv ns [RecordID]{REN333777}[PatName]{David}[ApptDate]{0610}[ApptTime]{C:\Telecaller\WAVtime\0830.wav}[Provider]{C:\TeleCaller\Rendon\WAV\Nurse.wav}[PathSysVoice]{}[PathApp]{C:\Program Files\VoiceGuide\}[PathDataVm]{C:\Program Files\VoiceGuide\data\}[PathVgSys]{C:\Program Files\VoiceGuide\system\}[OutDial_RetriesLeft]{2}[OutDial_Result]{Contacted_Human}[scriptEnd_Time]{

/27/2005 5:24:46 PM}[scriptEnd_Goto_Script]{C:\Telecaller\Rendon\HumanExistPat.vgs}[scriptEnd_Goto_Module]{}[scriptStart_Time]{9/27/2005 5:24:46 PM}[scriptsPath]{C:\Telecaller\Rendon\}[Options]{1}[Hangup Time]{9/27/2005 5:25:22 PM}

172522.59 6 eng run vbs [wscript "C:\Program Files\VoiceGuide\data\vbs_6_1.vbs" //I] copy of script in: vbs_6_1.vbs

172522.63 6 Run Script waiting. iRunWait=1 (shellid=2496, process=1992)

172522.64 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172523.66 6 timer fired EV_TIMEOUT_CHECKONSTATE

172523.66 6 ScriptEventCode 9007 iLineState=1501

172523.66 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172523.67 6 task still running (shellid=2496, process=1992)

172523.67 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172524.77 6 timer fired EV_TIMEOUT_CHECKONSTATE

172524.78 6 ScriptEventCode 9007 iLineState=1501

172524.78 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172524.78 6 task still running (shellid=2496, process=1992)

172524.80 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172525.89 6 timer fired EV_TIMEOUT_CHECKONSTATE

172525.89 6 ScriptEventCode 9007 iLineState=1501

172525.89 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172525.91 6 task still running (shellid=2496, process=1992)

172525.91 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172527.00 6 timer fired EV_TIMEOUT_CHECKONSTATE

172527.00 6 ScriptEventCode 9007 iLineState=1501

172527.00 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172527.02 6 task still running (shellid=2496, process=1992)

172527.02 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172528.11 6 timer fired EV_TIMEOUT_CHECKONSTATE

172528.11 6 ScriptEventCode 9007 iLineState=1501

172528.11 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172528.13 6 task still running (shellid=2496, process=1992)

172528.13 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172529.22 6 timer fired EV_TIMEOUT_CHECKONSTATE

172529.22 6 ScriptEventCode 9007 iLineState=1501

172529.22 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172529.23 6 task still running (shellid=2496, process=1992)

172529.23 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172530.33 6 timer fired EV_TIMEOUT_CHECKONSTATE

172530.33 6 ScriptEventCode 9007 iLineState=1501

172530.33 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172530.34 6 task still running (shellid=2496, process=1992)

172530.34 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172531.44 6 timer fired EV_TIMEOUT_CHECKONSTATE

172531.44 6 ScriptEventCode 9007 iLineState=1501

172531.44 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172531.45 6 task still running (shellid=2496, process=1992)

172531.45 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172532.55 6 timer fired EV_TIMEOUT_CHECKONSTATE

172532.55 6 ScriptEventCode 9007 iLineState=1501

172532.55 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172532.56 6 task still running (shellid=2496, process=1992)

172532.56 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172533.66 6 timer fired EV_TIMEOUT_CHECKONSTATE

172533.66 6 ScriptEventCode 9007 iLineState=1501

172533.66 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172533.67 6 task still running (shellid=2496, process=1992)

172533.67 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172534.77 6 timer fired EV_TIMEOUT_CHECKONSTATE

172534.77 6 ScriptEventCode 9007 iLineState=1501

172534.77 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172534.78 6 task still running (shellid=2496, process=1992)

172534.78 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172535.88 6 timer fired EV_TIMEOUT_CHECKONSTATE

172535.88 6 ScriptEventCode 9007 iLineState=1501

172535.88 6 LsRunWaitTillFinished EV_TIMEOUT_CHECKONSTATE

172535.89 6 task still running (shellid=2496, process=1992)

172535.89 6 timer set 1 EV_TIMEOUT_CHECKONSTATE

172536.34 0 btn Hangup on line 6

172536.34 6 ScriptEventCode 9001 iLineState=1501

172536.34 6 LsRunWaitTillFinished EV_TIMEOUT_HANGUP

172536.36 6 rv add [Hangup Time]{9/27/2005 5:25:36 PM}

172536.36 6 Hanging up call...

172536.36 6 HangupCall_Common Mode=AfterHangupRun

172536.38 6 ReinitTelephony due to IDLE

172536.38 6 tapic lineDeallocateCall(MainCall:66493) 0

172536.47 6 lineOpen(6)=>

172536.48 6 Waiting for a call...

172536.48 6 LineHandle=65571

172536.50 6 timer set 3 EV_TIMEOUT_ATERIDLE_ALLOWOUT

172537.06 0 dial start any summary:|6:rdy=0|7:idx=0|8:idx=0|

172539.67 6 timer fired EV_TIMEOUT_ATERIDLE_ALLOWOUT

172539.67 6 ScriptEventCode 9013 iLineState=900

172540.08 0 dial start any summary:|6:idx=0|7:idx=0|8:idx=0|

[SupportTeam]

Looking at the VBScript you have a while loop there and that's where probably the script gets stuck and never returns - and VoiceGuide can bee seen waiting for the script to return.

 

I'd suggest adding some tracing to your script to see why the VBScript gets stuck in a loop. See: http://www.voiceguide.com/vghelp/html/com_...TraceLogAdd.htm

[David Flaks]

I think that it is important for you to know that I have been using this exact same script on another computer for a few months. I have just bought another computer and have installed version 5.2.3063 on the new computer with a new dialogic card D/4PCIU. The old computer was running on version 5.2.2001 with an ISA dialogic card. Could there be any difference caused by this.

[David Flaks]

I have just tried to run the script without the loop as follows

 

Const ForReading = 1

Const ForWriting = 2

Const ForAppending = 8

set fso = CreateObject("Scripting.FileSystemObject")

on error resume next

set tsFile = fso.OpenTextFile("C:\Telecaller\LOG\LogHuman.txt", ForAppending, True)

tsFile.WriteLine "$RV[RecordId], $RV_STARTTIME, $RV[Options], $RV_CALLLENGTH, $RV[OutDial_RetriesLeft], $RV[OutDial_Result], $RV[NewPatientOptions], $RV[GetFaxNo]"

tsFile.Close

set tsFile = Nothing

set fso = Nothing

 

Exactly the same happened. Any suggestions?

[SupportTeam]

If the VBScript completes without any errors then VoiceGuide should detect that and not wait anymore...

 

Can you post the VoiceGuide script which you are using and we can run a few tests on our demo system here.

[David Flaks]

Here is the vb script

DB_Human.vgs