Dim Session As New NotesSession
Dim CurUser As New NotesName(Session.UserName)
Dim CurUIDoc As NotesDocument
Dim doc As notesdocument
' Dim item As NotesItem
Dim CurDB As NotesDatabase
Set CurDb = Session.CurrentDatabase
Set CurUIDoc = Session.DocumentContext
Set doc = CurDb.CreateDocument
CurUIDoc .UOStepResult=CurDoc.UOStepResult
^^^^^^
你的curdoc是个什么东东?没定义,如果是notesdocument类,也不能这么写,应该CurDoc.UOStepResult(0)
再联系!
qyh(冷冷的风,白白的云。我这次真对她动心了)
里面有很多的域是通过另外的文档取出来的,不知道用公式能不能行
希望指点!
我还可以加分!
下面是我写的script程序,可是不好使
Dim Session As New NotesSession
Dim CurUser As New NotesName(Session.UserName)
Dim CurUIDoc As NotesDocument
Dim doc As notesdocument
' Dim item As NotesItem
Dim CurDB As NotesDatabase
Set CurDb = Session.CurrentDatabase
Set CurUIDoc = Session.DocumentContext
Set doc = CurDb.CreateDocument
CurUIDoc .UOStepResult=CurDoc.UOStepResult
CurUIDoc .content="意见1" '在此我随便写的数据,想在web上预览
我在跟踪的时候,看见里面的值都对,可是就是在web上看不到.查资料知道DocumentContext 是在内存中的,不知道有什么方法可以实现此功能