<%
y=year(now())
m=month(now())
d=day(now())
w1=weekday(now())
if w1=0 then
w="六"
end if
if w1=1 then
w="日"
end if
if w1=2 then
w="一"
end if
if w1=3 then
w="二"
end if
if w1=4 then
w="三"
end if
if w1=5 then
w="四"
end if
if w1=6 then
w="五"
end if
ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If ip = "" Then
ip = Request.ServerVariables("REMOTE_ADDR") '来访IP
end if
%>
ＡＤｒｉｅｎｎｅ经典网站集合
