<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim PrimeDomain__MMColParam PrimeDomain__MMColParam = "1" If (Request("MM_EmptyValue") <> "") Then PrimeDomain__MMColParam = Request("MM_EmptyValue") End If %> <% Dim PrimeDomain Dim PrimeDomain_numRows Set PrimeDomain = Server.CreateObject("ADODB.Recordset") PrimeDomain.ActiveConnection = MM_ConnectionWAGSQL_STRING PrimeDomain.Source = "SELECT * FROM dbo.Setup WHERE PrimaryDomain = " + Replace(PrimeDomain__MMColParam, "'", "''") + "" PrimeDomain.CursorType = 0 PrimeDomain.CursorLocation = 2 PrimeDomain.LockType = 1 PrimeDomain.Open() If NOT PrimeDomain.eof THEN PrimaryDomain = (PrimeDomain.Fields.Item("DomainName").Value) MPOPMstrDom = (PrimeDomain.Fields.Item("DomainName").Value) End If PrimeDomain_numRows = 0 %> <% PrimeDomain.Close() Set PrimeDomain = Nothing %> <%'=PrimaryDomain%> <% Dim dn dn = request.servervariables("server_name") if instr(dn, "www") > 0 then dn = mid(dn, 5, len(dn)) end if 'response.write(dn) 'where domainname = '" & dn & "' %> <% Dim Setup Dim Setup_numRows Set Setup = Server.CreateObject("ADODB.Recordset") Setup.ActiveConnection = MM_ConnectionWAGSQL_STRING Setup.Source = "SELECT * FROM dbo.Setup WHERE DomainName = '" & dn & "'" Setup.CursorType = 0 Setup.CursorLocation = 3 Setup.LockType = 1 Setup.Open() If NOT Setup.eof THEN Domain = Setup.Fields.Item("DomainName").Value Else Domain = PrimaryDomain End If If NOT Setup.eof THEN MTitle = (Setup.Fields.Item("MetaTitle").Value) MDesc = (Setup.Fields.Item("MetaDesc").Value) MKeywords = (Setup.Fields.Item("MetaKeywords").Value) MClass = (Setup.Fields.Item("MetaClassification").Value) CoName = (Setup.Fields.Item("CoName").Value) CoCity = (Setup.Fields.Item("CoCity").Value) CoState = (Setup.Fields.Item("CoState").Value) IETrans = (Setup.Fields.Item("Transition").Value) IETransTime = (Setup.Fields.Item("TransitionTime").Value) End If Setup_numRows = 0 %> Page Not Found

UhOh! Can't find that page at webs-a-gogo! Try another one! Page Not Found

HTTP 404 - File or Folder Not Found.
IIS


The page you are looking for might have been removed, had its name changed, or is temporarily unavailable.


Please Click the Back button, try another link, or close.