#PreserveSingleQuotes(MM_insertStr)# SELECT foo_Calendar.CalendarEye, foo_Calendar.OfficeEye, foo_Calendar.Calendar_Date, foo_Calendar.Calendar_Time, foo_Calendar.Calendar_Duration, foo_Calendar.Class_Size, foo_Calendar.Calendar_Notes, foo_Calendar.RoomEye, foo_Calendar.InstructorEye, foo_Calendar.ContactEye, foo_Calendar.ClassEye, foo_Calendar.ProgramEye, foo_Calendar.CreateLink, foo_Class.ClassEye, foo_Class.Classtitle, foo_Program.ProgramEye, foo_Program.ProgramLink, foo_Room.RoomEye, foo_Room.RoomName FROM foo_Calendar, foo_Class, foo_Program, foo_Room WHERE CalendarEye = #URL.CalendarEye# AND foo_Class.ClassEye = foo_Calendar.ClassEye AND foo_Program.ProgramEye = foo_Calendar.ProgramEye AND foo_Room.RoomEye = foo_Calendar.RoomEye ORDER BY Calendar_Date ASC, Calendar_Time ASC SELECT OfficeEye, City, OfficeEmail FROM tble_Office WHERE OfficeEye = '#CalendarView.OfficeEye#' SELECT CalendarEye, ClassEye, ContactEye, foo_Instructor.InstructorEye, foo_Instructor.FirstName, foo_Instructor.LastName, foo_Instructor.Email FROM foo_Calendar, foo_Instructor WHERE #CalendarView.InstructorEye# = foo_Instructor.InstructorEye SELECT tble_Employee.EmployeeEye, tble_Employee.LastName, tble_Employee.FirstName, tble_Employee.Email FROM tble_Employee WHERE '#CalendarView.ContactEye#' = EmployeeEye SELECT tble_Employee.EmployeeEye, RTRIM(tble_Employee.LastName), RTRIM(tble_Employee.FirstName), tble_Employee.Email FROM tble_Employee WHERE tble_Employee.EmployeeEye = #FORM.EmployeeEye# MM_paramName = ""; // *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters // create the list of parameters which should not be maintained MM_removeList = "&index="; If (MM_paramName NEQ "") MM_removeList = MM_removeList & "&" & MM_paramName & "="; MM_keepURL=""; MM_keepForm=""; MM_keepBoth=""; MM_keepNone=""; // add the existing URL parameters to the MM_keepURL string MM_params=ListToArray(CGI.QUERY_StrING,"&"); For (i=1; i LTE ArrayLen(MM_params); i=i+1) { If (FindNoCase("&" & GetToken(MM_params[i],1,"=") & "=",MM_removeList) Is 0) MM_keepURL = MM_keepURL & "&" & MM_params[i]; } // add the existing Form variables to the MM_keepForm string If (IsDefined("FORM.FieldNames")) { MM_params=ListToArray(FORM.FieldNames,","); For (i=1; i LTE ArrayLen(MM_params); i=i+1) { If (FindNoCase("&" & MM_params[i] & "=",MM_removeList) Is 0) MM_keepForm = MM_keepForm & "&" & LCase(MM_params[i]) & "=" & URLEncodedFormat(Evaluate("FORM." & MM_params[i])); } } // create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm; If (MM_keepURL NEQ "") MM_keepURL = RemoveChars(MM_keepURL,1,1); If (MM_keepForm NEQ "") MM_keepForm = RemoveChars(MM_keepForm,1,1); If (MM_keepBoth NEQ "") MM_keepBoth = RemoveChars(MM_keepBoth,1,1); Mass_ThankYou
 

#CalendarView.Classtitle#
• More Education!
 
#URL.CalendarEye#:: Calendar Eye
Course
 #CalendarView.Classtitle#
Office:
 #QRYoffice.City#
Notes
 #CalendarView.Calendar_Notes#
Program
 #CalendarView.ProgramLink#
Course Instructor
 #InstructorName.FirstName# #InstructorName.LastName#
Contact Name #ContactName.FirstName# #ContactName.LastName#
Course Room
 #CalendarView.RoomName#
Start Date #LSDateFormat(CalendarView.Calendar_Date, 'DDDD, MMMM DD, YYYY')#
Start Time
 #LSTimeFormat(CalendarView.Calendar_Time)#
Duration #CalendarView.Calendar_Duration#
# of Slots #CalendarView.Class_Size#
   
   

 

This is the E-Mail Notice of a new class to be given at NBBJ! #LSDateFormat(CalendarView.Calendar_Date, 'DDDD, MMMM DD, YYYY') # at #LSTimeFormat(CalendarView.Calendar_Time)# Course: #CalendarView.Classtitle# Office: #QRYoffice.City# Course Instructor: #InstructorName.FirstName# #InstructorName.LastName# Course Contact: #ContactName.FirstName# #ContactName.LastName# Course Room: #CalendarView.RoomName# Start Date:# LSDateFormat(CalendarView.Calendar_Date, 'DDDD, MMMM DD, YYYY') # Start Time: # LSTimeFormat(CalendarView.Calendar_Time) # Duration: #CalendarView.Calendar_Duration# Class Size: #CalendarView.Class_Size# Notes: #CalendarView.Calendar_Notes# To view the class, click below: http://foo/yoo/practice/education/Class_View.txt?ClassEye=#CalendarView.ClassEye# To sign up for the class, click below: http://foo/yoo/practice/education/signup.txt?CalendarEye=#URL.CalendarEye# This is the E-Mail Notice of a new class to be given at NBBJ! # LSDateFormat(CalendarView.Calendar_Date, 'DDDD, MMMM DD, YYYY') # at #LSTimeFormat(CalendarView.Calendar_Time)# Course: #CalendarView.Classtitle# Office: #QRYoffice.City# Course Instructor: #InstructorName.FirstName# #InstructorName.LastName# Course Contact: #ContactName.FirstName# #ContactName.LastName# Course Room: #CalendarView.RoomName# Start Date:# LSDateFormat(CalendarView.Calendar_Date, 'DDDD, MMMM DD, YYYY') # Start Time: # LSTimeFormat(CalendarView.Calendar_Time) # Duration: #CalendarView.Calendar_Duration# Class Size: #CalendarView.Class_Size# Notes: #CalendarView.Calendar_Notes# To view the class, click below: http://foo/yoo/practice/education/Class_View.txt?ClassEye=#CalendarView.ClassEye# To sign up for the class, click below: http://foo/yoo/practice/education/signup.txt?CalendarEye=#URL.CalendarEye#