This code used to work fine, producing e-mail messages complete with my signature.

Now, after current Windows 10 updates, the signature is missing.

Does anyone know why?

I'm using Outlook 2016, by the way.

[code}
Dim oEmail
Set oEmail = oApp.CreateItem(0)
With oEmail
.BodyFormat = 2 'HTML
.Recipients.Add (oUser.get("mail"))
.Subject = "AD Password Expiration Notice"
.Importance = 2 '0 = Low, 1 = Normal, 2 = High
.ReadReceiptRequested = False
ret = .GetInspector ' Add Signature
.HTMLBody = Replace(.HTMLBody, "<!-- Converted from text/plain format -->", strBody)
.display 'Show the email message and allow for editing before sending
End With

{end code}