<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%Option Explicit%>
<%
If Session("Identificacao")=0 Then
Dim oAcessos : Set oAcessos = New nsContadorADO : oAcessos.Somar Application("Conexao"),"Acessos", 1
Set oAcessos = Nothing
Session("Identificacao")=Session.LCID
End If
%>
Terravista Eventos
