С помощью этой функции можно считать данные из журнала клиентов в виде таблицы.

 

 Table = APIReadUserLog(Date1, Date2, UserID)

 

Аргументы

 

 Date1, Date2

 Параметры задают интервал дат (от Date1 - до Date2), за который производится выборка.

 

 UserID

 Строковое выражение, определяющее GUID клиента по которому производится выборка, если значение не задано (empty) будут выведены данные по всем клиентам.

 

 

Замечания

 

 Следует отметить, что файлы журнала можно прочитать и напрямую. Но эта функция позволяет произвести выборку и возвращает результат, более удобный для обработки. Кроме того, она может вызываться и удаленно с другого компьютера.

 

 Для работы в составе встроенного веб-сервера более удобна функция APIReadLogXML.

 

 

Возвращаемое значение

 

 Table - двумерный массив, по формату таблицы полностью соответствующий формату файла журнала, см. перечисление Атрибуты журнала клиента. Индекс начинается с "0". Не путать с массивом элементов типа массив.

 

 

Пример использования

 

---

Set Srv = CreateObject("TrafInsp.TrafInspAdmin")

APIPass = "123456" 'Пароль для доступа через API

Srv.APILogon(APIPass)

UserID = "Vasilii Petrov" ' Отображаемое имя клиента

UserState = Srv.APIGetUserState(User)

UserID = UserState(1) ' Получаем GUID клиента

 

Date1 = "26.05.2006"

Date2 = "27.05.2006"

UserLogTab = Srv.APIReadUserLog(Date1, Date2, UserID)

If Not IsArray(UserLogTab) Then

   WScript.Echo "Нет данных"   

   WScript.Quit   

End If

 

For I = 0 To UBound(UserLogTab, 1)

Wscript.Echo I

   Stroka = ""

   For J = 0 To UBound(UserLogTab, 2)

      Stroka = Stroka & UserLogTab(I, J) & "|"

   Next

   WScript.Echo Stroka

Next

 

---

Текущая страница справки: help.smart-soft.ru/index.html?apireaduserlog.htm

Сайт разработчиков Traffic Inspector