This specifies the destination server where the error was encountered.
Syntax
ReplicationClientError.Destination
Example
The following example displays the names of the servers where the errors were encountered.
Option Explicit
On Error Resume Next
dim Client
set Client = CreateObject("CrsApi.ReplicationClient")
Client.Initialize("Project1")
if err.Number > 0 then
dim ClientError
set ClientError = Client.GetExtendedErrorInfo
end if
'If the ClientError array isn't empty, loop through it
'and display each error
dim NumElements = Ubound(ClientError)
if NumElements > 0 then
dim i
Wscript.Echo "Could not initialize Project1 on the destination(s):"
for i = 0 to NumElements
Wscript.Echo ClientError(i).Destination
Next
end if
'Release objects
set ClientError = Nothing
set Client = Nothing
See Also
ReplicationClient.GetExtendedErrorInfo