lDelete = loItem.Delete
>I am designing an email extractor program which is working fine except for at the end of my program I want to delete mail that is not relevant but I keep getting the following error:>loOutlook = createobject('outlook.application') >loNamespace = loOutlook.GetNameSpace("mapi") >loTaskbox = loNamespace.GetDefaultFolder(6) && task folder >loitems = lotaskbox.Items > >for v = 1 to loitems.count > loItem = loitems.item(v) > with loItem > DO CASE > CASE .subject = 'RE: Hanger Booked into System' > ? "Extracting Mail: ", loitem.subject > OTHERWISE > ? "Deleting Mail: ", loitem.subject > loItem.Delete() > ENDCASE > endwith >endfor >>