ASP/ VbScript Stats:

How to support the site


Site Wide Message: (current site time 8/1/2010 1:13:03 AM EDT)
  • We want your input! One of our sponsors wants to know your opinion about development related issues. Click here to tell us what you think.
  • Are you an emerging/young developer (aged 18-30)? If so, would you like the chance to affect future developer tools and products?
    If so, then click here to give your feedback.
 

ASP Daily Hit Counter

Print
Email
VB icon
Submitted on: 1/28/2010 8:44:09 AM
By: Tejas Jayantilal Gandhi  
Level: Beginner
User Rating: Unrated
Compatibility:ASP (Active Server Pages)

Users have accessed this code  2503 times.
 
 
     My Code gives you couting of Daily Visitors of your website.
 
Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!
'**************************************
' for :ASP Daily Hit Counter
'**************************************
Copy Right SJ PVT LTD 2010-2013
code:
Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!
 
Terms of Agreement:   
By using this code, you agree to the following terms...   
  1. You may use this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
  2. You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.   
  3. You may link to this code from another website, but ONLY if it is not wrapped in a frame. 
  4. You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.
				
'**************************************
' Name: ASP Daily Hit Counter
' Description:My Code gives you couting of Daily Visitors of your website.
' By: Tejas Jayantilal Gandhi
'
' Inputs:N/A
'
' Returns:My Code returns couting of Daily Visitors of your website.
'
' Assumes:Nothing
'
' Side Effects:No Side effects
'
'This code is copyrighted and has' limited warranties.Please see http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=9725&lngWId=4'for details.'**************************************

<%
Dim x, y, temp, serv, D, hits
x = Trim(day(date()))
D = Application( "serv" )
 
 If D = x Then
Application( "hits" ) = Application( "hits" ) + 1
Else
 
Application( "hits" ) = 1
 
 End If
 y = x
 temp = y
 Application( "serv" ) = temp
%>
There have been <%=Application( "hits" )%> hits to this page today!


Other 6 submission(s) by this author

 

 
 Report Bad Submission
Use this form to notify us if this entry should be deleted (i.e contains no code, is a virus, etc.).
This submission should be removed because:
 
Your Vote!

What do you think of this code(in the Beginner category)?
(The code with your highest vote will win this month's coding contest!)
Excellent  Good  Average  Below Average  Poor See Voting Log
 
Other User Comments

 There are no comments on this submission.
 
Add Your Feedback!

Note:Not only will your feedback be posted, but an email will be sent to the code's author from the email account you registered on the site, so you can correspond directly.

NOTICE: The author of this code has been kind enough to share it with you.  If you have a criticism, please state it politely or it will be deleted.

For feedback not related to this particular code, please click here.
 
To post feedback, first please login.