2017-02-15 113 views
0

我需要在Lotus Notes邮件中创建一个固定的按钮,它将插入文本,然后从邮件中删除该按钮。Lotus Notes - 运行公式后自动删除按钮

在按钮我:

res := @Prompt([OkCancelList]; "Is it OK?"; "Select result"; " ";"OK":"Failed":""); 
@If(res ="OK"; 
    @Command([EditGotoField]; "Body") + @Command([EditInsertText]; "Everything is fine); 
    @Command([EditGotoField]; "Body") + @Command([EditInsertText]; "Not so good mate")); 

这部分工作得很好,但我不知道如何点击后删除按钮。通常工作@Command([EditClear])但在这种情况下,当我在公式中使用@Command([EditGoToField])

我想我需要再次使用正确的按钮标识符GoToField,然后运行EditClear,但我不知道在哪里可以找到它,或者如果有另一种方式来做到这一点......想法?

谢谢。

回答

1

假设你有在现场的身体和没有别的有按钮保持
然后更改您的代码:

@Command([EditGotoField]; "Body"); 
@Command([EditSelectAll]); 
res := @Prompt([OkCancelList]; "Is it OK?"; "Select result"; " ";"OK":"Failed":""); 
@If(res ="OK"; 
    @Command([EditInsertText]; "Everything is fine"); 
    @Command([EditInsertText]; "Not so good mate")); 

它选择机构(包括按钮)的内容和新的替换它文本。

+0

理论上应该工作并且SelectAll确实选择了消息中的所有内容,但是只有文本在开始时插入,而按钮仍然在那里,没有任何东西被覆盖。 –

+0

它不仅仅在理论上起作用:) - 你用我的代码来测试它吗?我创建了一个新邮件,在Body字段中创建了一个包含此代码的按钮,添加了一些其他文本并单击了按钮。它仍然只是按钮插入的文本,没有其他的东西。 –

+0

是的,你说得对,我可能在某个地方犯了一个错误,现在有效,谢谢。 有没有办法如何覆盖/只删除按钮?或者如何选择体内只有指定数量的线? –

0

假设您的文档是(或可以放入)编辑模式,您仍然可以拥有该按钮,但在其自己的段落(或表格单元格)中具有隐藏时公式为MySpecialButtonPressed!=""的按钮,然后包括行

FIELD MySpecialButtonPressed := @Now; 

在按钮代码。

(编辑:改变测试从=1!="",然后改变设定值从1@Now,因为Notes不存储布尔值,除非你发送了数以百万计的这些,使用日期,而不是数字的成本。如果你需要的话,不要超过具体信息的好处。)