SAapi Object : SendAllQualifiedNow Method |
Visual Basic |
---|
Public Function SendAllQualifiedNow( _ ByVal DomainName As String, _ ByVal ProjectName As String _ ) As String |
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