LOTUSSCRIPT/COM/OLE CLASSES
Examples: FieldGetText method
1. This script puts the string "02:32 PM Today" into the variable composed, if the DateComposed field holds the date-time value 02:32 PM Today.
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim composed As String
Set uidoc = workspace.CurrentDocument
composed = uidoc.FieldGetText( "DateComposed" )
End Sub
2. This script uses FieldGetText to send a mail memo to the author of a document. It assumes that the author is stored in the From field. For example, if the current document author is Stephanie Mavis and its subject is "Suit and tie," this script sends a memo to Stephanie Mavis with the subject "Re: Suit and tie."
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( "Subject" )
doc.Body = _
"Please send me some more information on this topic."
Call doc.Send( False, uidoc.FieldGetText( "From" ) )
End Sub
See Also
FieldGetText method
Glossary
Feedback on
Help
or
Product Usability
?
Help on Help
All Help Contents
Glossary