Recomendado: interpretar el uso de la función del objeto regexp de ASP Los objetos regexp proporcionan soporte de expresión regular simple. Uso de objeto regexp: el siguiente es el contenido referenciado: function regexPtest (Patrn, strng) dim re
Script de verificación de inicio de sesión del usuario, chkpwd.asp
| El siguiente es el contenido citado: <% '========= Script de verificación de inicio de sesión de usuario ======== 'Si el objeto aprobado no se ha definido, se define como falso, lo que indica que no ha pasado la verificación Si isEtimty (sesión (aprobado)) entonces Sesión (pasada) = falso Final si 'Sesión (aprobada) = falso, lo que significa que la información de verificación aprobada del formulario aún no se ha aprobado. Si la sesión (aprobado) = falso entonces UserName = request.Form (nombre de usuario) Userpwd = request.form (userPwd) Si username = entonces Errmsg = consejo: ingrese su nombre de usuario y contraseña Demás '=================================================== == Establecer conn = server.createObject (ADODB.Connection) Conn.connectionString = Driver = {SQL Server}; Server = 192.168.1.3; uid = sa; pwd =; database = zcmrs Conn.open '============================ Lea los datos del usuario de la tabla Log =============== ========== 'Definir el objeto de récordsset Establecer rs = server.createObject (ADODB.RecordSet) 'Establecer conexiones del objeto de conexión Establecer rs.activeconnection = Conn 'Establezca el tipo de cursor Rs.Cursortype = 3 'Conjunto de registros abiertos Rs.open Seleccionar nombre de usuario, contraseña de Erpuser donde username = '& UserName &' '=================================================== == Si rs.Eof entonces Errmsg = consejo: el usuario no existe o la contraseña está incorrecta Demás Si userpwd <> rs.fields (contraseña) entonces entonces Errmsg = TIP: ¡Falló el error! De lo contrario de lo contrario Errmsg = Sesión (pasada) = True Sesión (nombre de usuario) = rs.fields (nombre de usuario) 'Identificar la sesión de permisos de usuario (UserID) = Rs.fields (UserID) Final si Final si Final si Final si 'Después de inicio de sesión, se dibujará el formulario de inicio de sesión Si no la sesión (aprobada) = True entonces %> <html> <HEAD> <title> UNT Titulado Documento </title> <estilo type = text/css> <!- .Style1 {Font-Size: 12px; Font-Weight: Bold; Margen-izquierda: 120px; Outline: Double} -> </style> <estilo type = text/css> <!- .Style2 {Font-Size: 12px; Font-Weight: Bold; Outline: Double; Color:#FF3333} -> </style> </ablo> <Body LeftMargin = 0 topmargin = 0 marginHeight = 0 marginwidth = 0 bgcolor =#000000> <div ID = estilo parent = altura: 300; ancho: 450; estilo de borde: sólido; border-color: #fffff; margen-top: 80px; margen-izquierda: 25%; margen-derecha: 25%; fondo- Color: #ffffff> <Div id = Denglu style = Font-Size: 12px; Font-Weight: Bold; Background-Color:#0099ff; Text-Align: Center; Altura: 40px;> <br> Sistema ERP Iniciar sesión </div> <Form Action = <%= request.ServerVariables (path_info)%> método = post name = myForm id = myForm> <p class = style1> username: <input name = username type = text id = username size = 18 maxLength = 20> </p> <p class = style1> contraseña: <input name = userpwd type = contraseña id = userpwd size = 18 maxLength = 20> </p> <P align = Center class = style2> <%= errmsg%> </p> <p> <input type = enviar align = segundo nombre = enviar value = inicio de sesión en el sistema> <input name = REGE type = button align = Middle OnClick = Ubicación = 'Registro.asp' id = Rege Value = Register User> </p> </form> </div> </body> </html> <% '<p class = style1> código de verificación: <input name = checkcode type = text id = checkco |
Compartir: ASP Regular Expression Learning Podemos verificar fácilmente la legalidad de varios datos mediante el objeto de "expresión regular". Primero, comprendamos qué es exactamente el objeto de "expresión regular" de VBScript.
2 páginas en el total de la página 12 Página siguiente