首页 >> 读书频道 >> 电脑 >> 用EasyMailObject组件处理Exchange邮件源代码(2)
 
· 用EasyMailObj
· 构建稳定的服务器端组件的
· 使用ASP建设私人搜索引
· 在Web界面下如何生成像
· 在ASP中使用Oracl
· 词语搭配游戏的制作(AS
· 词语搭配游戏的制作(AS
· 词语搭配游戏的制作(AS
· 数据库远程控制的ASP实
· 使用asp实现支持附件的
· 一个通用数据库显示程序
· 使用InstallShi
 
· 美容养颜手册
· 加油金顺剧情分集介绍完整
· 红楼梦:120回全本[清
· 素质教育在美国
· 全唐诗卷四十六
· 韩剧《布拉格恋人》剧情介
· 夜航船[作者:明·张岱]
· 局外人[作者:韩·可爱淘
· 现场流行病学
· 源氏物语[日本:紫式部]
· 武林寓言故事
· 2006高考录取规则
 
· (出租)中动商场部分及写
· (出租)中动动漫基地&#
· 喜剧学院
· 《善德女王》剧情介绍
· 魔女18号 剧情
· 丑女无敌剧情介绍
· 魔女幼熙剧情介绍
· 龙游天下剧情介绍
· 震撼世界的七日剧情介绍
· 静静的白桦林剧情介绍
· 心情日记—老公今天我想对
· 旗舰剧情介绍
欢迎来到月影社区!如果您觉得这里不错,请推荐给您的朋友们。月影社区:http://wf66.com/

用EasyMailObject组件处理Exchange邮件源代码(2)


查看有无更新版本

关键字:ASP实例 2006-9-10

 

在ASP中用EasyMailObject组件处理Exchange邮件源代码---读取邮件内容和附件(showbody1.asp)
<%@ LANGUAGE="VBSCRIPT" %>
<html>
<head>
<title>读邮件</title>
</head>
<body>
<%
SET POP3=session("POP3")
   x = POP3.Connect()
   If x <> 0 Then
      Response.Write "连接错误: " + CStr(x)
      POP3.Disconnect
   End If
   y = POP3.DownloadHeaders
   j=pop3.GetMessageNumFromID(request.querystring("id"))
   msg = POP3.DownloadSingleMessage(j)
   'Set Message Object to point to that downloaded message
   Set Message = POP3.Messages(msg)
   '显示邮件内容
   Response.Write replace(Message.bodytext,chr(13),"<br>")
  %>
<%
'如果该邮件有附件,则显示附件文件名和文件大小
if message.Attachments.Count>0 then%>  
<P></p>
  <hr>
  <table border=1 align="left" cellspacing="0">
  <tr><td>文件名</td><td>大小</td><tr>
  <%
  For k = 1 To message.Attachments.Count
  Response.Write ("<tr><td>")%>
  <a href=# onClick=javascript:window.open('saveatt.asp?msgid=<%=j%>&attid=<%=k%>','getatt','width=600,height=440,scrollbars=yes');>
  <%=Message.Attachments(k).name%></a></td><td>
  <%Response.Write cstr(Message.Attachments(k).size)
  Response.Write "</td></tr>"
  Next
%>
</table>
<%
end if
POP3.Disconnect
%>
</body>
</html>

用EasyMailObject组件处理Exchange邮件源代码(2)

[ 1 ]
用EasyMailObject组件处理Exchange邮件源代码(2) num

打印本页 关闭

关于我们版权声明本站导航友情连结作品演示 TOP↑