Please enter your username and password User name: Password:
Source:
<body>
<title>
User login
</title>
<%
If request.form.count=0 Then
%>
, enter the username and password
<form action= "Login.asp" method= "POST"
<table Border=0>
<tr ><td> User name: </td>
<td><input type=text name=username value= "1234" size= "></td>"
</tr>
<tr><td> Password: </td>
<td><input type=password name=password value= " 1234 "size=" ></td>
</tr>
</table>
<input type=submit value= Confirm Commit
< Input Type=reset value=
</form>
<%else%>
<%
Dim user
Dim pwd
user= Request.Form ("username")
Pwd=request.form ("password")
If user= "1234" then
if pwd= "1234" then
Response.Write "User logon succeeded"
Else
Response.Write "User password is invalid"
End If
Else
Response.Write "Invalid user"
End If
End If
%>
Since the next Learning Channel browsing the page as an HTML page, it is not possible to demonstrate the normal ASP code effect. The demo given above is a case where the code is interpreted by IIS. Users can copy the code and test the effect themselves.