Несколько кодов ASP, которые связывают несколько доменных имен

Первый

<%if effer.servervariables (server_name) = www.netbei.com

Ответ. Redirect zkj

еще

Ответ. REDIRECT I.HTM

конец, если%>

Второй

<%

Выберите Case request.servervariables (http_host)

Case www.netbei.com '1

Server.transfer (v3.htm)

Case www.aspcn.net '2

Server.transfer (i.htm)

Case www.netbei.cn '3

Server.transfer (netbei.htm)

... продолжайте добавлять ...

конец выбора

%>

Третий

<%if instr (request.servervariables

(Server_name), kekexi.com)> 0 затем

response.redirect index.asp

иначе, если instr (request.servervariables

(Server_name), 4668.com)> 0 затем

response.redirect x/index.asp

иначе, если instr (request.servervariables

(Server_name), web315.com)> 0 thenr

vonsonse.redirect index3.asp

конец, если

конец, если

конец, если%>

Четвертый

<%if effer.servervariables (server_name) = www.netbei.com

response.redirect index1.asp

иначе, если запрос.servervariables (server_name) = www.ce.org.cn тогда

response.redirect index2.asp

else, если запрос.servervariables (server_name) = www.163.com тогда

Ответ. REDIRECT INDEX3.ASP

конец, если

конец, если

конец, если%>

Ниже приведено цитируемое содержание:

Второй метод:

<%

Dim DomainName, результат

domainName = request.servervariables (server_name)

Результат = справа (DomainName, 12)

Если результат = my.netbei.com, тогда

%>

<!-#Включите file = mynetbei.asp->

<%

Elseif result = rtisancn.com тогда

%>

<!-#Включите файл = artisan.asp->

<%

Else result = gn.netbei.com тогда

%>

<!-#Включите file = web.asp->

<%

Else result = .forwest.com тогда

%>

<!-#Включите файл = forwest_com.asp->

<%

Еще

%>

<!-#Включите файл = netbei.asp->

<%

Конец, если

%>