1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: 33: 34: 35: 36: 37: 38:
' verzendt e-mail naar Rekeningen… strBody = een „nieuwe uitgaveneis is goedgekeurd door“ & Request.Form („Approver“) &“ voor „& TitleCase (Request.Form („Adviseur“)) &“. " strBody = strBody & „het is nu klaar voor u om onder identiteitskaart “ & Request.Form („ClaimID“) & „.“ te betalen %> <% De 'details van het bericht… objMail.From = strEmail objMail.To = strAccEmail objMail.Subject = „Eis zoals goedgekeurd -“ & Request.Form („ClaimID“) objMail.HTMLBody = strBody objMail.Send Reeks objMail = niets 'Verzend update van status naar adviseur… strBody = „Uw uitgavenvorm “ & Request.Form („ClaimID“) zijn & „ goedgekeurd door“ & Request.Form („Approver“) &“ voor „& TitleCase (Request.Form („Adviseur“)) &“. " strBody = strBody & „het is nu met Rekeningen voor payment.“ %> <% De 'details van het bericht… objMail.From = strEmail objMail.To = strConsEmail objMail.Subject = de „Nieuwe Toegevoegde Vorm van de Uitgave -“ & Request.Form („ClaimID“) objMail.HTMLBody = strBody objMail.Send Reeks objMail = niets Eind als