لاستخدام خاصية ServerVariables لكائن الطلب ، استخدمه للحصول على قيمة متغير البيئة. بناء الجملة المستخدمة هو: request.ServerVariables (متغير) ، "المتغير" يمثل اسم متغير البيئة ، مثل اسم مضيف الخادم ، واسم برنامج خادم الويب ، وما إلى ذلك إذا كان "متغير" هو "REMOTE_ADDR" ، فهو يمثل عنوان IP للزوار ، ومن خلاله ، يمكن تحقيق تصفية عنوان IP.
برنامج المصدر كما يلي: (اسم الملف: Demo.asp)
<html>
<head>
<metahttp-equiv = "content-type" content = "text/html ؛ charset = gb_2312-80">
<TEMANAME = "Generator" content = "MicroffrontPageExpress2.0">
<style>
<! ---
.as {Line-Height: 15px ؛ Size-Size: 9pt}
a: hover {color: rgb (0،51،240) ؛ text-decoration: thendline}
.p9 {font-family: "宋体" ؛ font-size: 9pt ؛ line-height: 15pt}
.p12 {font-family: "宋体" ؛ الحجم font: 12pt ؛ Line-Height: 18pt}
ج: الرابط {text-decoration: none ؛}
ج: زار {decoration text: none ؛}
a: hover {text-decoration: thendline ؛ حجم الخط: 125 ٪ ؛ اللون: الأزرق}
->
</style>
<title> ASP PAGE FIREWALL DISITION DEFICE </TITLE>
</head>
<BodyBackground = "Back.jpg">
<٪
′ استخدم request.servervariables ("remote_addr") للحصول على عنوان IP وحفظه في RIP المتغير
RIP = request.ServerVariables ("REMOTE_ADDR")
الشريط = CSTR (RIP)
′ احصل على قيمة الجزء الثالث من عنوان IP وحفظه للتجريد
fori = 1to2
الشريط = يمين (شريط ، لين (قطاع) -instr (1 ، الشريط ، ".")))
التالي
الشريط = اليسار (str ، instr (1 ، str ، ".")-1)
′ ′ عنوان IP التحقق من صحة والتحقق من كلمة المرور ، بما في ذلك جانبين:
إذا كان عنوان IP متسقًا ، فسيتم التحقق ؛ إذا لم يتطابق عنوان IP ، تحقق مما إذا كانت كلمة المرور التي تم إدخالها صحيحة (كلمة المرور هنا هي "ASP")
إذا كان (RISE (RIP ، 5) <> "127.1" Orstrip <"1" orstrip> "50") Andrequest ("passwd") <> "ASP" ثم
٪>
<p> <fontcolor = "#ff0000"> آسف ، IP الخاص بك هو <٪ = RIP ٪> ، و IPS التي يمكن الوصول إليها في هذه الصفحة تتراوح بين 127.1.1.* و 127.1.50.*. إذا كنت مستخدمًا للشبكة الداخلية لهذه الوحدة ، فيرجى التأكد من أن متصفحك لا يستخدم وكيلًا! <br> </font> </p>