| 以下是代碼片段： <% Set jmail = Server.CreateObject("JMAIL.SMTPMail") ’創建一個JMAIL對象 jmail.silent = true ’JMAIL不會拋出例外錯誤，返回的值為FALSE跟TRUE jmail.logging = true ’啟用使用日志 jmail.Charset = "GB2312" ’郵件文字的代碼為簡體中文 jmail.ContentType = "text/html" ’郵件的格式為HTML的 jmail.ServerAddress = "Server Address" ’發送郵件的服務器 jmail.AddRecipient Email ’郵件的收件人 jmail.SenderName = "SenderName" ’郵件發送者的姓名 jmail.Sender = "Email Address" ’郵件發送者的郵件地址 jmail.Priority = 1 ’郵件的緊急程序，1 為最快，5 為最慢， 3 為默認值 jmail.Subject = "Mail Subject" ’郵件的標題 jmail.Body = "Mail Body" ’郵件的內容 jmail.AddRecipientBCC Email ’密件收件人的地址 jmail.AddRecipientCC Email ’郵件抄送者的地址 jmail.Execute() ’執行郵件發送 jmail.Close ’關閉郵件對象 %> |
| 以下是代碼片段： <% Set jmail = Server.CreateObject("JMAIL.Message") ’建立發送郵件的對象 jmail.silent = true ’屏蔽例外錯誤，返回FALSE跟TRUE兩值j mail.logging = true ’啟用郵件日志 jmail.Charset = "GB2312" ’郵件的文字編碼為國標 jmail.ContentType = "text/html" ’郵件的格式為HTML格式 jmail.AddRecipient Email ’郵件收件人的地址 jmail.From = "Email From for Sender" ’發件人的E-MAIL地址 jmail.MailServerUserName = "UserName of Email" ’登錄郵件服務器所需的用戶名 jmail.MailServerPassword = "Password of Email" ’登錄郵件服務器所需的密碼 jmail.Subject = "Mail Subject" ’郵件的標題 jmail.Body = "Mail Body" ’郵件的內容 jmail.Prority = 1 ’郵件的緊急程序，1 為最快，5 為最慢， 3 為默認值 jmail.Send("Server Address") ’執行郵件發送（通過郵件服務器地址） jmail.Close() ’關閉對象 %> |
| 以下是代碼片段： <% Set cdomail = Server.CreateObject("CDONTS.NewMail") ’建立郵件對象 cdomail.Subject = "Mail Subject" ’郵件標題 cdomail.From = "Sender’s Mail" ’發件人的地址 cdomail.To = "Email will from" ’收件人的地址 cdomail.Body = "Mail Body" ’郵件的內容 cdomail.Send ’執行發送 %> |
我們寫程序，一般情況下都是說要代碼模塊化，這樣方便維護，同時也方便移植。因此，我在這里將這個發郵件的寫成一個子程，在調用的時候可以直接調用（當然，如果你高興寫成函數的話也是可以的，這個主要是看個人興趣）：
