<%@ 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 %> En construcción

 

Bienvenidos a infouno:

sitio en construcción o actualizándose

El sitio que intenta visitar no contiene actualmente ninguna página predeterminada o se encuentra interrumpido. Puede que se halle en proceso de actualización y configuración.



Intente ver este sitio más tarde. Si sigue teniendo este problema, pruebe a ponerse en contacto con el administrador del sitio Web.


<% End If %>