Разбор журнального файла
?Проверить, включены ли необходимые для анализа поля: date,time,cs-method,cs-uri-stem,cs-username,c-ip,cs-status и запомнить позиции этих полей в строке
str = Trim(Replace(str, «#Fields:», «»))
?Получить массив полей из строки журнального файла
strArray = split(str, « «)
m = 0 ?счетчик номера поля
For Each fieldStr In strArray
If m = 0 And fieldStr <> «date» Then
?Завершить обработку файла — неверный формат, на первом месте должно быть поле
?date
Exit Do
ElseIf m = 1 And fieldStr <> «time» Then
?Завершить обработку файла — неверный формат, на втором месте должно быть поле
?time
Exit Do
ElseIf fieldStr = «cs-method» Then
?Запомнить позицию поля cs-method в строке
fieldCsMethod = m
ElseIf fieldStr = «cs-uri-stem» Then
?Запомнить позицию поля cs-uri-stem в строке
fieldCsUriStem = m
ElseIf fieldStr = «cs-username» Then
?Запомнить позицию поля cs-username в строке
fieldCsUserName = m
ElseIf fieldStr = «c-ip» Then
?Запомнить позицию поля c-ip в строке
fieldCIP = m
ElseIf fieldStr = «sc-status» Then
?Запомнить позицию поля sc-status в строке
fieldCsStatus = m
End If
m = m + 1
Next