Hit Counter
<%@ Page Language="VB"
AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default"
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD
XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<%
Application.Lock()
Application("COUNTER") =
Application("COUNTER") + 1
Application.UnLock()
%>
</div>
</form>
<table border=10 >
<tr>
<th>
<% Response.Write("TOTAL NO OF
VISITS TO THE WEB SITE ARE " & Application("COUNTER"))%>
</th>
</tr>
</table>
</body>
</html>
No comments:
Post a Comment