(Contents)(Previous)(Next)

AddEmployee()

Description: Adds an employee to this company.
Syntax: object.AddEmployee()
Parameters:
object Required, the Company object
Remarks: This method makes the passed in contact an employee of this company.
Returns: Nothing
Example:
Dim session As Object

Set session = CreateObject("OfficeTalk.Session")

Set user = session.Logon(login name, password)

Set comp = session.GetCompanies.GetFirst

Set cont = session.GetContacts.GetFirst

comp.AddEmployee cont


Next