منذ بعض الوقت، قمت بإرسال رمز بريد إلكتروني بسيط لـ JMAIL، واليوم سأقدم تعليقًا محددًا على هذا الرمز، وأضيف رمزين آخرين للتنسيق، وأعطي بعض الأمثلة البسيطة:
الأول هو الكود الأساسي لـ jmail.smtpmail:
<%
تعيين 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 = "عنوان الخادم" 'الخادم الذي يرسل رسائل البريد الإلكتروني
jmail.AddRecipient Email 'مستلم البريد الإلكتروني
jmail.SenderName = "SenderName" 'اسم مرسل البريد الإلكتروني
jmail.Sender = "عنوان البريد الإلكتروني" 'عنوان البريد الإلكتروني لمرسل البريد الإلكتروني
jmail.Priority = 1 'برنامج الطوارئ عبر البريد الإلكتروني، 1 هو الأسرع، 5 هو الأبطأ، 3 هي القيمة الافتراضية
jmail.Subject = "موضوع البريد" 'عنوان البريد الإلكتروني
jmail.Body = "نص البريد" 'محتوى البريد الإلكتروني
jmail.AddRecipientBCC Email 'عنوان مستلم البريد الإلكتروني الأعمى
jmail.AddRecipientCC البريد الإلكتروني "عنوان الشخص الذي يقوم بنسخ البريد الإلكتروني."
jmail.Execute() 'تنفيذ إرسال البريد الإلكتروني
jmail.Close 'أغلق كائن البريد
%>
أعاد مكون w3 Jmail4.3 تصميم بنيته الداخلية - باستخدام كائن الرسالة بدلاً من الكائن الفردي الأصلي Jmail.smtpmail لإرسال رسائل البريد الإلكتروني. تتطلب بعض الطرق المصادقة (مثل 163، yahoo، وما إلى ذلك)، والتي يمكن حلها عن طريق الطريقة التالية:
<%
تعيين 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 = "البريد الإلكتروني من المرسل" 'عنوان البريد الإلكتروني للمرسل
jmail.MailServerUserName = "اسم مستخدم البريد الإلكتروني" 'اسم المستخدم مطلوب لتسجيل الدخول إلى خادم البريد
jmail.MailServerPassword = "كلمة مرور البريد الإلكتروني" 'كلمة المرور مطلوبة لتسجيل الدخول إلى خادم البريد
jmail.Subject = "موضوع البريد" 'عنوان البريد الإلكتروني
jmail.Body = "نص البريد" 'محتوى البريد الإلكتروني
jmail.Prority = 1 'برنامج الطوارئ عبر البريد الإلكتروني، 1 هو الأسرع، 5 هو الأبطأ، 3 هي القيمة الافتراضية
jmail.Send("عنوان الخادم") 'إجراء إرسال البريد الإلكتروني (عبر عنوان خادم البريد)
jmail.Close() 'أغلق الكائن
%>
دعنا نتحدث عن كيفية إرسال الرسائل باستخدام مكون CDONTS الخاص بشركة Microsoft:
<%
تعيين cdomail = Server.CreateObject("CDONTS.NewMail") 'إنشاء كائن بريد
cdomail.Subject = "موضوع البريد" 'عنوان البريد
cdomail.From = "بريد المرسل" 'عنوان المرسل
cdomail.To = "البريد الإلكتروني سيرسل من" "عنوان المستلم".
cdomail.Body = "نص البريد" 'محتوى البريد الإلكتروني
cdomail.Send 'تنفيذ الإرسال
%>
هذه الطريقة هي أبسط طريقة لإرسال رسائل البريد الإلكتروني، ولكنها تسبب أيضًا بعض المشكلات، أي أن عددًا قليلاً من الخوادم سيفتح هذه الخدمة!
عندما نكتب البرامج، نقول عادةً إن التعليمات البرمجية يجب أن تكون نمطية، وذلك لتسهيل الصيانة والنقل. لذلك، سأكتب هذا البريد الإلكتروني كإجراء فرعي هنا، والذي يمكن استدعاؤه مباشرة عند الاتصال (بالطبع، إذا كنت سعيدًا بكتابته كوظيفة، فمن الممكن أيضًا، وهذا يعتمد بشكل أساسي على المصلحة الشخصية):
<%
""وصف المعلمة""
"الموضوع: عنوان البريد الإلكتروني
'MailAddress: عنوان خادم الإرسال، مثل smtp.163.com
"البريد الإلكتروني: عنوان البريد الإلكتروني للمستلم
«المرسل: اسم المرسل
'المحتوى: محتوى البريد الإلكتروني
'Fromer: عنوان البريد الإلكتروني للمرسل
Sub SendAction (الموضوع، عنوان البريد، البريد الإلكتروني، المرسل، المحتوى، المرسل)
تعيين 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 = mailaddress 'الخادم الذي يرسل البريد
jmail.AddRecipient Email 'مستلم البريد الإلكتروني
jmail.SenderName = sender 'اسم مرسل البريد الإلكتروني
jmail.Sender = fromer 'عنوان البريد الإلكتروني لمرسل البريد الإلكتروني
jmail.Priority = 1 'برنامج الطوارئ عبر البريد الإلكتروني، 1 هو الأسرع، 5 هو الأبطأ، 3 هي القيمة الافتراضية
jmail.Subject = subject "عنوان البريد الإلكتروني."
jmail.Body = content 'محتوى البريد الإلكتروني
'نظرًا لعدم استخدام BCC وCC، فقد تم حظر هاتين الجملتين هنا، إذا كنت تريد ذلك، يمكنك استعادتهما هنا.
'jmail.AddRecipientBCC Email' عنوان مستلم البريد الإلكتروني الأعمى
'jmail.AddRecipientCC Email' عنوان نسخة البريد الإلكتروني الكربونية
jmail.Execute() 'تنفيذ إرسال البريد الإلكتروني
jmail.Close 'أغلق كائن البريد
نهاية الفرعية
'مثال على استدعاء هذا Sub
خافت strSubject،strEmail،strMailAdress،strSender،strContent،strFromer
strSubject = "هذه رسالة بريد إلكتروني تجريبية تم إرسالها باستخدام JMAIL"
strContent = "تم إرسال اختبار مكون JMail بنجاح!"
strEmail = " [email protected] "
strFromer = " [email protected] "
strMailAddress = "mail.ubbcn.com"
استدعاء SendAction (strSubject,strMailaddress,strEmail,strSender,strContent,strFromer)
%>
ما ورد أعلاه هو رأيي التقريبي بشأن رمز إرسال رسائل البريد الإلكتروني وأود أن أشكرك على نصيحتك!