Domino数据的简单例子

求一个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])