如何访问文本字段值在Lotus脚本Domino Designer中(how to access te

2019-10-21 15:12发布

我是新来的Domino Designer中和荷花脚本,

我试图通过访问我的文本字段:

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

但它显示了一个错误:

产品命名字段不存在

用Google搜索,但无法找到解决方案。

还有一个,搜索教程在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,如何创建数据库表? 我的意思是这样创建表<tablenam> (field1,feild2,..) ;
我怎样才能访问它。 我refered 此 。 这家伙告诉我如何如何连接到数据库,但我以前不展示如何创建数据库表。

Answer 1:

你必须使用的LotusScript票据类

  • 获取当前打开的文档的用户界面
  • 得到相应的后端文件
  • 设定的项目(=场)

你的榜样应该是这样的,那么:

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代替。 它给你多一点灵活性。

在设计师的帮助文件本身让你在第一章“应用程序设计”介绍了Notes开发。



文章来源: how to access textfield value in lotus script for Domino designer