<%
Option Explicit
Dim useFrames, httpHost, zielURL, domList(), domZiel()
Dim aktHost, aktZiel, i
ReDim domList(6)
ReDim domZiel(6)
' ---- Einstellung
-----------------------------------
' Sollen Frames verwendet werden?
' useFrames = true Frames sind aktiviert
' useFrames = false direkte Weiterleitung
(standard)
useFrames = false
' ---- Einstellung
-----------------------------------
' Geben Sie hier Ihre Domain-Namen an. Wenn der entsprechende
' Domain-Platz nicht belegt ist, dann setzen Sie ein "" ein.
' Bitte geben Sie kein "http://" vor der Domain an.
' z.B. domList(4) = ""
domList(0) = "www.innwest.at"
'(Haupt-Domain)
domList(1) = "www.innwest.de"
'(Alias-Domain 1)
domList(2) = "www.innvillage.at"
domList(3) = "www.innvillage.com"
domList(4) = ""
domList(5) = ""
domList(6) = "fh47.s6.domainkunden.de" '(Hier sollten Sie Ihre
Server-ID 'eintragen,
' damit auch diese abgefangen wird.)
' ---- Einstellung
-----------------------------------
' Geben Sie hier die Ziel-Verzeichnisse an. Es können sowohl
' vollständige URLs mit http:// als auch Verzeichnisse sein
' z.B. domZiel(4) = "http://www.domain.de/verzeichnis/"
' oder domZiel(4) = "verzeichnis/"
domZiel(0) = "INNWEST.at/"
domZiel(1) = "INNWEST.de/"
domZiel(2) = "INNVILLAGE.at/"
domZiel(3) = "INNVILLAGE.com/"
domZiel(4) = ""
domZiel(5) = ""
domZiel(6) = "INNWEST.at/"
' Variablen initialisieren
httpHost = Request.ServerVariables("HTTP_HOST")
zielURL = ""
For i = 0 to 6
aktHost = domList(i)
aktZiel = domZiel(i)
if lCase(httpHost) = lCase(aktHost) then
zielURL = aktZiel
end if
Next
if zielURL = "" then %>
<h1>Domain nicht gefunden</h1>
<h3>Die Domain <%= httpHost %> wurde nicht gefunden oder es liegt
ein
Konfigurationsfehler vor. Bitte prüfen Sie die Angaben zur Domain im
Weiterleitungs-Script (meist gespeichert als default.asp oder index.asp
im Hauptverzeichnis des Pakets).
<% else
if useFrames = true then %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html> <head>
<title><%= httpHost %></title> </head>
<frameset rows="0,*" border="0" frameborder="0"
framespacing="0">
<frame src="leer" scrolling="no">
<frame src="<%= zielURL %>">
</frameset> </html>
<%
else
response.redirect zielURL
end if
end if
%>