单击另一个按钮后显示一个按钮

Question

我正在使用 IBM Domino Designer 9。所以，我有一个"Save"按钮和另一个"Create Form"按钮，当用户点击"Save"时，另一个按钮会显示

代码按钮 "Save" :

@Command([FileSave])

代码按钮 "Create Form" :

Sub Click(Source As Button)

    Dim Stream As NotesStream
    Set Stream=Session.CreateStream
    f=Freefile
    fichier="d:\"+Masque.FieldGetText("nomF")+".dxl"
    Open fichier For Output As #f
    Stream.Open(fichier)

    Call Stream.WriteText(|<database xmlns="http://www.lotus.com/dxl" version="8.5" maintenanceversion="3.0" replicaid="41257FA4002BD8B9" path="CN=PFE/O=AISA!!E_admini.nsf" title="E_administrateur 2015..2016">|)
    Call Stream.WriteText(|<databaseinfo dbid="41257FA4002BD8B9" odsversion="43" diskspace="1142784" percentused="75.5600358422939" numberofdocuments="12">|)
    Call Stream.WriteText(|<datamodified>|)
    Call Stream.WriteText(|<datetime dst="true">|+Now+|</datetime>|)
    Call Stream.WriteText(|</datamodified>|)
    Call Stream.WriteText(|<designmodified>|)
    Call Stream.WriteText(|<datetime dst="true">|+Now+|</datetime>|)
    Call Stream.WriteText(|</designmodified>|)
    Call Stream.WriteText(|</databaseinfo>|)
    Call Stream.WriteText(|<form name="|+Masque.FieldGetText("nomF")+|" nocompose="true" publicaccess="false" designerversion="8.5.3" recalc="true" renderpassthrough="true">|)
%REM    
    Call Stream.WriteText(|<updatedby>|)
    Call Stream.WriteText(|<name>CN=admin/O=AISA</name>|)
    Call Stream.WriteText(|</updatedby>|)
    Call Stream.WriteText(|<wassignedby>|)
    Call Stream.WriteText(|<name>CN=admin/O=AISA</name>|)
    Call Stream.WriteText(|</wassignedby>|)
%END REM
    Call Stream.WriteText(|<globals>|)
...................
    Stream.Close

End Sub

Answer 1

要在 Notes 表单中显示和隐藏按钮，您需要使用 hide-when 公式。

您需要将两个按钮放在一个 table 中。这样，它们将位于不同的段落中，因此它们可以有自己的 hide-when 公式。您的“保存”按钮的段落将具有此隐藏时间公式：

! IsNewDoc

CreateForm 按钮的段落将在公式时隐藏：

IsNewDoc

您还必须向“保存”按钮添加命令：

@Command([FileSave]);
@Command([RefreshHideFormulas]);

单击另一个按钮后显示一个按钮

display a button after clicking another button

lotusscript

lotus-formula