ALM Site Administratation Client Type Library
Sending an email to all qualified personnel
Private Sub SendAllQualifiedNow()
'The following Visual Basic example sends an email to all
' qualified personnel.
    Dim sDomainName As String, sProjectName As String
    Dim sReply As String
    On Error GoTo err
    sDomainName = "MyDomain"
    sProjectName = "MyProject"
sReply = m_SAClient.SendAllQualifiedNow _
        (sDomainName, sProjectName)
    MsgBox sReply
    Exit Sub
err:
    MsgBox "Program failed:" + err.Description
End Sub
Send documentation feedback to HP.