In fact it looks as though the ini data at the start is missing recalling I didn't want to delete my contacts when testing, plus a bug ... TCHAHHH and therefore take the script you were using and replace the line 98:
con.Save
with
If con.PrimaryTelephoneNumber <> "" Or con.MobileTelephoneNumber <> "" then con.Save
Chris