<%@ Language=VBScript%>
<%
Set TheMail=Server.CreateObject("CDONTS.NewMail")
TheMessage = "From: " & Request.Form("name") & vbnewline & _
"Email: " & Request.Form("email") & vbnewline & _
"Phone: " & Request.Form ("phone") & vbnewLine & _
"Regarding: " & Request.Form ("Regarding") & vbnewLine & _
"Message: " & Request.Form("message")
if Request.Form("radiobutton") = "informatics" then
if Request.Form("email")="" then
TheMail.Send "CommentOnGCRC@unknown.com","weiminl@uic.edu", Request.Form("Regarding"),TheMessage
else
TheMail.Send Request.Form("Email"),"weiminl@uic.edu", Request.Form("Regarding"),TheMessage
end if
elseif Request.Form("radiobutton") = "nursing" then
if Request.Form("email")="" then
TheMail.Send "CommentOnGCRC@unknown.com","sacascio@uic.edu", Request.Form("Regarding"),TheMessage
else
TheMail.Send Request.Form("Email"),"sacascio@uic.edu", Request.Form("Regarding"),TheMessage
end if
elseif Request.Form("radiobutton") = "laboratory" then
if Request.Form("email")="" then
TheMail.Send "CommentOnGCRC@unknown.com","slevin@uic.edu", Request.Form("Regarding"),TheMessage
else
TheMail.Send Request.Form("Email"),"slevin@uic.edu", Request.Form("Regarding"),TheMessage
end if
elseif Request.Form("radiobutton") = "pharmacy" then
if Request.Form("email")="" then
TheMail.Send "CommentOnGCRC@unknown.com","mpacini@uic.edu", Request.Form("Regarding"),TheMessage
else
TheMail.Send Request.Form("Email"),"mpacini@uic.edu", Request.Form("Regarding"),TheMessage
end if
elseif Request.Form("radiobutton") = "bionutrition" then
if Request.Form("email")="" then
TheMail.Send "CommentOnGCRC@unknown.com","jmeyer4@uic.edu", Request.Form("Regarding"),TheMessage
else
TheMail.Send Request.Form("Email"),"jmeyer4@uic.edu", Request.Form("Regarding"),TheMessage
end if
elseif Request.Form("radiobutton") = "education" then
if Request.Form("email")="" then
TheMail.Send "CommentOnGCRC@unknown.com","makbar@uic.edu", Request.Form("Regarding"),TheMessage
else
TheMail.Send Request.Form("Email"),"makbar@uic.edu", Request.Form("Regarding"),TheMessage
end if
elseif Request.Form("radiobutton") = "administrative" then
if Request.Form("email")="" then
TheMail.Send "CommentOnGCRC@unknown.com","jwysocki@uic.edu", Request.Form("Regarding"),TheMessage
else
TheMail.Send Request.Form("Email"),"jwysocki@uic.edu", Request.Form("Regarding"),TheMessage
end if
end if
Set TheMail = Nothing
%>
Your request have been submitted!
