<%@ Language=VBScript %>
<%
dim file, siteId
if Request.ServerVariables("SERVER_NAME") = "www.dragonden.net" or Request.ServerVariables("SERVER_NAME") = "dragonden.net" then
file = "dn7.asp"
siteId = 1
elseif Request.ServerVariables("SERVER_NAME") = "www.3dguru.com" or Request.ServerVariables("SERVER_NAME") = "3dguru.com" then
file = "http://www.mp3.com/3dguru/"
siteId = 2
elseif Request.ServerVariables("SERVER_NAME") = "www.darkhorizon.org" or Request.ServerVariables("SERVER_NAME") = "darkhorizon.org" then
file = "dh/index.asp"
siteId = 3
elseif Request.ServerVariables("SERVER_NAME") = "www.dragondes.com" or Request.ServerVariables("SERVER_NAME") = "dragondes.com" then
file = "dd/index.asp"
siteId = 5
else
file = "dn7.asp"
siteId = 1
end if
%>
<%Select Case siteID%>
<%Case 1%>
Dragon Net
<%Case 2%>
3D Guru
<%Case 3%>
Dark Horizon Studios
<%Case 4%>
Dragon Designs
<%End Select%>
This site uses frames. If you don't have a frames capable browser. Go get one.