How can i delegate a message

[rfaude]

Hi,

i look for a way to delegate a message to an other user. I find a way to FORWARD a message (Call GroupWise.ItemForward()) but not to DELEGATE.

Sub Main(Client, GWEvent)



Dim sDateTime

Dim sEmail

Dim sUsername



Set objMsg = Client.ClientState.CommandMessage



if not objMsg is Nothing then

sDateTime = objMsg.CreationDate

sEmail = objMsg.Sender

sUsername = objMsg.Sender.DisplayName

Set objMsg = nothing

else

Set objMsg = nothing

tmp = MsgBox ("Subject can not be read!", 0, "Error occured")

Exit sub

end if



Call GroupWise.ItemForward()



Call GroupWise.FocusSet(fcsMessage, "")

Call GroupWise.PosTextTop

Call GroupWise.TypeText(vbCrLf & vbCrLf & "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")

Call GroupWise.TypeText("Date/Time: " & sDateTime & vbCrLf)

Call GroupWise.TypeText("Email-Address: " & sEmail & vbCrLf)

Call GroupWise.TypeText("Username: " & sUsername & vbCrLf)

Call GroupWise.TypeText("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")

Call GroupWise.FocusSet(fcsTo, "")



End Sub

Thanks …

Ralf

Topic

[Support 1]

GroupWise allows you to delegate an Appointment, Task or Note.

You may be able to do what you require with the Token API, using either ItemDelegateDlg() or ItemDelegateOpenItem(). I think the latter assumes the item to be delegated is represented by an open message view.

You can also use the Object API method Delegate() of an Appointment, Note or Task message object. This method returns a new message object whose properties should be initialized accordingly.

I hope this helps.

Advansys Support

[Author]

Replies