ник: osmor
выдает ошибку compile error .expected end sub. |
нужно добавить в конце процедуры end sub.
вообще странно, у вас function, а ругается на end sub.... видимо это в другом месте.
Ругается на Set RDO_FolderMail = CreateObject("Redemption.SafeMailItem")
|
какое сообщение об ошибке?