求一个Domino数据的简单例子
结构简单是Book(Name,Author,Value)就可以了。
当然要有几条数据记录的情况。邮箱是owenliangbin@tom.com
（Domino的数据存储不是存储为*.nsf的文件吗？可是我又在网上看到说，对应关系数据库，关系数据库的一条记录就在Domino存储为一个文件。这样应该是很多文件才对啊？这跟*.nsf的一个文件不对啊？）
完全新人，所以概念有什么可笑的，请多多原谅。呵呵。
[解决办法]
你是要一个增删改查的数据库例子吗？
[解决办法]
其实和关系型数据库类似，只是关系型数据库中的一条记录在domino中是一个文档，这个文档并不是在windows下面的一个文档的概念（比如图片、office文件等）。你可以把他理解成你所说的关系型数据库的一条记录。
[解决办法]
实验二：创建一个人员登记表
要求：
?包含编号、姓名、性别、年龄、出生日期、学历、工作经历、部门、职位、登记人、登记日期
?利用表格对信息进行合理布局
?登记人、登记日期作为共享域
?登记人、登记日期通过子表单加入
?创建视图显示人员类表，按部门对人员进行分类，并显示编号、姓名、职位、学历
?视图上创建操作，“新建人员”，通过公式实现
?视图上创建操作，“删除人员，通过LotusScript实现
?表单上创建操作，“保存”
<<新建人员>>
@Command([Compose];"frmPeople") // frmPeople表单名
<<删除人员>>
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim view As NotesUIView
Set view = workspace.CurrentView
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Dim count As Integer
Set dc = view.Documents
count = dc.Count
If count > 0 Then
If Messagebox("您确认要删除选定的文档吗？",36,"提示信息") <> 6 Then
Exit Sub
End If
'Set doc = dc.GetFirstDocument
'While Not (doc Is Nothing)
'Call doc.Remove(True)
'Call dc.r
'Set doc = dc.GetFirstDocument
'Wend
Call dc.RemoveAll(True)
Call workspace.ViewRefresh
Messagebox "删除成功！"
End If
End Sub
<<保存>>
@Command([FileSave])
<<退出>>
@Command([FileCloseWindow])
