Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.06.27;
Скачать: CL | DM;

Вниз

Анализатор логов Squid   Найти похожие ветки 

 
PTE ©   (2002-06-17 15:27) [0]

Здравствуйте
Squid при работе ведет логи примерно такие строчки я разделю звездочками *, но в логах их нет

1024187131.580 1465 192.168.2.90 TCP_MISS/200 5314 GET http://www.avp.ru/updates/ - DIRECT/213.59.0.92 text/html
***********************************************************
1024187132.524 940 192.168.2.90 TCP_CLIENT_REFRESH_MISS/200 3303 GET http://www.avp.ru/updates/avp.klb - DIRECT/213.59.0.92 application/octet-stream
************************************************************
1024187133.840 357 192.168.2.90 TCP_MISS/200 794 GET http://www.avp.ru/updates/avp.set - DIRECT/213.59.0.92 application/octet-stream

Мне надо загрузить эти логи в разные ListBox, разделять после пробелов насколько я понимаю. Смотрел на форуме был вопрос про логи апаче, там их загружали примерно так
procedure TForm1.Button1Click(Sender: TObject);
var
F: TextFile;
S, strData, strIP, strEvent, strMessage: String;
First, Last: Integer;
begin
AssignFile(F, Edit1.Text);
Reset(F);
while not EOF(F) do
begin
ReadLn(F, S);
First := Pos("[", S);
Last := Pos("]", S);
strData := Copy(S, First + 1, Last - First - 1); // Дата
S := Copy(S, Last + 1, Length(S));
ListBox1.Items.Add(strData);


Тут я понимаю надо скобки [] заменить на пробел, я прав? если да, то как? просто " " или есть специальные обозначения для пробела?


 
Anatoly Podgoretsky ©   (2002-06-17 15:45) [1]

"". #32, #$20



Страницы: 1 вся ветка

Текущий архив: 2002.06.27;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.014 c
3-88756
Jaroshik
2002-06-04 13:01
2002.06.27
Отчеты QuickReport


14-88993
roman_tutov@mail.ru
2002-05-24 17:40
2002.06.27
BDE это бесплатный продукт ?


1-88950
Извращенец
2002-06-15 18:13
2002.06.27
Как сделать паузу на определенное время в Delphi ?


3-88752
Esipenko
2002-06-03 22:59
2002.06.27
Interbase и SQL сервера при отключении питания


8-88957
Lider
2002-02-14 22:52
2002.06.27
Вывод картинки (TImage) на видео (TMediaPlayer)