"> < input type = "text" name = tamaño " nombre de usuario" = " 19 ", un título = " Introduzca el nombre de usuario . " tabindex = " 1 "> < input type = name " password" = tamaño "Password " = " 19 " a title = " Introduzca la contraseña ". tabindex = " 2 ">

< /form>
3

Enviar la información del formulario de la página de proceso para verificar que la información presentada partidos la información almacenada en la base de datos . Líneas 1-5 solicitan al RefURL desde la página principal o en su sitio Web para enviar al usuario si no se proporciona el nombre de usuario correcto. Líneas 5-10 abrir una conexión a la base de datos de registros y luego comprueba si los datos introducidos coinciden con una línea en la base de datos. Líneas 11-17 ver si lo que ha introducido es correcta y, o bien le envía de nuevo a login.asp si "False" ( información de acceso equivocado) o "True" establece una sesión para el usuario. Líneas 18-19 cierran la conexión a la base de datos y de registros . La línea 12 crea el mensaje para dar al usuario y lo añade a la URL para que se indica al usuario entrar en la información incorrecta ( ver paso 4 ) . Nombre y guarde la página de procesamiento " login_proc.asp " .

<% If Request.Form ( " RefURL ") < > "" ThenRefURL = Request.Form ( " RefURL ") ElseRefURL = "admin /" End If

Set Conn = Server.CreateObject default.asp ( " ADODB.Connection ") conn.Open " Provider = SQLOLEDB ; Data Source = mssql02.1and1.com ; UID = dbo266996089 ; PWD = dhaka06 , BASE DE DATOS = db266996089 " Set rs = Server.CreateObject ( " ADODB.Recordset " )

SQL = " SELECT * FROM tbl_login DONDE username = '"& Request.Form ( " nombre de usuario " ) &"' y la contraseña = '"& Request.Form ( " Password ") &"' "

Set RS = conn.Execute (SQL )

Si rs.EOF thenResponse.Redirect ( " login.asp ? MSG = nombre de usuario o contraseña inválido . Por favor, vuelve a intentarlo ! ") ElseSession (" Usuario ") = TrueSession ( " nombre de usuario " ) = RS ( " nombre de usuario " ) Response.Redirect RefURLEnd Si

Set Conn = NothingSet RS = Nothing% >
4

Agregue la siguiente línea de código justo encima de su código de forma ( paso 2 ) en login.asp .

<% = Request.QueryString ( "msg ")% >

Si hay una base de datos con éxito responden a su página mostrará al user.If ningún partido se encuentra el código del paso 3 se enviará al usuario a la página login.asp y mostrar el mensaje " nombre de usuario o contraseña inválido . Por favor, inténtelo de nuevo " .