File: D:/web/itpartnership/RandomQ/Admin/inc_header.asp
<% Response.Buffer = True %>
<% Dim strPATH
strPATH = Trim(Lcase(Request.ServerVariables("PATH_INFO"))) %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head>
<title>Random Quote Administration</title>
<link rel="STYLESHEET" type="text/css" href="styles.css">
<script language="JavaScript">
function AskLogout() {
if (confirm("Log Out ? " )) {
window.location.replace("index.asp?logout=True");
}
}
</script>
</head><body bgcolor="#ffffff">
<!-- ----------------------------- -->
<!-- Random Quote Version 2.5 -->
<!-- Copyright � 2005 Expinion.net -->
<!-- http://www.expinion.net -->
<!-- ----------------------------- -->
<br /><br />
<table width="80%" align="center" cellpadding="2" cellspacing="0" border="1" bordercolor="#C1C5CC" style="border-collapse:collapse;"><tr bgcolor="">
<td style="cursor:hand;" onclick="window.location='index_q.asp'" height="25" width="14%" align="center" bgcolor="<%IF Instr(strPATH,"q_add.asp") > 0 OR Instr(strPATH,"q_edit.asp") > 0 OR Instr(strPATH,"q_view.asp") > 0 OR Instr(strPATH,"index_q.asp") > 0 THEN%>#F0F2F4<%ELSE%>White<%END IF%>"><a class="tabLINK" href="index_q.asp">QUOTES</a></td>
<td style="cursor:hand;" onclick="window.location='about.asp'" height="25" width="14%" align="center" bgcolor="<%IF Instr(strPATH,"about.asp") > 0 THEN%>#F0F2F4<%ELSE%>White<%END IF%>"><a class="tabLINK" href="about.asp">ABOUT</a></td>
<td width="14%" align="center" bgcolor=""><a class="tabLINK" style="cursor:hand;" onclick="AskLogout()">LOG OUT</a></td>
</table>
<br />