<%@ Language = "VBScript" %> <% Response.Buffer = true %> <% Dim strServername, strLocalname, strServerIP strServername = LCase(Request.ServerVariables("SERVER_NAME")) ' Server's name strServerIP = LCase(Request.ServerVariables("LOCAL_ADDR")) ' Server's IP address strRemoteIP = LCase(Request.ServerVariables("REMOTE_ADDR")) ' Client's IP address ' If the querystring variable uc <> 1, and the user is browsing from the server machine, ' go ahead and show them localstart.asp. We don't want localstart.asp shown to outside users. If Request("uc") <> 1 And (strServername = "localhost" Or strServerIP = strRemoteIP) Then Response.Redirect "localstart.asp" Else %> Em construção

Em construção

O site que você está tentando acessar não possui uma página padrão no momento. Ele pode estar em processo de atualização e configuração.

Tente acessar este site novamente mais tarde. Se o problema persistir, entre em contato com o administrador do site da Web.

<% End If %>