VBS/OutMail script and macro sends email message twice

Good afternoon.
I am having a bit of a problem that I can't quite figure out. Below is portion of my code which sends an email from an Excel macro:

Please Login or Register  to view this content.

Now, this code works great if I run it directly from Excel. The problem arises when I call it from a VBScript, the relevant code is displayed below:

Please Login or Register  to view this content.

When I run it from the VBScript, two emails are sent. I realize this isn't the biggest problem, but it is annoying and I'd like to know why. If anyone could help with this, that would be great!

So I found a solution to this on another forum.
Apparently the problem is that there was a hidden version of Excel in memory that was also sending. The solution is to use

Please Login or Register  to view this content.

And call the StartUp() macro from the VBS. Dirty, but it works.