<%
, s7 b) ]' _6 |% G+ [, D" n4 x0 x; Y7 E9 K
'下面獲取來路域名
" e: A8 `+ C( q4 W/ Z3 B' Q& d8 p. l* W- C: u
url=request.ServerVariables("HTTP_REFERER")
+ S4 f- L$ K+ W S* L2 g0 j+ T7 W1 i
'下面處理來路域名' C5 T& _ J% l: g n6 }7 \
" M. O' s( g( y+ F
if url<>"" then
- k+ ^! ^ j9 V: w& k0 U! v0 Q$ W3 x" w3 j: J
url=replace(url,"http://","")
& _- \9 E3 u9 e$ q8 P# X. n- K* j& X2 V/ Z ]6 S0 J6 _
url=split(url,"/")(0)' x( ?/ M, |% O% r4 o5 w) B$ \
# b' U$ \) l3 ^+ c% S
end if
. H- n( T, E, Q2 Z3 P# o+ F4 I- k) s2 L* e# U" B
'下面是條件中的網址) x% K P) \6 `
8 ?% Q `- t( S" N
; x- p+ [4 k) j$ y& |/ ^! G
[* K6 Q5 o q- Mif url="baidu.com" or url="google.com" or url="qita.com" then/ R# H1 \6 {0 o0 T! ?2 l, y, l& D K. V
5 x" O) b- H: `" z. O
3 G3 i# C, ]. ^* }
- J" j$ P4 z1 { b. H: B/ z0 IResponse.Redirect("http://56.com")1 V, V' c9 i b+ }
s; S8 S3 F- y6 n9 g9 {. V
end if
) W! d7 f2 N; o: f& j1 B4 }) |) U' z7 G- _1 m
Response.Redirect("http://youku.com")
6 t) o; Q- _4 s7 y8 x( Z$ `. p( n. E0 m9 D8 v+ E
%>
; Z) J/ H, ~# ^# |9 d$ X# p/ R$ \& O/ Q O: F
這樣不行嗎? |