[ホーム] - [ノーツドミノプログラミングサンプル一覧] - [フィールドの値を引継ぎながら新規文書を作成するサンプル]

フィールドの値を引継ぎながら新規文書を作成するサンプル| ノーツドミノ

ある文書からフィールドの値を引継ぎながらフロントエンドの新規文書を作成する方法を紹介します。
composedocumentメソッドを使用しフロントエンド文書を作成します。事前に取得しておいたフィールド値をこのフロントエンド文書のフィールドに代入しています。

以下の例ではFormMain文書を新規に作成し、元の文書のfield1の値を新規作成する文書のfield2に引き継ぎます。



Dim workspace As New notesuiworkspace

Dim uidoc As notesuidocument



Dim session As New notessession

Set uidoc = workspace.CurrentDocument

Dim temp As Variant

	

temp=uidoc.FieldGetText("field1")



If temp="" Then

	Messagebox "field1が空です。",0,"注意"

	Exit Sub

End If

	

Set uinewdoc= workspace.composedocument("","","FormMain")

Call uinewdoc.fieldsettext("field2",temp)

(補足)Lotus Script を使用しています。(VBを Notesに拡張した言語です。)

本ページは IBM Lotus Notes Domino (ロータスノーツドミノ)を対象としています。基本的には Notes 4,5,及び6以後を対象としていますが、バージョンによっては対応していない場合があります。 lotus scriptや @関数 (@コマンド)を対象としていて、VB Scriptには対応していません。本サイト内掲載されている情報は、著作権法により保護されています。いかなる場合でも権利者の許可なくコピー、配布することはできません。このページはリンクフリーです。(このページへの直接リンクも可能です。)

[ホーム] - [ノーツドミノプログラミングサンプル一覧]