Send email to lotus from CCPulse7

Hi

I’ve vb code as an action code which sends email to the receipient such as like this.

SendMail

Sub SendMail

Dim sDatabase, sServer,Session ,DataBase ,Document

sServer = “OPCDMN1/ABC”

sDatabase = “mail\john.nsf”

Set Session = CreateObject(“Notes.NotesSession”)

Set DataBase = Session.GETDATABASE(sServer, sDatabase)

Set Document = DataBase.CREATEDOCUMENT()

Document.Form = “Memo”

  Document.SendTo = "[email removed]"

  Document.Subject = "Test OLE automation"

  Document.Body = "Testing OLE"

  Document.From = Session.COMMONUSERNAME

  Document.SaveMessageOnSend = True

  Document.Send True

end sub

But what i want to do is, i want to send the CCPulse real time report of agents at specific time such as 5:00 PM

How can i send the report of agent by email to him or her or any adress?

Can anybody help me?

Why do not you use for this CCAnalyzer?