Advertisement
Guest User

Untitled

a guest
May 11th, 2017
619
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ASP 0.89 KB | None | 0 0
  1. <!--#include file="aspjson/aspJSON1.17.asp" -->
  2. <%
  3. Set oJSON = New aspJSON
  4. With oJSON.data
  5.     .Add "response", "sent"
  6. End With
  7. whoto =request.QueryString("whoto")
  8. message = request.QueryString("msg")
  9. from = request.QueryString("from")
  10.  
  11. address = ""
  12. if whoto = "Brandon" then
  13.     address="7574353608@vzwpix.com"
  14. end if
  15. if whoto = "Nick" then
  16.     address="75743501272@vzwpix.com"
  17. end if
  18. if whoto = "Drew" then
  19.     address="7574354942@vzwpix.com"
  20. end if
  21. if whoto = "Jamie" then
  22.     address="7574175543@vzwpix.com"
  23. end if
  24. if whoto = "Storm" then
  25.     address="7574493218@vzwpix.com"
  26. end if
  27. if whoto = "Mike" then
  28.     address="7574487567@vzwpix.com"
  29. end if
  30.  
  31. if address <> "" then
  32.     SET myMail = CreateObject("CDO.Message")
  33.     myMail.Subject = "test"
  34.     myMail.From=from
  35.     myMail.To=address
  36.     myMail.HTMLBody=message
  37.     myMail.Send
  38.     set myMail=nothing
  39. end if
  40.  
  41. Response.Write oJSON.JSONoutput()
  42. %>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement