Recomendado: 28 visitas sobre el aprendizaje ASP y la programación 1. No te pierdas ningún problema de programación pequeño que parezca simple: a menudo no son tan simples o pueden conducir a muchos puntos de conocimiento; 2. Ser capaz de usar ASP no significa que pueda hacer ASP; 3. No puedes aprender el idioma ASP leyendo libros ASP; 4.
Para usar la propiedad ServerVariables del objeto de solicitud, úsela para obtener el valor de la variable de entorno. La sintaxis utilizada es: request.servervariables (variable), variable representa el nombre de la variable de entorno, como el nombre del host del servidor, el nombre del software del servidor web, etc. Si la variable es remota_addr, representa la dirección IP del visitante, y a través de él, el filtrado de la dirección IP se puede lograr.
El programa fuente es el siguiente: (Nombre del archivo: Demo.asp)
| El siguiente es el contenido citado: ＜ html ＞ ＜ Cabeza ＞ ＜ meta http-outiv = content-type content = text/html; Charset = GB_2312-80 ＞ ＜ meta name = Generator content = Microsoft FrontPage Express 2.0 ＞ ＜ Estilo ＞ ＜! － .as {Line-Height: 15px; tamaño de fuente: 9pt} A: Hover {Color: RGB (0,51,240); Decoración de texto: Subline} .p9 {Font-Family: 安体; tamaño de fuente: 9pt; Línea-aguja: 15pt} .p12 {Font-Family: 安体; tamaño de fuente: 12pt; Línea de altura: 18pt} A: enlace {TEXT-Decoration: None;} A: Visited {Text-Decoration: None;} A: Hover {Text-Decoration: subraye; Font-Size: 125%; color: azul} －＞ ＜/estilo ＞ ＜ Título ＞ Demostración de función de firewall de página ASP ＜/Título ＞ ＜/cabeza ＞ ＜ Fondo del cuerpo = back.jpg ＞ ＜% ′ Use request.ServerVariAbles (remota_addr) para obtener la dirección IP y guardarla en la variable RIP rip = request.serverVariAbles (remota_addr) Strip = CSTR (RIP) 'Obtenga el valor del tercer segmento de la dirección IP y guárdelo para despejarlo para i = 1 a 2 Strip = Right (Strip, Len (Strip) -Instr (1, Strip,.))) próximo Strip = izquierda (Str, Instr (1, Str,.)-1) 'Verificación de validez de la dirección IP y verificación de contraseña, incluidos dos aspectos: 'Si la dirección IP es de cumplimiento, aprobe la verificación; Si la dirección IP no se ajusta, verifique si la contraseña ingresada es correcta (aquí la contraseña es ASP) if (izquierda (rip, 5) ＜＞ 127.1 o tira ＜ 1 o tira ＞ 50) y solicite (pase) ＜＞ ASP entonces %＞ ＜ P ＜ Color de fuente =#FF0000 ＞ Lo siento, su IP es ＜%= RIP%＞, y los IP a los que se puede acceder en esta página están entre 127.1.1. ＊ ＊ y 127.1.50. ＊. Si es un usuario de la red interna de esta unidad, ¡asegúrese de que su navegador no use un proxy! ＜br＞＜/fuente ＞ ＜ Form Action = Demo.asp Method = Post id = form1 name = Form1 ＞ ＜ P ＞ Ingrese la contraseña de acceso: ＜ Tipo de entrada = Nombre de la contraseña = Passwd ＞ ＜ Tipo de entrada = Subt Value = Confirmar name = B1 ＞; ＜/P ＞ ＜/forma ＞ ＜ %más %＞ ′ Una página a la que los usuarios legales pueden acceder, se puede agregar cualquier información aquí ¡Felicitaciones, ha aprobado con éxito la certificación de seguridad de la página y puede usar directamente los recursos de este sitio! ＜ %final si %＞ ＜/cuerpo ＞ ＜/html ＞ |
De hecho, solo modifique ligeramente el programa anterior (como la dirección IP y otra información). Por supuesto, esto solo implementa funciones de prevención de seguridad en una página. Si un sitio web tiene varias páginas, puede establecer una variable de sesión para marcar al usuario para hacer juicios en la página posterior.
Compartir: ADO Tutorial para principiantes: ADO acelera los scripts con getstring () Autor: use el método GetString () para acelerar su script ASP (en lugar de respuesta de múltiples líneas. Write). Instancia usando getString () Cómo usar getString () para mostrar datos en un registro establecido en una tabla HTML. Respuesta de múltiples líneas. Escribe