我怎么取不到简要表中的值哪？

[sandju]

程序用lotusscript是如下写的：
Dim session As New notessession
Dim profile As notesdocument
Dim vValue As Variant

Set profile = session.currentdatabase.getprofiledocument("SysSet")

vValue = profile.getitemvalue("DisNum")(0)

Msgbox vValue
SysSet是一简要表表单，而DisNum是其中的一个域，
结果显示vValue是空值，调试看也是如此？请高手指点！

[阿古]

我是这么用的，调试通过。如果还不对，就是你的简要表没有设定值！

Dim session As New notessession
dim db as notesdatabase
Dim profile As notesdocument
Dim vValue As Variant

set db = session.currentdatabase
Set profile = db.getprofiledocument("SysSet")

vValue = profile.DisNum(0)
Msgbox vValue