;***************************** ;* RoboTask Task file ;* Do not edit in text editor! ;***************************** [Root] ActionAfterRun=INTEGER|0 Actions=FOLDER Automat=INTEGER|-1 CatID=INTEGER|397884660 Comment=STRINGLIST ContinueOnError=INTEGER|0 ExternalName=STRING|"TestVBTask" Hide=INTEGER|0 ID=INTEGER|1350799872 LogOnAsUser=INTEGER|1 Name=STRING|"[DEMO] VB script" OnErrorTaskID=INTEGER|-1 Priority=INTEGER|3 RunOnClose=INTEGER|0 RunOnStartup=INTEGER|0 ToLog=INTEGER|3 WriteGeneralLog=INTEGER|0 [Actions] Action1=FOLDER [Actions\Action1] ActionID=STRING|"A_SCRIPT_VBSCRIPT" Enabled=INTEGER|-1 Name=STRING|"VB Script" Params=FOLDER [Actions\Action1\Params] expandvars=STRING|"0" line00000000=STRING|"extName = ""TestVBTask""" line00000001=STRING|"num = RoboTaskApp().TaskNumByExternalName(extName)" line00000002=STRING|"if num >=0 then" line00000003=STRING|" st = RoboTaskApp().TaskInfoState(num)" line00000005=STRING|" select case st" line00000006=STRING|" case 0 stName = ""Manual""" line00000007=STRING|" case 1 stName = ""Idle""" line00000008=STRING|" case 2 stName = ""Disabled""" line00000009=STRING|" case 3 stName = ""Running""" line0000000A=STRING|" case 4 stName = ""Stopped""" line0000000B=STRING|" case else stName = ""UNKNOWN""" line0000000C=STRING|" end select" line0000000E=STRING|" en = RoboTaskApp().TaskEnabled(extName)" line0000000F=STRING|" TaskName = RoboTaskApp().TaskInfoName(num)" line00000011=STRING|" RoboTaskApp().DesktopAlert _" line00000012=STRING|" ""Task information"", _" line00000013=STRING|" ""Task Name: "" + TaskName + ""; "" + Chr(10) + _" line00000014=STRING|" ""Task number: "" + CStr(num) + ""; "" + Chr(10) + _" line00000015=STRING|" ""Task status: "" + Cstr(st) + ""("" + stName + ""); "" + Chr(10) + _" line00000016=STRING|" ""Is the task enabled: "" + Cstr(en) + "";"", _" line00000017=STRING|" 0, 0, 10, 0, 100, 3" line00000018=STRING|"else" line00000019=STRING|" RoboTaskApp().DesktopAlert _" line0000001A=STRING|" ""Task information"", _" line0000001B=STRING|" ""Unknown task External name"" + chr(10) + _" line0000001C=STRING|" ""The task desn't exist"", _" line0000001D=STRING|" 2, 0, 10, 0, 100, 3" line0000001E=STRING|"end if" linecount=STRING|"33" savescript=STRING|"0"