Creas un archivo login.htm......
<HTML><HEAD><TITLE>Login</TITLE>
<BODY>
<DIV class=Section1>
<FORM action=paginadeproceso.asp method=post>
<P> </P>
<P> </P>
<P> <O:P> </O:P></P>
<DIV align=center>
<TABLE style="BACKGROUND: #f2f2f2; WIDTH: 50%; mso-cellspacing: 1.5pt"
cellPadding=0 width="50%" bgColor=#00ffff border=0>
<TBODY>
<TR>
<TD
style="PADDING-RIGHT: 0.75pt; PADDING-LEFT: 0.75pt; BACKGROUND: blue; PADDING-BOTTOM: 0.75pt; WIDTH: 100%; PADDING-TOP: 0.75pt"
width="100%" colSpan=2>
<P style="TEXT-ALIGN: center" align=center><SPAN
style="COLOR: white"><B>Login</B></SPAN></P></TD></TR>
<TR>
<TD
style="PADDING-RIGHT: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-BOTTOM: 0.75pt; WIDTH: 50%; PADDING-TOP: 0.75pt"
width="50%">
<P class=MsoNormal><B>Usuario:</B></P></TD>
<TD
style="PADDING-RIGHT: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-BOTTOM: 0.75pt; WIDTH: 50%; PADDING-TOP: 0.75pt"
width="50%">
<P class=MsoNormal><B><INPUT name=usuario></B></P></TD></TR>
<TR>
<TD
style="PADDING-RIGHT: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-BOTTOM: 0.75pt; WIDTH: 50%; PADDING-TOP: 0.75pt"
width="50%">
<P class=MsoNormal><B>Password:</B></P></TD>
<TD
style="PADDING-RIGHT: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-BOTTOM: 0.75pt; WIDTH: 50%; PADDING-TOP: 0.75pt"
width="50%">
<P class=MsoNormal><B><INPUT type=password name=password></B></P></TD></TR>
<TR>
<TD
style="PADDING-RIGHT: 0.75pt; PADDING-LEFT: 0.75pt; PADDING-BOTTOM: 0.75pt; WIDTH: 100%; PADDING-TOP: 0.75pt"
width="100%" colSpan=2>
<P style="TEXT-ALIGN: center" align=center><B><INPUT type=submit value=Enviar name=privado></B></P></TD></TR></TBODY></TABLE></DIV></FORM></DIV>
<P align=center>
<P><FONT face=Verdana size=2><SPAN lang=EN-US
style="FONT-SIZE: 11pt; FONT-FAMILY: Verdana; mso-bidi-font-family: Arial; mso-ansi-language: EN-US"><O:P></O:P></SPAN></FONT></P></BODY></HTML>
Luego crea paginadeproceso.asp...
<%@ language=VBSCRIPT %>
<% Option Explicit %>
<% Response.Buffer = True %>
<HTML><HEAD><TITLE>Página de proceso</TITLE>
<BODY>
<%
Dim bolContraCoincidente, strContraReal, strContraIntroducida
Dim bolUsuCoincidente, strUsuReal, strUsuIntroducido
strUsuReal = "cacalavaca"
strUsuIntroducido = Request.Form("usuario")
bolUsuCoincidente = (strUsuIntroducido = strUsuReal)
strContraReal = "grancacalavaca"
strContraIntroducida = Request.Form("password")
bolContraCoincidente = (strContraIntroducida = strContraReal)
if Not bolContraCoincidente then
Response.Clear
Response.Write "Contraseña no válida."
Response.Write "Usted debe ser un usuario registrado."
Response.End
end if
%>
<p> Aquí pongo lo que quiero y que no quiero que nadie vea, incluso desde el explorador </p>
</body>
</html>
Esto es del manual aprende asp en 21 días.
Un saludo y espero que te sirva
A mi me ayudan en los foros y yo hago lo mismo.
Saludos
Roberto