Dim JMail,email Set JMail = Server.CreateObject("JMail.Message") jmail.Charset = "GB2312" ""郵件文字的程式碼為簡體中文 jmail.ContentType = "text/html" JMail.From = "" " 傳送者地址 JMail.FromName = "" " 傳送者姓名 JMail.Subject = " " " 郵件主題 JMail.MailServerUserName = "郵箱名" " 身份驗證的使用者名稱 JMail.MailServerPassword = "郵箱密碼" " 身份驗證的密碼 JMail.Priority = 3 JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR") JMail.Logging = true email="接受郵件地址" email1="接受郵件地址" JMail.AddRecipient(email1) JMail.AddRecipient(email) JMail.HTMLBody = 郵件內容 JMail.Body = 郵件內容 JMail.Send("stmp.163.com") JMail.Close() Set JMail = Nothing 記得要裝 jmail元件就可以了