>Object1 = CreateObject("Custom")
>Object1.AddProperyt("Test", "Green")
>Object 2 = Object1
>Object2.Test = "Red"
>?Object1.Test     && Returns Red not Green
>
>Object 2 = Object1   && apparently doesn't copy the object, it just gives it an additional name.
>