<% Dim Host dim ServerDir dim PageURL Dim contentsWidth, newsWidth host = lcase (request.servervariables("SERVER_NAME")) serverDir = "" SELECT CASE host CASE "www.the-pools.info" serverdir="/familyportal" CASE "the-pools.info" serverdir="/familyportal" ' this directs all other domains and IP addresses to a folder called /main CASE else serverdir="default.asp" end SELECT if serverdir > "" then response.redirect serverDir %> www     world wide web                             commandvideo          on

 

www    
                 commandvideox
                               com
Word of the Day

Quote of the Day

Article of the Day

This Day in History

Today's Birthday

In the News

   

 check check check check check check check check