Searched refs:fileCont (Results 1 – 2 of 2) sorted by relevance
197 Dim fileCont As TextStream variable203 Set fileCont = fso.OpenTextFile(statusFileName, ForReading, False, TristateTrue)204 statLine = fileCont.ReadLine223 If Not (fileCont Is Nothing) Then fileCont.Close224 Set fileCont = Nothing343 Dim fileCont As TextStream variable349 Set fileCont = fso.OpenTextFile(statusFileName, ForReading, False, TristateTrue)350 statText = fileCont.ReadLine362 fileCont.Close
3512 Dim fileCont As TextStream variable3514 Set fileCont = fso.OpenTextFile(statFileName, ForWriting, True, TristateTrue)3516 fileCont.WriteLine ("analysing=" & currDocument)3518 fileCont.WriteLine ("analysed=" & currDocument)3520 fileCont.WriteLine ("finished")3523 fileCont.Close
Completed in 37 milliseconds