在根目录下,放一个跳转文件,根据访问域名跳转到相应目录即可.
以下是引用片段:
<%
Response.Buffer = True
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = 'no-cache'
Response.AddHeader 'Pragma', 'No-Cache'
dim Coming
Coming=LCase(Trim(request.servervariables('HTTP_Host')))
Select Case Coming
Case 'www.qgds.com'
Response.Redirect('all/')
Case 'wz.qgds.com'
Response.Redirect('wz/')
End Select
%> <% Response.Buffer = True Response.ExpiresAbsolute = Now() - 1 Response.Expires = 0 Response.CacheControl = 'no-cache' Response.AddHeader 'Pragma', 'No-Cache' dim Coming Coming=LCase(Trim(request.servervariables('HTTP_Host'))) Select Case Coming Case 'www.qgds.com' Response.Redirect('all/') Case 'wz.qgds.com' Response.Redirect('wz/') End Select %> |