CheckTimeLeft.vbs - use with Timer.vbs

Option Explicit

Dim objFSO, objTextFile
Dim prevDate, prevTime, timeLeft
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("C:\timelog.txt", 1, True)
prevDate = objTextFile.ReadLine
prevTime = objTextFile.ReadLine
timeLeft = objTextFile.ReadLine
objTextFile.Close

Msgbox "Time left for " & prevDate & ": " & timeLeft & " minutes.", vbOkOnly & vbInformation