<%response.buffer=true%> KatzCo DMV Site Entrance <% ' ********************************************* ' * CLIENT: Katz Co DMV Services, NY * ' * FILE: default.asp * ' * USE: sub-domain redirection module * ' * NOTE: primary start-up page * ' * ORIGIN: root folder * ' * FINAL: 03/27/2005, 14:29h * ' * POSTOP: 04/06/2005, 00:12h * ' * CODE: P. Rorlach/HandsOn (NYC) * ' ********************************************* Dim HTTPHost HTTPHost = Lcase(Request.ServerVariables("HTTP_HOST")) If Instr(1,HTTPHost,"leasesmart") > 0 then Response.Redirect ("http://www.leasesmart.org") End If Response.Redirect ("http://www.katzcodmv.com/index.html") %>