Example

This procedure determines whether the AutoConnect property can be modified, and displays the result. Note that the property identifier (rcAutoConnect) is used as an argument to GetSetProfile rather than the property itself (.AutoConnect).

Sub GetSetProfileDemo ()

 With Session

  Dim isModifiable as Integer

  isModifiable = .GetSetProfile(rcAutoConnect)

  If isModifiable Then

   MsgBox "Can be Modified"

  Else

   MsgBox "Can't be modified"

  End If

 End With

End Sub