Sub SendAction (Subject, Mailaddress, Email, Sender, Content, Fromer)
Set jmail = server.createObject ("jmail.smtpmail") 'Create a Jmail object
Jmail.silent = true 'jmail does not throw exception error, the return value is false and true
Jmail.logging = true 'Enables logging
Jmail.Charset = "GB2312" code code is Simplified Chinese
Jmail.contentType = "text / html" "The format of the message is HTML
Jmail.Serveraddress = maildress' server sends a message
Jmail.addrecipient email 'recipient
Jmail.Sendername = sender 'email sender's name
Jmail.Sender = Fromer 'mail sender's email address
Jmail.Priority = 1 'email emergency procedure, 1 is the fastest, 5 is the slowest, 3 is default
Jmail.Subject = Subject 'title
Jmail.body = content 'message
'Since I haven't used it to copy and copy, this two sentences are blocked, if you need it, you can restore it here.
'Jmail.AddrecipientBCC Email' Pixabay Address
'jmail.addrecipientcc email' email Cc
Jmail.execute () 'Executing Mail Send
Jmail.close 'Close the email object
End Sub
