allegato da form

[gguida]

Ciao a tutti,
sto utilizzando cdonts per inviare una mail dal web con un allegato selezionabile dall'utente...il mio problema è che se utilizzo

enctype="multipart/form-data" poi non posso recuperare il percorso del file e gli altri campi dalla form....

Quale alternativa ho al codice sotto---

grazie

<%
afile = request.form("file")
Set link = CreateObject("CDONTS.Newmail")
link.From = request.form("email")
link.To = "giovanni@raffygio.com"
link.MailFormat = 1
link.BodyFormat = 1 
'response.write aFile
'response.end
link.AttachFile aFile
link.Subject = "MORE INFO "
link.Body = request.form("name") & VbCrLf & request.form("company") & VbCrLf & request.form("title") & VbCrLf & request.form("address") & VbCrLf & request.form("city") & VbCrLf & request.form("state") & VbCrLf & request.form("zip") & VbCrLf & request.form("tel") & VbCrLf & request.form("fax") & VbCrLf & request.form("interest")
link.Send
Set link = Nothing
%>

l'allegato con il response.write mi risulta vuoto...sembra che non recupero il valore dal file

[Roby_72]

Per inviare una mail con allegato il file deve essere già presente sul server.
Per far ciò ti occorre uno script per l'upload.
Fai una ricerca sul forum.

Roby

[gguida]

grazie....con il forum ho imparato ad usare la classe di baol...

quindi se ho capito bene..devo prima farel'ipload del file in una cartella del server e poi selezionarlo in modo dinamico ed fare l'allegato alla mia mail....

giusto...

[gguida]

ECCO IL RISULTATO DEL POMERIGGIO DI LAVORO USO LA CLASSE DI BAOL:

  <%
	If Request("Upload")="1" then
			Dim oUpload
			Set oUpload = new cUpload
			oUpload.Upload
			path = "/public/careers/"
	    	oUpload.SetPath path
			oUpload.AutoRename = True
			oUpload.EnabledAspUpload = False 
			oUpload.Overwrite = False
			oUpload.EnabledLog = False
			oUpload.Save
			 filename = oUpload.GetFileName()
			oUpload.PrintStatus "UPLOAD REPORT"
			
			afile = "/public/careers/" & filename
Set link = CreateObject("CDONTS.Newmail")
link.From = oUpload.form("email")
link.To = "AA@AAA.com"
link.MailFormat = 1
link.BodyFormat = 1 
'response.write afile
'response.end
link.AttachFile afile   '---linea 82
link.Subject = "careers"
link.Body = oUpload.form("name") & VbCrLf & oUpload.form("company") & VbCrLf & oUpload.form("title") & VbCrLf & oUpload.form("address") & VbCrLf & oUpload.form("city") & VbCrLf & oUpload.form("state") & VbCrLf & oUpload.form("zip") & VbCrLf & oUpload.form("tel") & VbCrLf & oUpload.form("fax") & VbCrLf & oUpload.form("interest")
link.Send
Set link = Nothing
Set oUpload = Nothing
	End If
%>

L'UPLOAD FUNZIONA è IL FILE SI TROVA NELLA CARTELLA DEL SERVER..PERò NON MI MANDA LA MAIL...e mi da questo errore:

error '80004005'
Unspecified error

/sendcareers.asp, line 282

il file con il response esiste......COSA PUò ESSERE???

GRAZIE

[99eros9]

non mi sembra tu stia puntando al file con un path del tipo:
d:\inetpub\webs\pippoit\public\........

sbaglio?

[gguida]

gli ho dato il path dalla root del sito....ho anche usato :

afile = server.mapPath("/public/careers/" & filename)

ma niente da fare...

[gguida]

ho provato anche con l'itero percorso....

			afile = "e:\inetpub\sito.com\public\careers\" & filename