|
Próximos Eventos Internacionales ! |
|
|
|
|
una fuente de Gracia! Compartimos con ustedes los más importantes eventos de 2007 |
|
|
<%
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath("session_count.txt"))
counter = clng(act.readline)
if session("been_here_before") = "" then
session("been_here_before") = "Yes"
counter = counter + 1
Set act = fso.CreateTextFile(server.mappath("session_count.txt"), true)
act.WriteLine(counter)
end if
act.Close
Response.Write("Visitors: "&counter)
%>
|
: