[ главная ]   [ рейтинг статей ]   [ справочник радиолюбителя ]   [ новости мира ИТ ]



Ответов: 0
25-02-12 07:01







   Web - программирование
PHP


ASP






XML



CSS

SSI





   Программирование под ОС











   Web - технологии








   Базы Данных









   Графика






Данные




Web - программирование / ASP /

Знакомство с ASP: счетчик для IIS за 5 минут

В данной статье будут рассмотрены варианты создания счетчиков для сайтов построенных на базе IIS 3, 4, 5, PWS, GoAhead. Для некоторых счетчиков - любой сервер поддерживающий работу со скрипт - машинами Windows с помощью различных расширений и модулей.(Chili-ASP, ActivePerl). При написании статьи использованы материалы с сайтов:

Примечание: данный материал рассчитан на начинающих скриптеров, по сему код максимально упрощен с целью облегчения восприятия. Код размещен по принципу "от простого - к сложному"

Классификация.

По признаку своей функциональности счетчики можно подразделить на счетчики:

  • с накоплением;
  • в рамках сессии;
  • ементами персонификации;
  • с возможностью дальнейшего анализа информации о клиенте;

По способу хранения информации:

  • хранение в переменных сессии (приложения);
  • хранение в файле на стороне сервера;
  • хранение в файле на стороне клиента;
  • хранение в базе данных;
  • комбинированные;

По способу визуализации:

  • текстовые;
  • графические;
  • информеры ( как комбинация первых двух );

Cчетчик от Microsoft

Возможности: счетчик с накоплением, поддержка "виртуальных" сайтов, отдельных asp-страниц.

Для создания данного счетчика необходимо с сайта Microsoft скачать серверный компонент PageCounter и установить его. Весь код счетчика оформлен в виде ISAPI-dll (распространяется вместе с исходными текстами) и число обращений к конкретной странице или инициалиазация/сброс счетчика вызываются как метод серверного объекта PageCounter.

Для установки счетчика на сервер необходимо скопировать PageCnt.dll в каталог InetPubASPSampComponentsPageCntDLLi386 и зарегистрировать его: regsvr32 PageCnt.dll В случае, если Вы планируете подсчитывать обращения к нескольким виртуальным сайтам, Вам необходимо конфигурировать их как приложения.

Счетчик поддерживает 2 метода HITS и RESET

Код инициализации счетчика для конкретного сайта:
Распологать его лучше всего в верхней части страницы, в первых строках.

<%
   Set MyPageCounter = Server.CreateObject("IISSample.PageCounter")
   HitMe = MyPageCounter.Hits
%>

Отображение количества заходов:
Данный фрагмент размещайте сообразуясь с дизайном своего сайта.

<% =HitMe %> 

Для подсчета на конкретной странице сайта код несколько изменится:

<%
   Set MyPageCount = Server.CreateObject("IISSample.PageCounter")
   MyPageCount.PageHit
   HitMe = MyPageCount.Hits
%> <%    =HitMe %>
или
<%    Set MyPageCounter = Server.CreateObject("IISSample.PageCounter")
%>
This Web page has been viewed <%= MyPageCount.Hits %> times.
<P>
Page Myscript.asp has been viewed
<%= MyPageCounter.Hits("/VirtualDir1/Myscript.asp") %> times.

Для того, чтобы запустить счетчик с какого-либо начального значения (12345) используйте следующий код:

<%
   =HitMe + 12345
%>

Сброс счетчика (RESET).

<%
   Set MyPageCounter = Server.CreateObject("IISSample.PageCounter")
   MyPageCounter.Reset
   MyPageCounter.Reset("/VirtualDir1/Mypage.asp")
 %>

Простейшиe счетчики

Возможности: счетчик с накоплением. Хранит информацию о количестве обращений в текстовом файле.

Используется объект VBScript (WSH) FileSystemObject.

