CDO コンポーネントの添付ファイルは、ネット上のファイルの URL 指定もできるみたい

以前書いた、Gmail の SMTP サーバと CDO コンポーネントを使ってメール送信 - @technodoor Blog
の記事で、添付ファイルはローカルファイルを指定していましたが、どうやら、ネット上のファイルの URL を指定してもいけるようです。

AddAttachment Method

toAddress = "送信アドレス1,送信アドレス2"
fromAddress = "Gmail ユーザ名" & "@gmail.com"
passwd = "Gmail パスワード"
schemas = "http://schemas.microsoft.com/cdo/configuration/"
Set oMsg = CreateObject("CDO.Message")
oMsg.Fields.Item("urn:schemas:mailheader:X-Mailer") = "system mail"
oMsg.Fields.Update()
oMsg.From = fromAddress
oMsg.To = toAddress
oMsg.Subject = "システムからのお知らせ"
oMsg.TextBody = "こんにちは。" & vbCrLf & "現在時刻は " & Now & " です。"
oMsg.TextBodyPart.Charset = "ISO-2022-JP"
oMsg.Configuration.Fields.Item (schemas & "sendusing") = 2
oMsg.Configuration.Fields.Item (schemas & "smtpserver") = "smtp.gmail.com"
oMsg.Configuration.Fields.Item (schemas & "smtpserverport") = 465
oMsg.Configuration.Fields.Item (schemas & "smtpauthenticate") = true
oMsg.Configuration.Fields.Item (schemas & "sendusername") = fromAddress
oMsg.Configuration.Fields.Item (schemas & "sendpassword") = passwd
oMsg.Configuration.Fields.Item (schemas & "smtpusessl") = true
oMsg.AddAttachment("http://matsui.typepad.jp/photos/technodoor/twitter.gif")
oMsg.AddAttachment("http://matsui.typepad.jp/photos/technodoor/logo.gif")
oMsg.Configuration.Fields.Update
oMsg.Send
Set oMsg = Nothing

知らなくて、いちいちローカルにダウンロードしてから送信していたよ・・・