// Прочитать всю страницу, str = rdr.ReadToEndO ;
curloc = 0;
do {
// Найти следующий URI для перехода по ссылке, link = FindLink(str, ref curloc);
if(link != null) {
Console.WriteLine('Найдена ссылка: ' + link);
Console.Write('Перейти по ссылке, Искать дальше, Выйти?'); answer = Console.ReadLine ();
if(string.Equals(answer, 'П',
StringComparison.OrdinallgnoreCase)) {
uristr = string.Copy(link); break;
} else if(string.Equals(answer, 'B',
StringComparison.OrdinallgnoreCase)) { break;
} else if(string.Equals(answer, 'И',
StringComparison.OrdinallgnoreCase)) {
Console.WriteLine('Поиск следующей ссылки.');
}
} else {
Console.WriteLine('Больше ссылок не найдено.'); break;
}
} while(link.Length > 0);
// Закрыть ответный поток, if(resp != null) resp.Close();
} while(uristr != null);
} catch(WebException exc) {
Console.WriteLine('Сетевая ошибка: ' + exc.Message +
'пКод состояния: ' + exc.Status);
} catch(ProtocolViolationException exc) {
Console.WriteLine('Протокольная ошибка: ' + exc.Message);
} catch(UriFormatException exc) {
Console.WriteLine('Ошибка формата URI: ' + exc.Message);
} catch(NotSupportedException exc) {
Console.WriteLine('Неизвестный протокол: ' + exc.Message);
} catch(IOException exc) {
Console.WriteLine('Ошибка ввода-вывода: ' + exc.Message);
} finally {
if(resp != null) resp.Close();
Console.WriteLine('Завершение программы MiniCrawler.');
}
}
Ниже приведен пример сеанса поиска, начиная с адреса www .McGraw-Hill. com. Следует иметь в виду, что конкретный результат поиска зависит от состояния содержимого на момент поиска.
Переход по ссылке http://mcgraw-hill.com
Найдена ссылка: http://sti.mcgraw-hill.com:9000/cgi-bin/query? mss=search&pg=aq Перейти по ссылке, Искать дальше, Выйти? И Поиск следующей ссылки.
Найдена ссылка: http: //investor .mcgraw-hill. com/phoenix. zhtml?c=96562&p=irol-irhome Перейти по ссылке,'Искать дальше, Выйти? П
Переход по ссылке http://investor.mcgraw-hill .com/phoenix. zhtml?c=96562&p=irol-irhome
Найдена ссылка: http://www.mcgraw-hill.com/index.html
Перейти по ссылке, Искать дальше, Выйти? П
Переход по ссылке http://www.mcgraw-hill.com/index.html