Порядок действий.

  1. Создайте текстовый файл c:mycount.txt
  2. Для инициализации счетчика укажите в текстовом файле начальное значение. На пример 0.
  3. В тело вашей страницы впишите следующий код:
  4. <%
    'Декларирование переменных
       Const ForReading = 1, ForWriting = 2, ForAppending = 8
       Dim fso, f, myCounter
    'Создаем объект
       Set fso = CreateObject("Scripting.FileSystemObject")
    'открываем файл на чтение, и считываем из него ВСЕ содержимое
    'если файл отсутствует, то создаем его (Trye).
       Set f = fso.OpenTextFile("c:mycount.txt", ForReading, True)
    'отключаем обработку ошибок
       On error resume next
    'считываем содержимое, в случае пустого (Empty)значения
    'присваиваем значение 0 переменной myCounter
       myCounter = f.readAll
       If myCounter = Empty  Then
    myCounter = 0
    'если все в порядке, то увеличиваем значение переменной myCounter на 1
       Else
    myCounter = myCounter + 1
       End If
    'открываем файл на запись и обновляем значение счетчика
       Set f = fso.OpenTextFile("c:mycount.txt", ForWriting, True)
       f.Write myCounter
    'закрываем файл
       f.Close
    'очищаем память
       Set f = nothing
       Set fso = nothing
    %>
  5. В соответствии с дизайном разместите счетчик.
  6. <%
       = myCounter
    %>

Счетчик с накоплением. Хранит данные в переменных сесии ( приложения ), отображает количество пользователей, находящихся в данный момент на сайте.

В рут - каталоге сайта создайте файл global.asa

Код:

<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Session_OnStart
   Session.Timeout = 5
   Application.lock
   Application("myCounter") = Application("myCounter") + 1
   Application("visitors") = Application("visitors") + 1
   Application.unlock
END SUB
</script>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Session_OnEnd
   Application.lock
   Application("visitors") = Application("visitors") - 1
   Application.unlock
END SUB
</script>

В теле asp-страницы разместите код:

<%
   Dim vist, currentcount
   visit = Application("visitors")
   currentcount =   Application("myCounter")
%>

В соответствии с дизайном поместите счетчик общего числа обращений/текущего количества пользователей

<%
   = currentcount & "/" & visit
%>




Комментарии

 Ваш комментарий к данному материалу будет интересен нам и нашим читателям!



Последние статьи: Web - программирование / ASP /

RegularExpressionValidator проверка вводимых данных с помощью регулярных выражений
23-03-2010   

Элемент управления RegularExpressionValidator является очень мощным инстроментом для разработки на ASP .NET. С его помощью можно произвести проверку вводимого выражения по шаблону, заданному в регулярном выражении. Надо лишь установить нужное регулярное выражение в свойстве ValidationExpression... подробнее

Кол. просмотров: общее - 4569 сегодня - 1

Пример HTML интерфейса к БД, выполненного по технологии ASP
09-12-2009   

Вашему вниманию предлагается HTML интерфейс к телефонной базе данных, выполненный по технологии ASP. Технология активных серверных страниц появилась в 1997 году и подразумевает под собой среду исполнения задач обработки данных на стороне сервера с выдачей результатов клиенту в виде HTML кода – обычных HTML страниц. Поддерживается сервером IIS3.0 и выше... подробнее

Кол. просмотров: общее - 4811 сегодня - 0

Рецепт приготовки интернет-портала
09-12-2009   

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

Кол. просмотров: общее - 4793 сегодня - 1

Механизм кодирования строк URL
12-04-2009   

Часто возникает необходимость передать переменные в самой строке URL. Для этого нужно воспользоваться кодированием строки с переменными... подробнее

Кол. просмотров: общее - 4253 сегодня - 1

Модификация даты expire для cookie
12-04-2009   

Процесс создания cookies на ASP очень прост. После создания этих файлов, они будут храниться на компьютерах у посетителей вашего сайта... подробнее

Кол. просмотров: общее - 4358 сегодня - 0



  WWW.COMPROG.RU - 2009-2012 | Designed and Powered by Zaipov Renat | Projects