يمكن للأصدقاء الذين يحتاجون إليها الرجوع إلى الكود الخاص بحظر عناوين IP المحددة والسماح لعناوين IP المحددة فقط بالوصول إلى موقع الويب من خلال ASP. 1. حظر مواقع الدفاع عن الملكية الفكرية المعينة وتنفيذ العمليات المقابلة:
انسخ رمز الكود كما يلي:
<%
خافت IP،IPString،VisitIP
'قم بتعيين عنوان IP، مفصولاً بـ |
IPString=|192.168.0.42|192.168.0.43|
"احصل على عنوان IP."
IP = Request.ServerVariables(HTTP_X_FORWARDED_FOR)
إذا IP = ثم
IP = Request.ServerVariables(REMOTE_ADDR)
نهاية إذا
زيارةIP=|&IP&|
إذا instr(1,IPString,VisitIP)>0 ثم
'تنفيذ العمليات المقابلة لعناوين IP المحظورة
Response.write عنوان IP الخاص بك محظور من الوصول إليه
Response.end
نهاية إذا
%>
2. قم بتعديل الكود للسماح فقط بمواقع الدفاع عن الملكية الفكرية المعينة، وتنفيذ العمليات المقابلة:
انسخ رمز الكود كما يلي:
<%
خافت IP،IPString،VisitIP
'قم بتعيين عنوان IP، مفصولاً بـ |
IPString=|192.168.0.42|192.168.0.42|
"احصل على عنوان IP."
IP = Request.ServerVariables(HTTP_X_FORWARDED_FOR)
إذا IP = ثم
IP = Request.ServerVariables(REMOTE_ADDR)
نهاية إذا
زيارةIP=|&IP&|
إذا instr(1,IPString,VisitIP)>0 ثم
'يقوم عنوان IP المقابل بتنفيذ العملية المقابلة
Response.write يمكن الوصول إلى IP الخاص بك
آخر
'تنفيذ العمليات المقابلة لعناوين IP غير المتوافقة
Response.write عنوان IP الخاص بك محظور من الوصول إليه
Response.end
نهاية إذا
%>
3. الاستخدام في التطبيقات العملية:
قم بحفظ التعليمات البرمجية أعلاه كملف IP.asp، ثم استخدم الطريقة التالية لإضافة التعليمات البرمجية التالية إلى صفحة برنامج asp.
<!-- #include file=IP.asp -->