例: Send method

次のスクリプトは文書とフォームをメールで送信します。文書は、文書の SendTo アイテムに設定されている受信者にメールで送信されます。
```
Dim doc as NotesDocument
'...set value of doc...
Call doc.Send( True )
```
次のスクリプトは文書の SendTo アイテムの値を設定します。その後、文書とフォームをメールで送信します。文書の送信先は Carl Pycha です。
```
Call doc.ReplaceItemValue( "SendTo", "Carl Pycha" )
Call doc.Save( False, True )
Call doc.Send( True )
```
次のスクリプトは文書を Sally Bowles にメールで送信します。フォームは送信されません。
```
Call doc.Send( False, "Sally Bowles" )
```

次のスクリプトは文書とフォームを Jim Dinauer、Betty Dinauer、Mary Sticka にメールで送信します。

Dim recipients( 1 To 3 ) As String
recipients( 1 ) = "Jim Dinauer"
recipients( 2 ) = "Betty Dinauer"
recipients( 3 ) = "Mary Sticka"
Call doc.Send( True, recipients )

次のスクリプトは文書を [DocAuthor] フィールドに登録されている受信者すべてにメールで送信します。
```
Call doc.Send( True, doc.DocAuthor )
```

次のスクリプトは現在のデータベースに新規の文書を作成して、その文書を Elissa Minty にメールで送信します。

Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set doc = New NotesDocument( db )
doc.Form = "Memo"
doc.SendTo = "Elissa Minty"
doc.Subject = "Here's the document you wanted"
Call doc.Send( False )