ISService.Added

Description

The date and time when the service was added.

Syntax

object.Added

Part Attribute Type Description
object Required
The object always implements the ISService interface
Restriction: This property is readonly.

Return Value

DateTime

Example

Display the number of the services loaded on the basis of the selected filter, some information about them, including the date and time when the services were added.

Dim aFilter
Dim aService
Dim aServices
Dim aMessage
Dim i

Set aFilter = Profile.CreateServicesFilter
aFilter.Description = "Injection"
set aServices = Profile.LoadServicesByFilter(aFilter)

aMessage = "Services Count = " & aServices.Count & vbNewLine
for i = 0 to aServices.Count - 1
  set aService = aServices.Item(i)
  aMessage = aMessage & vbNewLine & "----------------------------" & vbNewLine &_
    "Description: " & aService.Description & vbNewLine &_
    "Code: " & aService.Code & vbNewLine &_
    "Added: " & aService.Added & vbNewLine &_
    "Changed: " & aService.Changed & vbNewLine &_
    "Status: " & aService.Status & vbNewLine &_
    "ID: " & aService.ID & vbNewLine &_
    "Output Code: " & aService.OutputCode & vbNewLine &_
    "Default Delivery Time: " & aService.DefaultDeliveryTime & vbNewLine &_
    "Group ID: " & aService.GroupId & vbNewLine 
next      

Profile.MsgBox(aMessage)       
Note:

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

Version information

Added in v7.8.0