4 Set oShell = WScript.CreateObject ("WSCript.shell")
6 iExitCode1 = oShell.run("cmd /K " & GetCurrentDirectory() & "bin\timer_client",1,False)
10 'This function returns the current directory of the script
11 Function GetCurrentDirectory()
15 sScriptFullName = WScript.ScriptFullName
16 GetCurrentDirectory = mid(sScriptFullName,1,InStrRev(sScriptFullName,"\"))