Old Value from SingleDbObjectSnapshot

When using the following, the OLD and NEW Values are the same in the XML even though they have changed:

This is what I have on the Pre-script for generating and the event is UPDATE

Dim dbPerson As ISingleDbObject = Connection.CreateSingle("Person", $UID_Person$)

Dim personXML As String = New SingleDbObjectSnapshot(dbPerson).ToXmlString(True)


values("personXML") = personXML

I am trying to get the old value out in a script that is generated when there is an UPDATE on Person, but it's not working.  Can someone please suggest what I am doing wrong?