VBA/API

Re: Removing Addresses

Mike Diplock — Thu, 13 Nov 2008 11:15:37 GMT

Thanks David,

You are right that in that using the object directly does work. The documentation for VBA says there are two ways to remove a child from a collection, with the collection item number or the object. I have always used the item number on other collections and didn't realise the object removal existed. For those interested the working code is:

Dim oRec As CRecord, oConsAdds As CConstitAddresses, oAddr as CConstitAddress Set oRec = New CRecord oRec.Init moSC oRec.Load 1605 Set oConsAdds = oRec.Addresses Set oAddr = oConsAdds.Item(1) oConsAdds.Remove oAddr,True oRec.Save oRec.CloseDown

Re: Removing Addresses

David Zeidman — Sun, 09 Nov 2008 18:19:31 GMT

So I am not quite sure this is correct. The line

oConsAdds.Remove 1,True

Will not work as you expect. The 1 is the address id. Alternatively you need to supply the actual CConstitAddress object and that will work.

David

Removing Addresses

Mike Diplock — Sun, 09 Nov 2008 12:58:16 GMT

Has anyone successfully removed an address from a constituent using VBA? I am tidying up records after an import and am trying to remove lots of empty address fields using a plug-in written in VB6. I'm reasonably experienced in writing plug-ins but CConstitAddresses does not seem to be behaving the same as other RE collections like CConstituentCodes.

The code is:

Dim oRec As CRecord, oConsAdds As CConstitAddresses Set oRec = New CRecord oRec.Init moSC oRec.Load 1605 Set oConsAdds = oRec.Addresses oConsAdds.Remove 1,True oRec.Save oRec.CloseDown

This should remove the first address from constituent '1605' but nothing happens when the code runs. Has anyone tried something similar with success?