<% @ LANGUAGE=VBSCRIPT CODEPAGE = 1252 %> <% SendHeader 0, 1 %> <% ' ' ' on error resume next urlcommand = Request.QueryString("command") urlTab = Request.QueryString("tab") urlAtt = Request.QueryString("att") urlImportance = Request.QueryString("imp") urlMsgType = Request.QueryString("type") urlIsSavedRegAppt = Request.QueryString("IsSavedRegAppt") bstrObj = Request.QueryString("obj") CheckSession2 bstrVirtRoot + "/forms/ipm/schedule/meeting/request/frmroot.asp?timedout=1" If bstrObj = "" then 'can't happen reporterror1 "Invalid Message ID" End If fNewMsg=false Set objOneMsg = Session(bstrObj) L_TabWidth_Number = 122 L_Appointment_Text = "Appointment" L_MeetingPlanner_Text = "Attendee Availability" L_Recurrence_Text = "Recurrence" L_Attachments_Text = "Attachments" L_Options_Text = "Options" %>
<% IF urlMsgType=0 THEN %> Save Invite Attendees <% ELSE %> <% If urlcommand="new" Then%> Send <%Else%> Send Update <%End If%> Save <% If urlcommand="new" Then%> Cancel Invitation <%End If%> View Calendar Check Names <% END IF %> <% if urlImportance="2" Then %> Importance: High <% else %> Importance: High <% end if %> <% if urlImportance="0" Then %> Importance: Low <% else %> Importance: Low <% end if %> <% If urlcommand="new" Then %> Delete <% Elseif urlcommand="editseries" then %> Delete Series <%else%> Delete <% END IF %> <% If urlcommand = "editseries" OR urlcommand = "new" Then %> <% Else %> <% If objOneMsg.IsRecurring Then %> Delete Series <% End If %> Edit Series <% End If %> Help
<% If urlcommand = "editseries" OR urlcommand = "new" Then nTab = 5 Else nTab = 4 End If %> <% For X = 1 to nTab %> <% Next %> <% If nTab = 5 Then %> <% end if%> <% urlTab = urlTab AND 255 For x = 1 to nTab iurlTab = CInt(urlTab) If nTab = 4 Then If iurlTab = 4 OR iurlTab = 5 Then iurlTab = iurlTab - 1 End If End If If x = iurlTab Then %> <% Else %> <% End If Next %>
/forms/tablcor.gif width=5 height=5> /forms/tabWdot.gif width="<%=L_TabWidth_Number%>" height=2> /forms/tabrcor.gif width=5 height=5>
/forms/tabWdot.gif width=2 height='22'> <% if urlTab<>"1" Then %> <% =L_Appointment_Text %> <% else %> Appointment <% end if%> /forms/tabrline.gif width=2 height='22'> /forms/tabWdot.gif width=2 height='22'> <% if urlTab<>"2" Then %> <% =L_MeetingPlanner_Text %> <% else %> Attendee Availability <% end if%> /forms/tabrline.gif width=2 height='22'> /forms/tabWdot.gif width=2 height='22'> <% if urlTab<>"3" Then %> <% =L_Recurrence_Text %> <% else %> Recurrence <% end if%> /forms/tabrline.gif width=2 height='22'> /forms/tabWdot.gif width=2 height='22'> <% if urlTab<>"4" Then %> <% =L_Attachments_Text %> <% else %> Attachments <% end if%> <%if urlAtt="1" Then %>  /images/papclip.gif border=0 height=16 width=10> <%end if%> /forms/tabrline.gif width=2 height='22'> /forms/tabWdot.gif width=2 height='22'> <% if urlTab<>"5" Then %> <% = L_Options_Text %> <% else %> Options <% end if%> /forms/tabrline.gif width=2 height='22'>
 /forms/tabWdot.gif width="<%=L_TabWidth_Number+10%>" height=2>/forms/tabWdot.gif width=300 height=2>