Click or drag to resize

IFindContactsByEmail Method

find collection of Contacts using e-mail addresses Search and retrieve contacts by their email address. This will return all contacts that have an email address like the email given as search string. Does not accept partial address, but wildcards does work

Namespace:  SuperOffice.COM.SuperOfficeDB
Assembly:  SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
Syntax
SOContacts ContactsByEmail(
	string Email
)

Parameters

Email
Type: SystemString
search argument (email address)

Return Value

Type: SOContacts
SOContacts a collection of contacts matching 'Email'.
Examples

ContactsByEmail

This text may be copied to the notepad, and saved as a *.vbs file. Remember to change the login information. The source code below logs on to the database, and search and retrieves all contacts with an email address like ‘Info@SuperOffice.com

VB
dim objso
set objso = CreateObject("superofficedb.database")
If not (objSO is nothing) Then
    objso.login  "<USERID>", "<password>"
    set  objcontact = objso.find.contactsbyemail("info@superoffice.com")
    set  contact = objcontact.getfirst
    while  not objcontact.eof
        item = contact.name & " -  " & contact.department
        msgbox item
        set contact = objcontact.getnext
    wend
    msgbox "thats  all..."
else
    msgbox "could not log in"
end if
set objso = nothing

See Also