home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 March / CHIPCD_3_98.iso / software / testsoft / exchange / webdata / usa / calendar / title.asp < prev   
Text File  |  1997-08-25  |  4KB  |  98 lines
  1. <!--#include file="../constant.inc"-->
  2. <!--#include file="../lib/session.inc"-->
  3. <!--#include file="../lib/getrend.inc"-->
  4. <!--#include file="../lib/pageutil.inc"-->
  5. <!--#include file="../lib/jsutil.inc"-->
  6. <%
  7. '<!--Microsoft Outlook Web Access-->
  8. '<!--Title.asp : Calendar Title frame with title and task bar-->
  9. '<!--Copyright (c) Microsoft Corporation 1993-1997. All rights reserved.-->
  10.  
  11. On Error Resume Next
  12. bcTaskbar = "#c0c0c0"
  13. bcTitle = "#808080"
  14. bcTitleFnt = "#ffffff"
  15. L_Calendar_Text = "Calendar"
  16.  
  17. urlFull = Request.QueryString()
  18. x = CheckSession3(bstrVirtRoot+"/calendar/main_fr.asp?"+urlFull,"parent",1)
  19.  
  20. Set objRenderer = GetCalendarRenderer
  21.  
  22. szObj = Request.QueryString("obj") 'This is our folder ID
  23.  
  24. Err.Clear
  25.  
  26. %>
  27. <!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 3.2//EN">
  28. <HTML>
  29. <HEAD>
  30. <STYLE TYPE="text/css">
  31. <!--
  32. .link     {color: ffffff}
  33. -->
  34. </STYLE>
  35. </HEAD>
  36. <BODY bgcolor="<%=bcTitle%>" text="<%=bcTitleFnt%>" link="<%=bcTitleFnt%>" vlink="<%=bcTitleFnt%>" alink="<%=bcTitleFnt%>">
  37.  
  38. <% If Err.Number = 0 Then %>
  39. <FORM name=gotoForm method=post action="" onSubmit="parent.updatePage(<%=cPages%>);return(false)"> <!-- We never really send a form -->
  40.  
  41. <TABLE bgcolor="<%=bcTaskbar%>" BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=100% NOWRAP>
  42.  
  43. <!-- Task Bar -->
  44. <tr>
  45. <td align="left" height=29 valign="middle">
  46.  
  47. <img src="<%=bstrVirtRoot%>/images/divider.gif" width=4 height=24 align="middle" hspace=2>
  48.  
  49. <!--Mail message=2, Appointment=1, Meeting Request=0, Check for New Mail, move copy, delete marked//-->
  50. <a href="javascript:parent.composeNew(0);"><img src="<%=bstrVirtRoot%>/images/newappt.gif" align="middle" width=16 height=16 alt="Compose new appointment" border=0 hspace=4></a>
  51. <a href="javascript:parent.composeNew(1);"><img src="<%=bstrVirtRoot%>/images/newmtg.gif" align="middle" width=16 height=16 alt="Compose new meeting request" border=0 hspace=4></a>
  52. <a href="JavaScript:parent.composeNew(2);"><img src="<%=bstrVirtRoot%>/images/newmail.gif" align="middle" width=16 height=17 alt="Compose new mail message" border=0 hspace=4></a>
  53.  
  54. <img src="<%=bstrVirtRoot%>/images/divider.gif" width=4 height=24 align="middle" hspace=2>
  55.  
  56. <A HREF="Javascript:parent.MarkPage();"><IMG SRC="<%=bstrVirtRoot%>/images/mffav.gif" alt="Update page address" width=20 height=20 align="middle" border=0  hspace=2></a>    
  57. <font color="<%=bcTaskFnt%>">
  58. <SELECT Name="viewSelect" onChange='parent.updateCalView(selectedIndex+1)'>
  59.     <OPTION SELECTED>Daily
  60.     <OPTION>Weekly
  61. </SELECT>
  62. </font>
  63.  
  64. <img src="<%=bstrVirtRoot%>/images/divider.gif" width=4 height=24 align="middle" hspace=2>
  65.     
  66. <a href="JavaScript:parent.openNewWindow('<%=bstrVirtRoot%>/help/calover.htm','inlineHelpWindow',600,500)">
  67. <IMG SRC="../images/help.gif" alt="Get help information on the current window" border=0 height=20 width=20 hspace=2 align="middle"></a>
  68.  
  69. <img src="<%=bstrVirtRoot%>/images/divider.gif" width=4 height=24 align="middle" hspace=2>
  70. </td></tr>
  71. </TABLE>
  72.  
  73. <TABLE bgcolor="<%=bcTitle%>" BORDER=0 CELLSPACING=0 CELLPADDING=2 WIDTH=100% NOWRAP>
  74. <tr>
  75.     <TD width=60% ALIGN=LEFT height=10 nowrap>
  76.     <font size=5 <%=bstrFace%> color="<%=bcTitleFnt%>"><b><%=L_Calendar_Text%></b></font>
  77.     </td>
  78.     <td width=25% align=right nowrap>
  79.     <A HREF="JavaScript:parent.composeNew(parent.iCurCompose)"><div class=link align=right>
  80.     <font size=2 <%=bstrFace%> color="<%=bcTitleFnt%>">Compose New</font></div></a>
  81.     </td>
  82.     <td align=left nowrap>
  83.     <SELECT Name="composeSelect" onChange='parent.iCurCompose=selectedIndex'>
  84.     <OPTION selected>Appointment
  85.     <OPTION>Meeting Request
  86.     <OPTION>Mail Message
  87.     </SELECT>
  88. <br>
  89.     </td>
  90. </tr>
  91. </table>
  92. </FORM>
  93. <% Else %>
  94.     
  95. <% End If %>
  96. </BODY>
  97. </HTML>
  98.