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

Question

我正在使用IBM Domino Designer 9。所以，我有一个“保存”按钮和另一个“创建表单”按钮，当用户点击“保存”时，将显示另一个按钮

代码按钮“保存”：

@Command([FileSave])

代码按钮“创建表单”：

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公式。

您需要将两个按钮放入表格中。这样，它们将在不同的段落中，因此它们可以拥有自己的隐藏时间公式。您的保存按钮的段落将具有以下隐藏时间公式：

! IsNewDoc

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

IsNewDoc

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

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