<% # Color Options # ------------- %> <HTML> <HEAD> <TITLE>Calendar Login</TITLE> <META HTTP-EQUIV="expires" CONTENT="now"> <META HTTP-EQUIV="Pragma" CONTENT="no-cache"> <STYLE> A { text-decoration:none; } A:hover { text-decoration:underline; } .thinborder { border-color:#666666; border-style:solid; border-width:1px; } <% if ($_FONT) { %>BODY { font-family:"<%=$_FONT%>" }<% } %> </STYLE> </HEAD> <BODY BGCOLOR="<%=$_BGCOLOR%>" LINK="<%=$_LINK%>" ALINK="<%=$_ALINK%>" VLINK="<%=$_VLINK%>" onLoad="document.forms['mainform'].username.focus();"> <CENTER> <FORM NAME="mainform" ACTION="<%= $CGI_URL %>" METHOD="POST"> <INPUT TYPE="hidden" NAME="fromTemplate" VALUE="login.html"> <INPUT TYPE="hidden" NAME="template" VALUE="default.html"> <INPUT TYPE="hidden" NAME="view" VALUE="Month"> <INPUT TYPE="hidden" NAME="command" VALUE="login"> <INPUT TYPE="hidden" NAME="calendar" VALUE="<%CALENDAR KEY%>"> <TABLE CLASS="thinborder" BORDER="0" CELLPADDING=2 CELLSPACING=0> <TR><TD COLSPAN="2" ALIGN="center"> <FONT <%=$_HEADER_SIZE%>>Login</FONT> <% unless ($AdminConfig->get("require_login")) { %> <BR> <A HREF="<%=$CGI_URL%>?calendar=<%=$CALENDAR_KEY%>">Return to Calendar</A> <% } %> </TD></TR> <% if ($userMessage ne "") { %> <TR> <TD COLSPAN="2" ALIGN="left" VALIGN="top"><FONT COLOR="red"><%= $userMessage %></FONT></TD> </TR> <% } %> <TR> <TD ALIGN="right"> <B>Username:</B></TD> <TD><INPUT TYPE="text" NAME="username" SIZE="15" VALUE="<%= $main::in{username} %>"> </TD> </TR> <TR> <TD ALIGN="right"><B>Password:</B></TD> <TD><INPUT TYPE="password" NAME="password" SIZE="15" VALUE=""></TD> </TR> <TR> <TD COLSPAN="2" ALIGN="center"><INPUT CLASS="button" TYPE="submit" VALUE="Login"></TD> </TR> </TABLE> </FORM> </CENTER> </BODY> </HTML>
package Template; print "";# Color Options # ------------- print "\n\n<HTML>\n<HEAD>\n <TITLE>Calendar Login</TITLE>\n<META HTTP-EQUIV=\"expires\" CONTENT=\"now\">\n<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\">\n<STYLE>\nA { text-decoration:none; }\nA:hover { text-decoration:underline; }\n.thinborder { border-color:#666666; border-style:solid; border-width:1px; }\n"; if ($_FONT) {print "BODY { font-family:\"";print $_FONT;print "\" }";} print "\n</STYLE>\n</HEAD>\n<BODY BGCOLOR=\"";print $_BGCOLOR;print "\" LINK=\"";print $_LINK;print "\" ALINK=\"";print $_ALINK;print "\" VLINK=\"";print $_VLINK;print "\" onLoad=\"document.forms['mainform'].username.focus();\">\n\n<CENTER>\n\n<FORM NAME=\"mainform\" ACTION=\"";print $CGI_URL;print "\" METHOD=\"POST\">\n<INPUT TYPE=\"hidden\" NAME=\"fromTemplate\" VALUE=\"login.html\">\n<INPUT TYPE=\"hidden\" NAME=\"template\" VALUE=\"default.html\">\n<INPUT TYPE=\"hidden\" NAME=\"view\" VALUE=\"Month\">\n<INPUT TYPE=\"hidden\" NAME=\"command\" VALUE=\"login\">\n<INPUT TYPE=\"hidden\" NAME=\"calendar\" VALUE=\"";CALENDAR KEYprint "\">\n\n<TABLE CLASS=\"thinborder\" BORDER=\"0\" CELLPADDING=2 CELLSPACING=0>\n\n<TR><TD COLSPAN=\"2\" ALIGN=\"center\">\n <FONT "; print $_HEADER_SIZE;print ">Login</FONT>\n "; unless ($AdminConfig->get("require_login")) { print "\n <BR>\n <A HREF=\"";print $CGI_URL;print "?calendar=";print $CALENDAR_KEY;print "\">Return to Calendar</A>\n "; } print "\n</TD></TR>\n\n"; if ($userMessage ne "") { print "\n<TR>\n <TD COLSPAN=\"2\" ALIGN=\"left\" VALIGN=\"top\"><FONT COLOR=\"red\">";print $userMessage;print "</FONT></TD>\n</TR>\n"; } print "\n\n<TR>\n <TD ALIGN=\"right\"> <B>Username:</B></TD>\n <TD><INPUT TYPE=\"text\" NAME=\"username\" SIZE=\"15\" VALUE=\"";print $main::in{username};print "\"> </TD>\n</TR>\n<TR>\n <TD ALIGN=\"right\"><B>Password:</B></TD>\n <TD><INPUT TYPE=\"password\" NAME=\"password\" SIZE=\"15\" VALUE=\"\"></TD>\n</TR>\n<TR>\n <TD COLSPAN=\"2\" ALIGN=\"center\"><INPUT CLASS=\"button\" TYPE=\"submit\" VALUE=\"Login\"></TD>\n</TR>\n</TABLE>\n\n</FORM>\n\n</CENTER>\n\n</BODY>\n</HTML>\n"; package main;