Главная » Delphi » Объект ASP Response

0

(Ответ) — это  внутренний объект, доступный внутри  мето дов активного объекта сервера. Данный объект используется всякий раз,  когда необ ходимо  организовать динамический вывод. Объект Response обладает рядом свойств и методов, позволяющих управлять его содержимым. Наиболее важным  из них явля ется  метод  Write. Он  получает в качестве аргумента переменную типа  OleVariant (как  можно  заметить в окне  интерактивной  подсказки на рис. 22.4)  и обеспечивает вывод аргумента в строго определенном месте  динамически создаваемого кода сцена рия ASP, в котором соответствующий вызов ограничен дескрипторами <% и %>.

Рис. 22.4. Редактор кода

Чтобы вывести на экран приветствие, внесите код листинга 22.3 в реализацию ме

тода TDrBob42.Welcome.

Листинг 22.3. Реализация метода Welcome

procedure TDrBob42.Welcome;

begin

Response.Write(‘Hello, Visitor!’); Response.Write(‘<P>’);

Response.Write(‘Welcome to Delphi 6 and ASP Objects’);

end;

В файл DrBob42.ASP достаточно внести лишь одно изменение внутри

дескриптора ASP (теперь известно имя метода — Welcome). Новый

дескриптор ASP будут выглядеть так:

<%

Set DelphiASPObj = Server.CreateObject("D6ASP.DrBob42") DelphiASPObj.Welcome

%>

Обратите внимание, что  сценарию ASP не нужно  удалять  или  освобождать пере менную DelphiASPObj: это будет сделано  автоматически, когда объект выйдет из об ласти  видимости.

Кроме метода  Welcome, в интерфейс IDrBob42 можно  добавить любое количество других методов, а затем  вызывать их в сценарии ASP аналогичным образом. Но сначала  давайте проверим работу  только  что  созданного активного объ екта сервера и позаботимся о его дальнейшем расширении.

Источник: Тейксейра, Стив, Пачеко, Ксавье.   Borland Delphi 6. Руководство разработчика. : Пер.  с англ. — М. : Издательский дом “Вильямс”, 2002. —  1120 с. : ил. — Парал. тит. англ.

По теме:

  • Комментарии