Quando un oggetto CQMailMsg viene utilizzato per inviare un'e-mail:
È possibile utilizzare l'oggetto CQMailMsg in un hook ed è possibile eseguire tale hook su un server Web o un client ClearQuest installato. Poiché l'identità del processo di questi due casi non può essere la stessa, le informazioni disponibili per l'agent di trasporto posta (per Windows) o il programma sendmail (per il sistema UNIX e Linux) per determinare ciò che va scritto nell'indirizzo mittente potrebbero essere differenti per queste due situazioni. È possibile utilizzare il metodo SetFrom per specificare un nome (come ad esempio il valore di ritorno del metodo GetUserEmail dell'oggetto Session), ma l'agent di trasporto posta o la configurazione di sendmail possono modificare o sostituire tale valore.
VBScript
MailMsg.SetFrom returnAddress
VBScript
Dim OleMailMsg
' Session and logon needed if GetUserEmail is used. For example,
' Dim sessionObj
' Set sessionObj = GetSession
' sessionObj.UserLogon loginname, password, dbName, AD_PRIVATE_SESSION, ""
Set OleMailMsg = CreateObject("PAINET.MAILMSG")
msg_from = "admin@example.com"
OleMailMsg.SetFrom(msg_from)
msg_to = "admin@example.com"
OleMailMsg.AddTo(msg_to)
' You must log in to a database session if GetUserEmail is used.
msg_cc = "user_email_address"
' Or this: msg_cc = sessionObj.GetUserEmail
OleMailMsg.AddCc(msg_cc)
msg_subject = "Hello"
OleMailMsg.SetSubject(msg_subject)
msg_body = "This message brought to you from cqole!\n"
OleMailMsg.SetBody(msg_body)
OleMailMsg.Deliver