|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
在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> 返回类别: 教程 上一教程: 利用C#在SQL SERVER2000存取图像 下一教程: 利用ASP制作EXECL报表方式(一) 您可以阅读与"用EASYMAILOBJECT组件处理EXCHANGE邮件源代码(2)"相关的教程: · 用EASYMAILOBJECT组件处理EXCHANGE邮件源代码(1) · 在ASP中用EASYMAILOBJECT组件处理EXCHANGE邮件源代码-读取邮件主题和大小 · 用EASYMAILOBJECT组件处理EXCHANGE邮件源代码(7) · 用EASYMAILOBJECT组件处理EXCHANGE邮件源代码(4) · 用EASYMAILOBJECT组件处理EXCHANGE邮件源代码(6) |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |