<HTML>
<HEAD>
<TITLE>ตัวอย่างการใช้งาน
Page Counter Component</TITLE>
</HEAD>
<BODY>
<B>ตัวอย่างแสดงวิธีการใช้งาน
Page Counter Component</B><HR>
กรุณาคลิกที่ปุ่ม
Refresh หลายๆครั้ง แล้วสังเกตตัวเลขด้านล่างจะเปลี่ยน<HR>
<%
Dim
ObjPageCount,intCount
Set
ObjPageCount=Server.CreateObject(?MSWC.PageCounter?)
ObjPageCount.PageHit
IntCount=ObjePageCount.Hits
%>
<B>คุณคือผู้ชมคนที่
<%=intCount%></B>
</BODY>
</HTML>