שאלה על "subject" ב CDOSYS

[amosexy]

שאלה על "subject" ב CDOSYS

איך אני מקדד את הנוןשא לעברית כי ב GMAIL אני רואה את זה ?????? במקום מה שכתוב...

 

[GuyShmon]

אני עכשיו נותן לך קוד שאני משתמש איתו...

בין השאר למשלוח אימיילים לגימייל...:

'הגדרת האובייקטים Set objCDOSYSMail = Server.CreateObject("CDO.Message") Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration") '==================================== objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver")= "127.0.0.1" objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 '==================================== objCDOSYSCon.Fields.Update Set objCDOSYSMail.Configuration = objCDOSYSCon Set b = objCDOSYSMail.bodypart b.charset = "windows-1255" '==================================== objCDOSYSMail.From = "נשלח מ" objCDOSYSMail.To = "נשלח אל" '==================================== objCDOSYSMail.Subject = "נושא" objCDOSYSMail.HTMLBody = "תוכן" '==================================== objCDOSYSMail.Send '==================================== Set objCDOSYSMail = Nothing Set objCDOSYSCon = Nothing '====================================​

הכל כבר מקודד פשוט , תחליף את האימיילים למי שאתה רוצה , ותרשום נושא , והודעה בהצלחה

 

[amosexy]

אתהקידוד הזה אני מכיר

הקידוד שכתבת אני מכיר ויש לי אותו. משום מה הGMAIL מקבל סימני שאלה..

 

[Xעמרי]

תעבוד עם utf8

 

[amosexy]

אתה יכול לכתוב לי את השורה לקידוד כאילו

כאילו איך היא נכתבת?... תודה..

 

[Xעמרי]

לפי הדוגמא למעלה:

 

[Xעמרי]

b.charset = "utf-8"

 

[amosexy]

עדיין הנושא כתוב בסימני שאלה..

עדיין..