ISProfile.LoadServiceByID

Description

This function returns the service with the specified ID.

Syntax

object.LoadServiceByID(aId)

Part	Attribute	Type	Description
`object`	Required	ISProfile	The `object` always implements the ISProfile interface
`aId`	In, Required	int	ID of the service

Return Value

ISService

Returns the service with the specified ID.

Example

Display the description of the service, its code, date and time it was added.

Dim aService
Dim aMessage

On Error Resume Next

Set aService = Profile.LoadServiceByID(296)

if Err.Number <> 0 then
  aMessage =  "There is no service with the specified ID"
Err.Clear
else
  aMessage = "The service '" & aService.Description & "' (" & aService.Code &_
    ") was added on " & aService.Added
end if

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Service ID cannot be found, but Service can be found in Maintain > Services.

Version information

Added in v7.8.0