<% Function Rid(cString) If(cString <> "")Then cString = Replace(cString,"'","' & chr(39) & '") Rid = cString End If End Function Dim RD RD=Request.querystring("RD") If(RD="true")Then Const strHeader = "Pyramid Builder Nomination" Dim strBody strBody = "

" & strHeader & "

" strBody = strBody & "

Nomination submitted at " & Now() & "

" dim ix, formElementName, formElementValue, prefix, fldName For ix = 1 to Request.querystring.Count formElementName = Request.querystring.Key(ix) formElementValue = Request.querystring.Item(ix) ' what type of field was that on the form? prefix = Left(formElementName,3) ' and throw away prefix to get actual field name fldName = Mid(formElementName,4) ' but change periods to spaces for readability fldName = Replace(fldName, "xx"," ") Select Case prefix ' if the prefix indicates this is a form field of interest... Case "txt","sel","rad","cbo","lst","chk": ' if user didn't answer this question, say so... if Len(formElementValue) = 0 then formElementValue = "UNANSWERED" ' then tack on the name of the field and the answer strBody = strBody & "

" & fldName & ": " & formElementValue & "

" End Select Next Dim objEmail Set objEmail = Server.CreateObject("Persits.MailSender") objEmail.Username = "submit@phisigmarho.org" objEmail.Password = "penguins" objEmail.Host = "mail.phisigmarho.org" objEmail.From = "submit@phisigmarho.org" objEmail.AddAddress "pyramidbuilders@phisigmarho.org" objEmail.Subject = "Pyramid Builder Nomination" objEmail.Body = strBody objEmail.Send Set objEmail = Nothing End If If(RD="true")Then response.redirect("http://www.phisigmarho.org/Convention2009/pyramidbuilder_redirect.php") End If %> Phi Sigma Rho Convention 2009

Main

Registration

Activities and Events

Schedule

Speakers

Service Events

Pyramid Builders

Fundraiser

Alumnae Reunion

Alumnae Challenge

Things to do in Pittsburgh

Hotel Information

Pyramid Builder Award Nominations are Now Closed.

 

Thank you for nominating your fellow sisters! The results will be announced at Convention 2009. See you there!