bueno para ser mas especifco, losa archivos se distribuyen de la siguiente manera. (Acceso.asp)
<%
Usuario = Request.QueryString("Usuario")
ClaveAcceso = Request.QueryString("ClaveAcceso")
Set Conexion = Server.CreateObject("ADODB.Connection")
Conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.MapPath("./Datos/BaseDatos.mdb")
Sql = "SELECT * FROM Usuarios WHERE Usuario = '" & Usuario & "'"
Set RecordSet = Server.CreateObject("ADODB.RecordSet")
RecordSet.Open Sql, Conexion
If RecordSet.EOF = True Then
Mensaje = "El usuario <B>" & Usuario & "</B> no existe"
Response.Redirect("PaginaError.asp?Mensaje=" & Mensaje & "&PaginaReEnvio=Default.asp")
ElseIf RecordSet("ClaveAcceso") = ClaveAcceso Then
Response.Redirect("TuPagina.asp")
Else
Mensaje = "La clave de acceso introducida no es la correcta para el usuario <B>" & Usuario & "</B>"
Response.Redirect("PaginaError.asp?Mensaje=" & Mensaje & "&PaginaReEnvio=Default.asp")
End If
RecordSet.Close
Conexion.Close
Set RecordSet = Nothing
Set Conexion = Nothing
%>
(Default.ASP)
<HTML>
<SCRIPT language="javascript">
function Comprobar()
{
var Usuario;
var ClaveAcceso;
Usuario = document.all.Usuario.value;
ClaveAcceso = document.all.ClaveAcceso.value;
if (Usuario=='' || ClaveAcceso=='')
{
alert("Debe introducir obligatoriamente el Nombre de Usuario así como su Clave de Acceso");
}
else
{
location.replace("Acceso.asp?Usuario=" + Usuario + "&ClaveAcceso=" + ClaveAcceso)
//location.href="Acceso.asp?Usuario=" + Usuario + "&ClaveAcceso=" + ClaveAcceso;
}
}
</SCRIPT>
<BODY bgcolor="Teal">
<TABLE>
<TR bgcolor="Gainsboro">
<TD align="center"><FONT color="Teal" face="Verdana" size="2"><B>Usuario</B></FONT></TD>
</TR>
<TR>
<TD><INPUT name="Usuario" maxlength="12" ID="Text1"></TD>
</TR>
<tr><td height="10"></td></tr>
<TR bgcolor="Gainsboro">
<TD align="center"><FONT color="Teal" face="Verdana" size="2"><B>Clave Acceso</B></FONT></TD>
</TR>
<TR>
<TD><INPUT name="ClaveAcceso" maxlength="12" type="password" ID="Password1"></TD>
</TR>
<tr><td height="10"></td></tr>
<TR>
<TD align="center"><INPUT type="submit" value="Ingresar" onclick="javascript
:Comprobar()" ID="Submit1" NAME="Submit1"> </TD>
</TR>
</TABLE>
</BODY>
</HTML>
(paginaerror.asp)
<%
Mensaje = Request.QueryString("Mensaje")
PaginaReEnvio = Request.QueryString("PaginaReEnvio")
%>
<HTML>
<SCRIPT language="javascript">
function Continuar(PaginaReEnvio)
{
location.replace(PaginaReEnvio);
//location.href = PaginaReEnvio;
}
</SCRIPT>
<BODY bgcolor="Teal">
<TABLE width="100%" height="100%">
<TR>
<TD align="center"><FONT face="Verdana" color="Gainsboro" size="3"><%=Mensaje%></FONT></TD>
</TR>
<TR>
<TD align="center">
<INPUT type="submit" value="Continuar" onclick="javascript
:Continuar('<%=PaginaReEnvio%>' )">
</TD>
</TR>
</TABLE>
</BODY>
</HTML>
(tupagina.asp)
<HTML>
<BODY bgcolor="Teal">
<TABLE width="100%" height="100%">
<TR valign="middle">
<TD align="center">
<FONT face="Verdana" size=5" color="Gainsboro">
<B>
Esta sería tu página<BR><BR>
Donde yo realizo la llamada a "TuPagina.asp" debes de poner el nombre de tu página
</B>
</FONT>
</TD>
</TR>
</TABLE>
</BODY>
</HTML>
FAVOR AYUDENME QUE NECESITO HACERLO MUY PRONTO.
GRACIAS
SALU2