Hi! I have created a form with links to 4 other forms depending on the condition satisfied. I have to send the selected form to the addresses specified in the field. I'd like to add the address of the form to the body of the message. I used the script below:
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim session As New NotesSession
Dim db As NotesDatabase
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set uidoc = workspace.CurrentDocument
Set doc = New NotesDocument( db )
doc.Form = "Memo"
doc.Subject = "Re: " + uidoc.FieldGetText( "FormType" )
doc.Body = "test message"
Call doc.Send( False, uidoc.FieldGetText( "Address" ) )
Msgbox "sending successful"
end sub
...if i add an address link in "doc.Body", it's identified as text. Please help me solve this problem. Thanks.
Tine
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim session As New NotesSession
Dim db As NotesDatabase
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set uidoc = workspace.CurrentDocument
Set doc = New NotesDocument( db )
doc.Form = "Memo"
doc.Subject = "Re: " + uidoc.FieldGetText( "FormType" )
doc.Body = "test message"
Call doc.Send( False, uidoc.FieldGetText( "Address" ) )
Msgbox "sending successful"
end sub
...if i add an address link in "doc.Body", it's identified as text. Please help me solve this problem. Thanks.
Tine