128 lines
3.7 KiB
HTML
128 lines
3.7 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
|
|
<HTML>
|
|
<HEAD>
|
|
<TITLE>Inicio</TITLE>
|
|
<META NAME="GENERATOR" CONTENT="Mozilla/4.0b1 (Win95; I) [Netscape]">
|
|
<SCRIPT language="JavaScript">
|
|
function validate() {
|
|
if (!document.login.username.value) {
|
|
alert("Debe introducir un nombre de usuario y una clave de acceso!");
|
|
return false;
|
|
}
|
|
document.login.prevPage.value = "initial.html submit";
|
|
return true;
|
|
}
|
|
</SCRIPT>
|
|
<SCRIPT SRC="global.js">
|
|
</SCRIPT>
|
|
<SCRIPT SRC="ctasapagar.js">
|
|
</SCRIPT>
|
|
</HEAD>
|
|
<BODY BACKGROUND="images/BG.JPG">
|
|
|
|
<P><!-- application: Cuentas a Pagar -->
|
|
<!-- version: 1.0 -->
|
|
<!-- company name: AdmiSys -->
|
|
<!-- filename: initial.html -->
|
|
<!-- description: initial and default page of the application -->
|
|
<!-- application returns here whenever a non-database -->
|
|
<!-- error occurs. checks if user is logged in, -->
|
|
<!-- prompts for id and password if not, else goes to -->
|
|
<!-- main application screen. -->
|
|
<SERVER>
|
|
/*
|
|
$Log: initial.html,v $
|
|
|
|
*/
|
|
<!-- this is the only page where client.prevPage doesn't matter -->
|
|
client.prevPage = "rinitial.html";
|
|
client.es_inicio = 1;
|
|
dbConnect();
|
|
|
|
<!-- if we know who the user is already, go direct to enter hours -->
|
|
if (!request.ipw && client.username != "null" && client.username != null) {
|
|
// if (!loggedIn()) <!-- session expired -->
|
|
// redirect("logout.html");
|
|
// else
|
|
// if (request.err)
|
|
// redirect("multi_entry.html");
|
|
// else
|
|
redirect("ctasapagar.html?FrameType="+request.FrameType);
|
|
}
|
|
if (request.err)
|
|
redirect("logged_out.html");
|
|
</SERVER></P>
|
|
|
|
<DIV ALIGN=CENTER><TABLE BORDER=4 BGCOLOR="#FFFFFF" >
|
|
<TR><TD COLSPAN="3">
|
|
<DT><A HREF="http://ctasapagar"><IMG SRC="images/sand2new.gif"
|
|
ALT="Construcciones SANDO" BORDER=0 HEIGHT=117 WIDTH=424 ALIGN=RIGHT></A>
|
|
<A HREF="http://ctasapagar"> </A></DT>
|
|
</TD></TR>
|
|
</TABLE>
|
|
<H1>
|
|
Departamento de Cuentas a Pagar
|
|
</A></H1>
|
|
<TABLE>
|
|
<CAPTION>
|
|
<P><!------ end nested table --></P></RIGHT>
|
|
</CAPTION>
|
|
<TR><TD><DT> </DT></TD>
|
|
<TD colspan=2 align=right><DT>
|
|
<FORM name="login"
|
|
method="post"
|
|
action="login.html"
|
|
onSubmit="return validate()">
|
|
</DT>
|
|
<P><!----- nested table -------></P>
|
|
<TR valign=baseline><TD><DT>
|
|
<SERVER>
|
|
<!-- if request.ipw is set, the user has entered an incorrect login -->
|
|
<!-- or password. -->
|
|
if (request.ipw) {
|
|
writeln("<td><b><i>El nombre de usuario o el password<br>es incorrecto.</i></b></td>");
|
|
}
|
|
</SERVER>
|
|
</DT>
|
|
</TD><DT></DT>
|
|
<TD align=right><H3>USER</H3></TD>
|
|
<TD><DT>
|
|
<SERVER>
|
|
if (request.username != "null" && request.username != null)
|
|
writeln(" <input name=\"username\" type=\"hidden\" size=\"15\" value=\""+request.username+"\">");
|
|
else
|
|
writeln(" <input name=\"username\" type=\"text\" size=\"15\">");
|
|
</SERVER>
|
|
</DT></TD></TR>
|
|
<TR valign=baseline><TD><DT>
|
|
<SERVER>
|
|
if (request.ipw)
|
|
writeln("<td><b><i>Por favor Intentar otra vez.</i></b></td>");
|
|
</SERVER>
|
|
</DT></TD>
|
|
<TD align=right><H3>PASSWORD</H3></TD>
|
|
<TD><DT><INPUT name="password" type="password" size="15"></DT></TD></TR>
|
|
<TR><TD><DT>
|
|
<SERVER>
|
|
if (request.ipw)
|
|
writeln("<td></td>");
|
|
</SERVER>
|
|
</DT></TD>
|
|
<TD><DT> </DT></TD>
|
|
<TD align=right><DT>
|
|
<INPUT name="Submit" type="submit" value="ENTER">
|
|
<INPUT name="prevPage" type="hidden"></DT>
|
|
</TD>
|
|
</TR>
|
|
</TABLE></DIV>
|
|
<SERVER>
|
|
writeln('<INPUT TYPE="hidden" NAME="FrameType" VALUE="'+request.FrameType+'" >');
|
|
writeln('<INPUT TYPE="hidden" NAME="ViewFkey" VALUE="'+request.ViewFkey+'" >');
|
|
writeln('<INPUT TYPE="hidden" NAME="MsgScroll" VALUE="'+request.MsgScroll+'" >');
|
|
</SERVER>
|
|
</FORM>
|
|
<SERVER>writeSignature(true);</SERVER>
|
|
<BR><CENTER>Last modified: 27/2/97 </FONT></DT></CENTER>
|
|
</BODY>
|
|
</HTML>
|