Messy_Code_Guy

Ahhh...that what I thought. No problem I will work around it. Thanks again for your kick a$$ UDF.

Heya Water, Just wanted to thank you for your hard work and I need your help with the _OL_ItemAttachmentAdd function. I got the code to work fine except the name of the PDF does not show when it is attached. Here is my code: $oItem = _OL_ItemCreate($oOutlook, $olMailItem, "", "C:\Users\" & @UserName & "\AppData\Roaming\Microsoft\Templates\Test.oft","Importance=" & $olImportanceHigh) _OL_ItemAttachmentAdd($oOutlook, $oItem, Default, @ScriptDir & "\MHIQuickFacts.pdf") $oItem.Display Here is a screenshot: The OS is Win 7 Pro using Office 365, 2016 and I am using your latest UDF. The default format is HTML for the email. I just need an example of how to get the PDF name to show on the attached file. I tried using some of the example code you provided in the UDF but could not get it to work. Thanks! Edit: This may be an Outlook issue. The name for the PDF shows after the email is sent. I verified by sending the email to myself after it is created. If you have any thoughts on this let me know. Thanks.

Thanks, this is what I needed!

v3.3.14.2

Water- I am getting this error: "C:\Temp\Word_Test3.au3" (35) : ==> The requested action with this object has failed.: ConsoleWrite($oShape.Name & " - " & $oShape.AlternativeText & " - " & $oShape.Hyperlink.Address & @CRLF) ConsoleWrite($oShape^ ERROR Here is the code I was using. #include <MsgBoxConstants.au3> #include <Word.au3> #include <File.au3> Local $oWord = _Word_Create(True, True) If @error Then $file1 = FileOpen(@ScriptDir & "\Error_LOG.txt", 9) _FileWriteLog($file1, "," & @ComputerName & "," & @UserName & ",Error creating a new Word application object." & " @error = " & @error & " @extended = " & @extended) FileClose($file1) EndIf Local $sDocument = @ScriptDir & '\Default RMLO_SIG.mht' Local $oDoc = _Word_DocOpen($oWord, $sDocument, Default, Default, False) If @error Then $file1 = FileOpen(@ScriptDir & "\Error_LOG.txt", 9) _FileWriteLog($file1, "," & @ComputerName & "," & @UserName & ",Error opening " & $sDocument & " @error = " & @error & " @extended = " & @extended) FileClose($file1) EndIf $Google = "http://www.google.com" ; Set Picture 1 to Facebook _Word_DocLinkAdd($oDoc, $oDoc.InlineShapes(2).Range, $Google, Default, "Click here to visit Google.com. " & @CRLF & $Google, "G") If @error Then $file1 = FileOpen(@ScriptDir & "\Error_LOG.txt", 9) _FileWriteLog($file1, "," & @ComputerName & "," & @UserName & ",Error setting link in image " & $Google & " @error = " & @error & " @extended = " & @extended) FileClose($file1) EndIf $FBName = "http://www.facebook.com" ; Set Picture 1 to Facebook _Word_DocLinkAdd($oDoc, $oDoc.InlineShapes(1).Range, $FBName, Default, "Click here to visit my facebook page. " & @CRLF & $FBName, "FB") ; Loop through the InlineShape collection and display some information for each picture For $oShape In $oDoc.InlineShapes ConsoleWrite($oShape.Name & " - " & $oShape.AlternativeText & " - " & $oShape.Hyperlink.Address & @CRLF) If @error Then $file1 = FileOpen(@ScriptDir & "\Error_LOG.txt", 9) _FileWriteLog($file1, "," & @ComputerName & "," & @UserName & ",Error setting link in image " & $FBName & " @error = " & @error & " @extended = " & @extended) FileClose($file1) EndIf Next If @error Then $file1 = FileOpen(@ScriptDir & "\Error_LOG.txt", 9) _FileWriteLog($file1, "," & @ComputerName & "," & @UserName & ",Error setting link in image " & $FBName & " @error = " & @error & " @extended = " & @extended) FileClose($file1) EndIf $FBName = "http://www.facebook.com" ; Set Picture 1 to Facebook _Word_DocLinkAdd($oDoc, $oDoc.InlineShapes(1).Range, $FBName, Default, "Click here to visit my facebook page. " & @CRLF & $FBName, "FB") For $oShape In $oDoc.InlineShapes ConsoleWrite($oShape.Name & " - " & $oShape.AlternativeText & " - " & $oShape.Hyperlink.Address & @CRLF) If @error Then $file1 = FileOpen(@ScriptDir & "\Error_LOG.txt", 9) _FileWriteLog($file1, "," & @ComputerName & "," & @UserName & ",Error setting link in image " & $FBName & " @error = " & @error & " @extended = " & @extended) FileClose($file1) EndIf Next If @error Then $file1 = FileOpen(@ScriptDir & "\Error_LOG.txt", 9) _FileWriteLog($file1, "," & @ComputerName & "," & @UserName & ",Error setting link in image " & $FBName & " @error = " & @error & " @extended = " & @extended) FileClose($file1) EndIf $Google = "http://www.google.com" ; Set Picture 1 to Facebook _Word_DocLinkAdd($oDoc, $oDoc.InlineShapes(2).Range, $Google, Default, "Click here to visit Google.com. " & @CRLF & $Google, "G") If @error Then $file1 = FileOpen(@ScriptDir & "\Error_LOG.txt", 9) _FileWriteLog($file1, "," & @ComputerName & "," & @UserName & ",Error setting link in image " & $Google & " @error = " & @error & " @extended = " & @extended) FileClose($file1) EndIf Thanks for the help!

Water- I think this will work. I will try this later today and let you know how it goes.

Water- You ROCK! Thanks for the help and the kick A$$ UDF's you have written. I only have one question. How do you figure out which image is what number when using inlineShapes? Thanks again!

I use .mht files so I can embed the images and keep everything in one nice and tidy file. I know it is not the best choice but it works. Thanks for the assistance and a .docx will work fine.

Water- Here is the code I have to fill out the Word .mht file. I do not have the search and add link function for the 11 images in the document. I am also adding the modified word document that has updated text place holders for the ini file. I have also added the .au3 for the template creation code. The code is a little sloppy but it works for me. Thanks again for your help. Default RMLO_SIG.mht Word_Test2.au3

Water- Very cool UDF by the way. I have been using Word to create the template and add the info to the template using the Word UDF. The only function I am missing is the find a picture and add a hyperlink to that picture. I do have a working sample of the Outlook UDF Test that creates a signature and it works well. Quick question! What language do you use to program all of UDF's in Autoit? Thanks,

Sorry, I want to add the link to the image in a .mht if possible. After I add all the info I need I do a save as function to turn it into an Outlook signature. _Word_DocSaveAs($oDoc, $sDocument, $wdFormatHTML) _Word_DocSaveAs($oDoc, $sDocument, $wdFormatRTF) _Word_DocSaveAs($oDoc, $sDocument, $wdFormatTEXT) Thanks for the help!

Water- Here is a sample document that is saved as a Word .mht. I use this doc to create sigs for Outlook in Office 365 (2013). If you can just add a link to Google to each of the images it would be much appreciated. Thanks for the assist and if you have an address I can send the check to....., Default RMLO_SIG.mht

Thanks water! I will give it a try.

Thanks for the assist! Post the code when you have time.

Water- Thanks for the reply. I am not sure how to get the shapes collection. Do you have a small example of the code needed? Thanks,