【发布时间】:2019-04-08 12:28:30
【问题描述】:
我正在使用 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
【问题讨论】:
-
欢迎来到 Stack Overflow。你的问题到底是什么?我认为这是关于如何隐藏和显示按钮,但请澄清包括您已经尝试过的内容:-)
-
为什么用户需要创建表单?
-
你的问题让我很困惑,因为你展示了一些不寻常和高级的代码,但看起来你问的是一些非常基本的东西。请详细描述您的整个任务。显示和隐藏按钮是非常基本的。使用按钮创建文档也是非常基础的,不需要使用 DXL。使用按钮使用 DXL 创建表单是非常不寻常且非常先进的。这让我觉得我不明白你的问题。
-
我有两个按钮“保存”和“创建表单”,第二个按钮是隐藏的,但是当用户点击“保存”时它会显示@RichardSchwartz
-
我想做一些看起来像“Google 表单”的事情@umeli