请问如何获取邮件中附件的地址
WUNEN 2004-08-03 09:59:24 查询邮件的语句(MailStrQuery)如下:
Set MailConn = CreateObject("Adodb.Connection")
Set MailRs = CreateObject("Adodb.RecordSet")
MailConn.Provider = "ExOLEDB.DataSource"
MailConn.Open MailBoxurl
MailStrQuery = "select ""DAV:href"" as href,""DAV:displayname"" as displayname,"
MailStrQuery = MailStrQuery & """urn:schemas:httpmail:subject"" as subject,"
MailStrQuery = MailStrQuery & """urn:schemas:httpmail:read"" as if_read,"
MailStrQuery = MailStrQuery & """urn:schemas:httpmail:from"" as mail_from,"
MailStrQuery = MailStrQuery & """urn:schemas:httpmail:date"" as maildate,"
MailStrQuery = MailStrQuery & """urn:schemas:httpmail:hasattachment"" as attachment"
MailStrQuery = MailStrQuery & " from scope('shallow traversal of """ & MailBoxurl & """') "
MailStrQuery = MailStrQuery & "where ""DAV:iscollection"" = false "
其中""DAV:href"" as href用来查找邮件的地址,请问附件的地址该如保写啊?