Write files into hard disk with JMail _php tutorial

The author of this article: kEvin1986
Article Nature: Original
Release Date: 2005-08-14

<%
' Codz by kEvin1986
User=request.form ("User")
Pass=request.form ("Pass")
Popserver=request.form ("Popserver")
If user<> "" and Pass<> "" and popserver<> "" Then
Set objmail = CreateObject ("JMAIL.POP3")
Objmail. Connect User, Pass, Popserver
Set Objmsg=createobject ("Jmail.message")
Set objmsg = objmail. Messages.item (1)
Separator = ","
Response.Write "Attachment Name is:" & Saveatta & "
"
Objmail. Disconnect
End if
Function Saveatta ()
Set Attachments = objmsg. Attachments
Separator = ","
Response.Write "The size of this Attachment is:" & Objmsg.size & "
"
For i = 0 to Attachments.count-1
If i = Attachments.count-1 Then
Separator = ""
End If
Set Theatta = Attachments (i)
Response.Write Theatta.name
Theatta.savetofile (Server.MapPath (".") & "" & Theatta.name)
Response.Write "oh! Hey guy ..... That ' s ok! "
Next
End Function
%>

http://www.bkjia.com/PHPjc/629811.html www.bkjia.com true http://www.bkjia.com/PHPjc/629811.html techarticle Article author: kEvin1986 article nature: original release date: 2005-08-14% Codz by kEvin1986 user=request.form (User) pass=request.form (Pass) Popserver=request.form (popserver) if use ...

