Add an e-mail address to the collection.
Creates a new Email object, initialises it with the given values and adds it to the end of the Email collections
Namespace:
SuperOffice.COM.SuperOfficeDB
Assembly:
SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
SyntaxSOEmail Add(
string strEmailAdr,
string strDescr
)
Function Add (
strEmailAdr As String,
strDescr As String
) As SOEmail
Dim instance As IEmails
Dim strEmailAdr As String
Dim strDescr As String
Dim returnValue As SOEmail
returnValue = instance.Add(strEmailAdr,
strDescr)
SOEmail^ Add(
[InAttribute] String^ strEmailAdr,
[InAttribute] String^ strDescr
)
Parameters
- strEmailAdr
- Type: SystemString
A string representing the Email address i.e <a href="mailto:sdk@superoffice.com">sdk@superoffice.com</a> - strDescr
- Type: SystemString
Descriptive text
Return Value
Type:
SOEmailSOEmail – The newly added Email
ExamplesAdd
This text may be copied to the notepad, and saved as a *.vbs file. Remember to change the login information.
Dim objSO
Set objSO = CreateObject("SuperOffice.Application")
If not (objSO is nothing) Then
objSO.CurrentContact.Emails.Add "sdk@superoffice.com", "SDK Email"
MsgBox "An new Email is added to the current contact"
else
MsgBox "Unable to connect to database"
end if
Set objSO = Nothing
See Also