This function creates a new short code.
object.CreateShortCode(aType)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
|
aType |
In, Required | object |
The type of the short code |
Display the created short code and its ID.
Dim aShortCode
Set aShortCode = Profile.CreateShortCode(105)
aShortCode.Description = "Interests"
aShortCode.Save
Profile.MsgBox("The short code " & aShortCode.Description & " has ID = " &_
aShortCode.ID)
In Profile Client v8 on User Interface Short Codes can be found in
.