>バックグランドという意味は分かりますが、今回の処理が、バックグランドを使っていると思いませんでした。 思いっきり使っていますよ。 Set uidoc = workspace.CurrentDocument Set Note_doc = uidoc.Document Set RENBAN_doc = uidoc.Document : Select Case Note_doc.KYOTEN(0) 'フィールドの値によってRKUBUNの値を選択 : workspace.CurrentDocumentにて、現在の文書(NotesUiDocument)を取得していますよね。 そして、uidoc.Documentで、ディスク上に保存されている現在の文書 (NotesDocument)を取得しています。 このNotesDocumentがバックグランドの文書です。 >いろいろなDBを参照し、機能を盗んでいるので、何がなんだか分からないままDB作成しています。 機能を盗むのは悪くないのですが、その盗んだ機能で「なぜできているのか?」 キチンと理解しないと成長しませんよ。 >具体的に、今回の場合何処を修正すればいいのですか。 Set Note_doc = uidoc.Document : Set view = db.GetView("マスター\連番") Set doc = view.GetDocumentByKey(RKUBUN,True) If Not(doc Is Nothing) Then TMP_UKETUKENO = Format(doc.UKETUKENO(0),"00000") Note_doc.UKETUKENO=TMP_UKETUKENO doc.UKETUKENO=Format(Trim(Str(Val(Ltrim(TMP_UKETUKENO))+1)),"00000") Call doc.SAVE(True,True) @”マスター\連番”ビューから取得した文書(doc)に対して、最大の連番に1を足したものを設定し、 保存していますね。 A現在の文書のバックグランド文書には、現在の最大の連番を設定しているが、 保存はしていないですよね。 これが理解できないのであれば、スクリプトを修正して載せますが、 まずは、ご自分で考えてみてください。