在ASP中用EasyMailObject组件处理Exchange邮件源代码---保存附件(saveatt.asp)
<%@ Language=VBScript %
<%
'*************************************
'这个文件用来下载附件
'作者:awayeah
'邮箱:awayeah@163.net
'*************************************
Dim fso, tempfile
Set fso = CreateObject("Scripting.FileSystemObject")
Dim tfolder, tname, tfile
' Const TemporaryFolder = 2
' Set tfolder = fso.GetSpecialFolder(TemporaryFolder)
set POP3=session("pop3")
' Set POP3 = CreateObject("EasyMail.POP3.5")
' POP3.Lice...[ 查看全文 ]