ASP Discovery

nathan schmoll's
aspdiscovery

back to main page

e-mail me

<script language="javascript" src="http://ads.aspalliance.com/displayad.aspx?t=2&m=1&target=_parent&js=1&s=aspdiscovery&page=0.4825389661395718"></script>

<script language="javascript" src="http://ads.aspalliance.com/displayad.aspx?t=2&m=1&target=_parent&js=1&s=aspdiscovery&page=0.12750391881067602"></script>

<script language="javascript" src="http://ads.aspalliance.com/displayad.aspx?t=2&m=1&target=_parent&js=1&s=aspdiscovery&page=0.291130530093255"></script>

<script language="javascript" src="http://ads.aspalliance.com/displayad.aspx?t=2&m=1&target=_parent&js=1&s=aspdiscovery&page=0.43239881496524557"></script>

Really, Really Simple Page Counter

Here's how to make a really simple -- wait -- really, really simple page counter. Just create a file called "count.txt" and make sure there is only one character in it. That one character should be "0" (one "zero"). Once that file extists, you can use the following code in any page, as long as it's in the same directory as the "count.txt" file.

<%
dim fso
dim getcount
dim latestcount
set fso=server.createobject _
("scripting.filesystemobject")
countfile=server.mappath("count.txt")
set getcount=fso.opentextfile(countfile,1,false)
oldcount=trim(getcount.readline)
count=oldcount+1
set latestcount=fso.createtextfile(countfile,True)
latestcount.writeline(count)
%>

If you include this code in a page, just put the following anywhere on the page to display the current pageview count.

<%=count%>

There you go! Now wasn't that really, really simple?

Note:
This counter will not work if you don't have write permissions in your directory!