Последние учебники веб-разработки
×

ASP Руководство

ASP ГЛАВНАЯ ASP Введение ASP устанавливать ASP Синтаксис ASP переменные ASP процедуры ASP формы ASP Cookies ASP сессия ASP заявка ASP #включают ASP Global.asa ASP Отправить по электронной почте

VBScript Руководство

VB ГЛАВНАЯ VB переменные VB процедуры VB условный VB перекручивание VB Примеры VB функции VB Ключевые слова

ASP Объекты

ASP отклик ASP Запрос ASP заявка ASP сессия ASP сервер ASP Ошибка ASP Файловая система ASP TextStream ASP Водить машину ASP файл ASP папка ASP Словарь ASP AdRotator ASP BrowserCap ASP Содержание Linking ASP Содержание ротатор ASP Быстрый Ref

ADO Руководство

ADO вступление ADO соединение ADO Recordset ADO дисплей ADO запрос ADO Сортировать ADO Добавить ADO Редактировать ADO Удалить ADO демонстрация ADO Ускорить

ADO Объекты

ADO команда ADO подключение ADO Ошибка ADO поле ADO параметр ADO Имущество ADO запись ADO Recordset ADO Поток ADO Типы данных

ASP and AJAX

AJAX вступление AJAX ASP AJAX База данных

ASP Примеры

ASP Примеры ASP викторина


 

ASP Application_OnStart и Application_OnEnd События


<Полное справочное руководство прикладных объектов

Application_OnStart события

Событие Application_OnStart происходит до того , как первый новый сеанс создается (when the Application object is first referenced) .

Это событие помещается в файл Global.asa.

Note: Ссылка на сессию, запрос или объекты Response в сценарии событий Application_OnStart вызовет ошибку.

Application_OnEnd события

Событие Application_OnEnd происходит, когда концы приложений (при остановке веб-сервер).

Это событие помещается в файл Global.asa.

Note: Метод MapPath не может быть использован в коде Application_OnEnd.

Синтаксис

<script language="vbscript" runat="server">

Sub Application_OnStart
. . .
End Sub

Sub Application_OnEnd
. . .
End Sub

</script>

Примеры

Global.asa:

<script language="vbscript" runat="server">

Sub Application_OnEnd()
Application("totvisitors")=Application("visitors")
End Sub

Sub Application_OnStart
Application("visitors")=0
End Sub

Sub Session_OnStart
Application.Lock
Application("visitors")=Application("visitors")+1
Application.UnLock
End Sub

Sub Session_OnEnd
Application.Lock
Application("visitors")=Application("visitors")-1
Application.UnLock
End Sub

</script>

Для того, чтобы отобразить количество посетителей в файле ASP:

<html>
<head>
</head>
<body>
<p>
There are <%response.write(Application("visitors"))%>
online now!
</p>
</body>
</html>

<Полное справочное руководство прикладных объектов