לא נשלח בעברית
שלום אני משתמש בקוד על מנת לשלוח דווח על תקלה במייל הכותרת מתקבלת בג'בריש בתוך הארגון אשר משתמש באותו אופס(2000) אין בעיה עם הכותרת של המייל יש למישהו רעיון איך פותרים את זה? נב. גם כשאני מעתיק מהאקסס לפורום האותיות בעברית מתג'ברשות(כוון חשיבה) הקוד הוא:
שלום אני משתמש בקוד על מנת לשלוח דווח על תקלה במייל הכותרת מתקבלת בג'בריש בתוך הארגון אשר משתמש באותו אופס(2000) אין בעיה עם הכותרת של המייל יש למישהו רעיון איך פותרים את זה? נב. גם כשאני מעתיק מהאקסס לפורום האותיות בעברית מתג'ברשות(כוון חשיבה) הקוד הוא:
Dim oo As New Outlook.Application Dim ooi As Outlook.MailItem Set ooi = oo.CreateItem(olMailItem) ooi.Importance = olImportanceHigh ooi.Display ooi.To = "[email protected]" ooi.Subject = "דיווח על תקלה" ooi.HTMLBody = "<HTML>" & vbCrLf & "<body lang=HE dir=RTL >" & vbCrLf & _ "<p align='right'><font color='black' size=2><STRONG>" & "úàøéê äôðéä:" & Now() & vbCrLf & _ "<p align='right'><font color='black' size=3>" & "îàú:" & Me.txtInterName & ", ñðéó: " & Me.LblBranch.Caption & "</U>" & _ "<p align='right'><font color='blue' size=4>îäåú äú÷ìä: </p></body></html>" Set oo = Nothing Set ooi = Nothing