Custom Form, copy user field data to message body

Status
Not open for further replies.

Scalpel4

New Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
I'm betting this has been covered in here, but I'm not finding it. I've done some VB in the past and am pretty good with macros in Excel and Word, but this one's a little more interesting.

I've got a form I built for help desk with 6 custom fields. I'd like to copy any data entered into the fields to the message body upon hitting send. I've built the form and the fields on page 2, then set the address value in the to field, now I just need to get the data to populate the message body like this example:

Issue:
DATA FROM CUSTOM FIELD 1

Description:
DATA FROM CUSTOM FIELD 2

Steps Taken:

DATA FROM CUSTOM FIELD 3
 
Just to show I'm not trying to get someone else to write this for me, this is what I've tried without success. I added this code to the send routine which didn't work.

Code:
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Function Item_Send()
Body = ""
Body = Body & "Description"&
UserProperties.Find("Description").Value & vbcr
Body = Body & "Preconditions"&
UserProperties.Find("Preconditions").Value & vbcr
Body = Body & "Steps to Recreate"&
UserProperties.Find("Recreate").Value & vbcr
Body = Body & "Actual Results"&
UserProperties.Find("Results").Value & vbcr
Body = Body & "What was expected"&
UserProperties.Find("Expected").Value & vbcr
Body = Body & "Additional Info"&
UserProperties.Find("ExtraInfo").Value & vbcr
End Function
 
Shoot, I meant to test this yesterday but got sidetracked. Can you zip up the form and upload it so I dont have to rebuild it? It will save me some time.
I would probably do a before send, but would need to test it to see if it works.
 
Shoot, I meant to test this yesterday but got sidetracked. Can you zip up the form and upload it so I dont have to rebuild it? It will save me some time.
I would probably do a before send, but would need to test it to see if it works.

Thanks! I stripped out the code above because I couldn't get it going.
 

Attachments

  • freshservice.zip
    19.7 KB · Views: 387
Sorry for spamming the forms address - I forgot to change it to my address a few times.
I had forgotten about this - Custom Form Security Changes - you need it set to use scripts in custom forms.
 
Ok... I think it is working now...
You need to set these keys per the article I linked earlier.
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\16.0\Outlook\Forms\TrustedFormScriptList]
"IPM.Note"=""
"IPM.Note.freshservice"=""
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\16.0\Outlook\Security]
"DisableCustomFormItemScript"=dword:00000000


This code works - I also added an item open, in part to change the email address but also to open the form to the Request tab - this works great if the recipient doesn't have the form installed (and its not in the org forms library)
Code:
Function Item_Send()
strNewBody = "Description: " & item.UserProperties.find("Description").Value & vbcrlf
strNewBody = strNewBody  & "Preconditions: " & item.UserProperties.find("Preconditions").Value & vbcrlf
strNewBody = strNewBody & "Steps to Recreate: " & item.UserProperties.find("Recreate").Value & vbcrlf
strNewBody = strNewBody  & "Actual Results: " & item.UserProperties.find("Results").Value & vbcrlf
strNewBody = strNewBody  & "What was expected: " & item.UserProperties.find("Expected").Value & vbcrlf
strNewBody = strNewBody  & "Additional Info: " & item.UserProperties.find("ExtraInfo").Value & vbcrlf
item.body = strNewbody
item.Save
End Function

Sub Item_Open()
  Item.GetInspector.SetCurrentFormPage("Request")
End Sub

2018-10-02_22-46-02.png
 
Last edited:
You are a WONDERFUL person! I'll test this out ASAP, and no worries for the spam!
 
Not having any luck with it. The recipient isn't an outlook client, its an automated system that processes HTML and plain text emails. I'll keep testing, maybe I'm doing something wrong, I probably missed something in the article.
 
Is the contents of the form being sent correctly? You should see this in your sent folder. If not, did you set the registry keys?

You need to publish the form and use the form name in the registry - AFAIK, you cant use vbscipt in templates any more (due to the security changes last summer).
"IPM.Note.freshservice"=""
 
Thanks. I'm seeing the data in the fields in my sent log, and if I send the data to a different recipient they get it in the fields, but I'm net getting the data to copy to the message body.
 
This is a message in the Sent folder in one of my test sends - The failures only have my signature.
2018-10-04_11-48-23.png
 
