<%
Option Explicit
Dim MyCounter
set MyCounter = Server.CreateObject("MSWC.Counters")
Response.Write "<B>Ta strona wyszukuje warto drugiego licznika "
Response.Write "stworzonego w innej aplikacji ASP. "
Response.Write "<P>Jego warto: "
Response.Write MyCounter.Get("Counter2") & ".<P>"
%>
