请问如何获取邮件中附件的地址

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用来查找邮件的地址,请问附件的地址该如保写啊?
...全文
232 2 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
WUNEN 2004-08-03
  • 打赏
  • 举报
回复
to xzhy80
我不是要发邮件,而是邮件收到后,我虽要去分析邮件中附件的内容,因此我想知道怎么样得到这个附件的地址。现在我只知道邮件地址是""DAV:href"" 得到的,但不知道附件地址要如何得到,相当于数据库中的列名,但这个列我不知道要用什么列名
xzhy80 2004-08-03
  • 打赏
  • 举报
回复
名称
功能 格式
Attach 添加附件 Sub AttachFile(Source, [FileName], [EncodingMethod])
AttachURL 以格式添加附加和数据 Sub AttachURL(Source,ContentLocation, [ContentBase], [EncodingMethod])
BCC 以“,”分隔的接收者列表(暗送) 字符串类型属性
Body TextHTML
字符串类型属性
bodyformat 邮件正文格式 0:HTMl1:Text
CC 以“,”分隔的接收者列表(抄送) 字符串类型属性
ContentBase 带有附件的邮件中正文采用的基地址 字符串类型属性
ContentLocation 带有附件的邮件中正文采用的 字符串类型属性
From 邮件发送方地址 字符串类型属性
Importance 邮件级别 0: 1 2:
Send 发送邮件 Sub Send([From], [To], [Subject], [Body], [Importance]) 各个参数可以参考上下文属性
SetLocaleIDs 设置新消息的代码页标识 Sub SetLocaleIDs(CodePageID As Long)
Subject 邮件主题 字符串类型属性
To 以“,”分隔的接收者地址列表 字符串类型属性
Value 任意的邮件头的值 字符串类型属性
Version 当前集合数据对象库()的版本号 只读字符串类型属性

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