Hi,
I have a Form with SendTo Field and Send Button written a code if i click on the send button mail will be routed to the users once users open the mail they will see the form itself in the mail body rather doclink done this part using doc.form=“ABC” and call doc.send(true) it is working perfectly fine.
But the problem is, if the user wants to rely to the send with some comments, sender receiving a mail but form is missing could you please let me know what would be the problem.
Here is the Send button code:
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.Document
Dim session As New NotesSession
Dim db As NotesDatabase
Dim newDoc As NotesDocument
Dim rtitem As NotesRichTextItem
Set db = session.CurrentDatabase
Set newDoc = New NotesDocument( db )
Set rtitem = New NotesRichTextItem(newDoc, “Body” )
'Call rtitem.AppendDocLink(doc, “Formname” )
user = doc.EnterSendTo(0)
newdoc.form=“FormName”
newDoc.Subject = doc.Subject(0)
newDoc.Sendto = Cstr(user)
Call newDoc.Send( True )
Call uidoc.Save
Call uidoc.Close