Script ASP - Counters: Using Session - Morpheusweb.it - Webmaster resources: programming, asp script, using asp, file asp, asp, asp post, database asp, asp login, vb asp, asp access, asp download, asp script, formmail, area riservata, paginazione, scripts asp, mailform, asp script download

Using Session

It allows to count the visits using the session.
Memorizes accesses in a text file.



					
					<%

					dim myweb

					dim lun

					dim referer 

					myweb="http://www.myweb.com" 

					lun=len(myweb) 

					referer=request.servervariables("HTTP_REFERER") 

					Set Fil=CreateObject("Scripting.FileSystemObject") 

					Set inf=Fil.OpenTextFile(Server.MapPath("counter.txt"),1,true) 

					text=inf.ReadLine() 

					inf.Close 

					Set inf=Nothing 

					if session("visited")<>"si" and left(referer,lun)<>left(myweb,lun) then 

					text=text+1 

					session("visited")="si" 

					end if 

					Set out=Fil.CreateTextFile(Server.MapPath("counter.txt"),true) 

					out.WriteLine(text) 

					out.Close 

					Set out=Nothing 

					Set Fil=Nothing 

					response.write "Visit number:" & text

					%>

					

					where counter.txt is a text file in the site root.

A colpo d'occhio

Alcune delle sezioni pipiù interessanti del sito

Script C#

Script C# per tutte le esigenze: database, sessioni, file, contatori, stringhe, date, e-mail, e tanto altro.
Manuale C#

Manuale completo di C# per principianti e non

Script VB.Net

Script VB.Net Visual Basic .net: database, sessioni, file, contatori, stringhe, date, e-mail, e tanto altro ancora.
Manuale VB.Net

Manuale completo di VB.Net per principianti e non.

Seo

Tecniche di posizionamento indicizzazione e ottimizzazione dei siti web per nei motori di ricerca
Manuale CSS

Manuale completo sui CSS per principianti e non