Untuk menggunakan properti serverVariables dari objek permintaan, gunakan untuk mendapatkan nilai variabel lingkungan. Sintaks yang digunakan adalah: request.serverVariable (variabel), "variabel" mewakili nama variabel lingkungan, seperti nama host server, nama perangkat lunak server web, dll. Jika "variabel" adalah "Remote_Addr", itu mewakili alamat IP pengunjung, dan melalui itu, penyaringan alamat IP dapat dicapai.
Program Sumber adalah sebagai berikut: (Nama File: Demo.asp)
<Html>
<head>
<metahttp-equiv = "content-type" content = "text/html; charset = gb_2312-80">
<metaname = "generator" content = "microsoftfrontpageExpress2.0">
<tyle>
<! ---
.as {line-height: 15px; font-size: 9pt}
A: Hover {Color: RGB (0,51,240); Text-Decoration: Underline}
.p9 {font-family: "宋体"; font-size: 9pt; line-height: 15pt}
.p12 {font-family: "宋体"; font-size: 12pt; line-height: 18pt}
A: Link {Text-Decoration: None;}
A: Dikunjungi {Text-Decoration: None;}
A: Hover {Text-Decoration: Underline; Font-size: 125%; Color: Blue}
->
</tyle>
<title> asp halaman firewall function demonstration </iteme>
</head>
<bodybackground = "back.jpg">
<%
′ Gunakan permintaan.
rip = request.serverVariable ("remote_addr")
strip = cstr (rip)
′ Dapatkan nilai segmen ketiga dari alamat IP dan simpan untuk ditelanjangi
fori = 1to2
strip = kanan (strip, len (strip) -instr (1, strip, "."))
Berikutnya
strip = kiri (str, instr (1, str, ".")-1)
′ Verifikasi validitas alamat IP dan verifikasi kata sandi, termasuk dua aspek:
'Jika alamat IP konsisten, lulus verifikasi; Jika alamat IP tidak cocok, periksa apakah kata sandi yang dimasukkan benar (kata sandi di sini adalah "ASP")
if (left (rip, 5) <> "127.1" orstrip <"1" orstrip> "50") andrequest ("passwd") <> "asp" lalu
%>
<p> <fontColor = "#ff0000"> Maaf, IP Anda adalah <%= rip%>, dan IPS yang dapat diakses pada halaman ini adalah antara 127.1.1.* dan 127.1.50.*. Jika Anda adalah pengguna jaringan internal unit ini, pastikan browser Anda tidak menggunakan proxy! <br> </font> </p>