Hej!

Jag har denna kod, som äntligen fungerar.

Min fråga är, hur ändrar jag koden i andra stycket så att de filer som laddas upp till servern bifogas mailet? (nu bifogas test2.txt) (Det kan finnas andra filer i mappen sedan innan som inte ska med mailet.)

Sen undrar jag också, hur får jag avsändarens email, som avsändare till mailet, jag har provat med:

JMail.Sender = mySmartUpload.Form("email")
Men det ger:
Object required: 'mySmartUpload'
och
JMail.Sender = request.Form("email")
ger:
Request object error 'ASP 0207 : 80004005'
Cannot use Request.Form
/pressrelease2/fileupload.asp, line 20
Cannot use Request.Form collection after calling BinaryRead.

Hopplöst fall?

Är väldigt tacksam för hjälp.



<code>
<% Set ObjFolder = CreateObject("Scripting.FileSystemObject")

strPath=Server.MapPath("/pressrelease2/testmapp/")
If not ObjFolder.FolderExists(strpath) then
ObjFolder.CreateFolder strPath
end if
Set myUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
myUpload.upload
myUpload.Save(strPath) %>


<% Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mailrelay.terrasite.com:25"
JMail.Sender = "test@test.se"
JMail.Subject = "New Attachment"
JMail.AddAttachment(Server.MapPath("/pressrelease2/testmapp/test2.txt"))
JMail.AddRecipient "minmail@hotmail.com"
JMail.Body = "A new attachment.Open the attachment/s and have a look"
JMail.Priority = 1
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.Execute %>
</code>

Del av första sidan:

<code>
<FORM METHOD=POST ENCTYPE="multipart/form-data" ACTION="fileupload.asp">

File/Files:<br>
<input type="file" name="file1" value="Browse"><br>
<input type="file" name="file2" value="Browse"><br>
<input type="file" name="file3" value="Browse"><br>
<input type="file" name="file4" value="Browse"><br>
<input type="file" name="file5" value="Browse"><br><br>
Contact email address:<br>
<INPUT TYPE="text" NAME="email">
<p>
<center>
<input type="submit" value="Add file/files"></FORM>
</code>

Fungerar nu, med dessa ändringar. :)

Ändringar:
JMail.Sender = myUpload.Form("email")

och

For each file In myUpload.Files
JMail.AddAttachment(Server.MapPath("/pressrelease2/testmapp/" & file.FileName ))
Next