AddError

Adds an error to the collection in the SysErr object. You must specify the error number, native error number and a description of the error.

Group:   System Error

Syntax:  SysErr.AddError(nErrNo, nNativeError, sDesc)

nErrNo           (Long) the VBA error number

nNativeError   (Long) the native database error number

sDesc            (String) the description of the error

Example:

SysErr.AddError(1269, -2847638354, "TCP NOT AVAIL")