1

我是 Domino 设计师和莲花脚本的新手，

我试图通过以下方式访问我的文本字段：

Sub Click(Source As Button)
    Dim  myText As String
    myText = Inputbox("insert some text :","Testing Heading","Default value test",100,100)
    Msgbox "you have entered : "+myText 
    [myfield].text = myText  //error
End Sub

但它显示一个错误：

命名产品字段不存在

谷歌搜索但找不到解决方案。

还有一个，搜索了初学者在 domino Designer 中创建表单、视图、数据库的教程。但是找不到一个。

如果可能，请提供教程网站的链接。

编辑1：

Sub Click(Source As Button)
    Dim  myText As String
    Dim workspace As New NotesUIWorkspace
    Dim uidoc As NotesUIDocument
    Dim doc As NotesDocument
    Dim  enteredText As String
    myText = Inputbox("insert some text :","Testing Heading","Default value",100,100)
    Msgbox "you have entered : "+myText 
    Set uidoc = workspace.CurrentDocument
    Set doc = uidoc.Document
    doc.addrfield = myText

    enteredText = doc.addrfield 
    Msgbox "Data entered in addrfield : "+ enteredText //error
End Sub

错误：

未设置对象变量

编辑2：

@Knut 在 Domino Designer 中，如何创建数据库表？我的意思是像 create table <tablenam> (field1,feild2,..)；
我怎样才能访问它。我提到了这个。这个人向我展示了如何连接到数据库，但没有展示如何创建数据库表。

4

1 回答 1

2

您必须使用 LotusScript Notes 类

  • 获取当前打开的 UI 文档
  • 获取对应的后端文档
  • 设置项目（=字段）

您的示例将如下所示：

Sub Click(Source As Button)
    Dim  myText As String
    Dim workspace As New NotesUIWorkspace
    Dim uidoc As NotesUIDocument
    Dim doc As NotesDocument
    myText = Inputbox("insert some text :","Testing Heading","Default value",100,100)
    Msgbox "you have entered : "+myText 
    Set uidoc = workspace.CurrentDocument
    Set doc = uidoc.Document
    doc.myField = myText
End Sub

您可以改用doc.ReplaceItemValue。它为您提供了更多的灵活性。

Designer 帮助文件本身在“应用程序设计”一章中向您介绍了 Notes 开发。

于 2015-01-20T17:22:51.233 回答