Script ASP - Counters: Graphic counter - 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

Graphic counter

Graphic access counter.



					
					<% 

					dim PathVisite, fso ,oggOpen, NumVisite,NumCifre,Cont, Cifra 

					'read visits.txt file 

					PathVisits= server.MapPath ("visits.txt") 

					set fso=server.CreateObject("scripting.filesystemobject") 

					set oggOpen =fso.OpenTextFile(PathVisits,1) 

					NumVisits = oggOpen.readline 

					NumVisits=NumVisits+1 

					set oggOpen=Nothing 

					'show images 

					NumCifre=len(NumVisits) 

					for Cont=1 to NumCifre 

					Cifra=mid(NumVisits,Cont,1) 

					select case Cifra 

					case 1 

					%>

					<img SRC="cifra1anim.gif" border="0"> 

					<% case 2 %>

					<img SRC="cifra2anim.gif" border="0"> 

					<% case 3 %>

					<img SRC="cifra3anim.gif" border="0"> 

					<% case 4 %>

					<img SRC="cifra4anim.gif" border="0"> 

					<% case 5 %>

					<img SRC="cifra5anim.gif" border="0"> 

					<% case 6 %>

					<img SRC="cifra6anim.gif" border="0"> 

					<% case 7 %>

					<img SRC="cifra7anim.gif" border="0"> 

					<% case 8 %>

					<img SRC="cifra8anim.gif" border="0"> 

					<% case 9 %>

					<img SRC="cifra9anim.gif" border="0"> 

					<% case 0 %>

					<img SRC="cifra0anim.gif" border="0"> 

					<% end select 

					next

					'update file 

					set oggOpen=fso.OpenTextFile(PathVisits,2) 

					oggOpen.write(NumVisits) 

					oggOpen.close 

					set oggOpen=Nothing 

					set fso=Nothing 

					%>

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