<%
Option Explicit
Dim MyPageCounter
Dim CompInfoCount
Dim WelcomeCount
Set MyPageCounter = Server.CreateObject("IISSample.PageCounter")
MyPageCounter.PageHit
If MyPageCounter.Hits = 1 Then
  CompInfoCount = "1 raz"
else
  CompInfoCount = MyPageCounter.Hits & " razy"
End If
If MyPageCounter.Hits("/aspbook/c10/pc/html/welcome.asp") = 1 Then
  WelcomeCount = "1 raz"
else
  WelcomeCount = MyPageCounter.Hits("/aspbook/c10/pc/html/welcome.asp") & " razy"
End If
%>  
