-
Jan 23rd, 2018, 07:11 AM
#1
Thread Starter
Member
GetInspector not working any more
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}
-
Jan 23rd, 2018, 05:15 PM
#2
Re: GetInspector not working any more
Did you check to make sure that your signature has not gone missing after the update?
Possibly useful links:
https://www.rondebruin.nl/win/s1/outlook/signature.htm
https://www.extendoffice.com/documen...signature.html
-
Jan 23rd, 2018, 05:43 PM
#3
Re: GetInspector not working any more
-
Jan 24th, 2018, 02:41 AM
#4
Re: GetInspector not working any more
did you try repairing /reinstalling outlook?
i do my best to test code works before i post it, but sometimes am unable to do so for some reason, and usually say so if this is the case.
Note code snippets posted are just that and do not include error handling that is required in real world applications, but avoid On Error Resume Next
dim all variables as required as often i have done so elsewhere in my code but only posted the relevant part
come back and mark your original post as resolved if your problem is fixed
pete
Tags for this Thread
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|