<%@ Language=VBScript %> <% Response.Buffer = true set g_connector = Server.CreateObject("Intrexx.IISConnector") on error resume next g_connector.Connect "localhost", 8102, Server.MapPath("../..") if Err.number = 0 then on error goto 0 g_connector.DebugLevel = 0 g_connector.SendRequest Request g_connector.SendResponse Response g_connector.Disconnect else if Request.ServerVariables("HTTP_USER_AGENT") = "Intrexx Document Integration Module/1.0" then Response.Status = "503 Service Unavailable" else Response.Redirect "companyServerDown.html" end if end if %>