You are sending it from your outlook to the freshservice account? If so, it should look like that in your sent folder.
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
G Copy Contact field to Appointment Custom Form Field Outlook VBA and Custom Forms 2
M Copy "To" Address Value from a Newly Created Email to the "To" Address Field of Custom Form Using Outlook 4
G Apply Custom Contacts form to all existing Contacts Outlook VBA and Custom Forms 1
G Add Map It button to Custom Contacts Form in Outlook Outlook VBA and Custom Forms 1
G Outlook 2021 Add Picture to Custom Contact Form Outlook VBA and Custom Forms 2
P Can't add custom field to custom Outlook form, it always adds to the Folder instead Outlook VBA and Custom Forms 2
AndyZ Contact Custom Form Tiny Text Outlook VBA and Custom Forms 3
A How to reduce size of custom contact form? Outlook VBA and Custom Forms 3
Witzker How to get the button Karte ( map) in custom contact form Outlook VBA and Custom Forms 2
B Outlook 2019 Custom Email form - Edit default email form Outlook VBA and Custom Forms 6
J Does the .fdm contain my custom form? How to make ol use it? - ol2007 Outlook VBA and Custom Forms 4
J ol2021 custom form not displaying pics Outlook VBA and Custom Forms 37
cbufacchi Outlook 365 Populate custom Outlook Appoint form Outlook VBA and Custom Forms 2
C Create Meeting With Custom Form Outlook VBA and Custom Forms 2
J custom form not displaying pictures Outlook VBA and Custom Forms 7
I Button PDF in Outlook Contact custom form Outlook VBA and Custom Forms 1
K Font Sizing in Custom Form Regions for Contacts Outlook VBA and Custom Forms 1
K can't get custom form to update multiple contacts using VBA Outlook VBA and Custom Forms 3
H Custom Outlook Contact Form VBA Outlook VBA and Custom Forms 1
F Validation on custom task form after task acceptance Outlook VBA and Custom Forms 1
I Error saving screenshots in a custom form in outlook 2016, outlook 365 - ok in outlook 2013, outlook 2010 Outlook VBA and Custom Forms 5
M VbScript for Command Button on Contacts Custom Form Using Outlook 1
G Other users can't see P.2 with custom fields in Form Outlook VBA and Custom Forms 0
O Create a custom contact form - questions before messing things up... Outlook VBA and Custom Forms 4
L Custom Form Tutoral? Outlook VBA and Custom Forms 6
D Lost Access to Custom Form Outlook VBA and Custom Forms 4
M vCard does not have user-defined fields from my custom contact form (365) Using Outlook 1
S Outlook Custom Form Scripting only working when clicking on "Run this form" Outlook VBA and Custom Forms 2
Victor_50 Outlook 2013 Custom Contact Form starts with "E-mail 2" Outlook VBA and Custom Forms 2
C Custom Form (seperate layout pages and message reading pane) Outlook VBA and Custom Forms 0
C Reading Pane for Custom Form Outlook VBA and Custom Forms 2
N Custom Form Controls Not Visible To Recipient Outlook VBA and Custom Forms 3
Randy Redekopp How To Merge Contact Info to Email Custom Form Template Using Outlook 2
D Problem with custom form including _DocSiteControl1 Outlook VBA and Custom Forms 0
C Custom Outlook Form - Populate Information from Radio Button / Check Box Using Outlook 0
W Message class changes of a custom form changes to the default form Using Outlook 2
A Possible to hide ribbon with custom appointment form? Outlook VBA and Custom Forms 3
Andrew Quirl Custom form to route requests based on input criteria Outlook VBA and Custom Forms 1
D Using a VBA Custom Form to Send Reoccurring Email Upon Task Completion Outlook VBA and Custom Forms 4
W Setting up a custom form Outlook VBA and Custom Forms 2
A Greyed out checkbox in custom form Outlook VBA and Custom Forms 4
Z Outlook Custom Form: Adding Dropdown(Project Code) at the end of subject Outlook VBA and Custom Forms 0
Z Adding dropdown list using custom form Outlook VBA and Custom Forms 7
J autocomplete function in custom form Using Outlook 1
D Custom form with html hyperlink Outlook VBA and Custom Forms 7
D populating listbox on custom form from Access Outlook VBA and Custom Forms 7
D Custom Form Accept and Reject Command buttons Outlook VBA and Custom Forms 2
D create an html table in outlook custom form 2010 using vba in MsAccess Outlook VBA and Custom Forms 7
Potty Ash MS Outlook 2010 custom form - validation or formula to request user to check a checkbox Outlook VBA and Custom Forms 16
J Custom form code doesn't run Outlook VBA and Custom Forms 2

Similar threads

Back
Top