I tried you sample code adapting the email addresses and attachment file pathname but I get the following error:
OLE IDispatch exception code 0 from CDO.Message.1: The "SendUsing" configuration value is invalid.The easiest way to make sure that CDO is configured correctly is to make sure that Outlook Express is installed and configured on the machine. I sort of assumed that this was true in your case because you said that you were using it to send e-mail.
Also, there was an ommission in the code I posted for you.
After this line:
loMsg = CREATEOBJECT( [cdo.message] )
You need to add this one:
loMsg.Configuration = loConfig