I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
maucamp
maucamp
il 23 maggio 2002 alle 22:05
8 messaggi dal 23 maggio 2002
Ho programmato una pagina asp che invia una mail a tutti gli iscritti della lista e vorrei implementarla con l'invio anche di un file allegato.
Il codice da me sviluppato e quello di seguito riportato, ma purtroppo mi segnala un unspecifiched error e non riesco a trovare l'errore. Se qualcuno potesse aiutarmi?
codice sviluppato:
<%
response.buffer = true
dim useraction,subject,comm,emails
useraction=request("action")
select case useraction
case "send"
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
dsn="DBQ=percorso database;Driver={Microsoft Access Driver (*.mdb)};"
Conn.Open dsn
SQL = "SELECT email from nometabella order by id"
rs.open sql,conn
if rs.eof and rs.bof then
response.write "<script>alert('no users in db!');"
else
do while not rs.eof
Email=rs("email")
subject = request.form("subject")
file = request.form("file")
comm = request.form("comm")
Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.To = Email
objCDO.From = "suncity@tin.it"
objCDO.Subject = subject
objCDO.AttachFile"file"
objCDO.Body = comm
objCDO.Send
rs.movenext
loop
set objCDO = nothing
rs.close
set rs = nothing
conn.close
set conn = nothing
response.write "<script>alert('has been sent!');"
end if
response.write "location.href='mail_list.asp'</script>"
end select
%>
<html>
<head>
<title>Untitled</title>
</head>
<body><form action="mail_list.asp?action=send" method="post">
<table width="673">
<tr>
<td> Subject:</td>
<td>
<input type="text" name="subject" size=66 maxlength=30>
</tr>
<tr>
<td>file:</td>
<td>
<input type="file" name="file" size=66 maxlength=30>
</tr>
<tr>
<td> message:</td>
<td> 
</tr>
<tr>
<td colspan=2>
<input type=submit name=submit value="Invia mail">
<textarea cols=80 rows=8 name="comm"></textarea></form>
</table>
</body>
</html>

RispondiQuoting
vmp
vmp
il 23 maggio 2002 alle 23:08
48 messaggi dal 06 settembre 2002
www.vittoriomartinelli.it
Ma il file che mandi come allegato dove lo recuperi?
Deve trattarsi di un file presente sul server e la sintassi è

objCDO.AttachFile ("c:/tuacartella/allegato.txt")

A me così funziona....


Ciao
Vittorio
...Il principio della saggezza è il dubbio...
RispondiQuoting
maucamp
maucamp
il 24 maggio 2002 alle 17:17
8 messaggi dal 23 maggio 2002
il file viene recuperato dall'interno di un campo del form e non ha quindi una cartella specifica e il nome può variare ogni volta.
come fare? è possibile?


RispondiQuoting
Rivettazzo
Rivettazzo
il 24 maggio 2002 alle 17:44
751 messaggi dal 03 maggio 2002
www.albain.com
Ti spiego:
Hai ragione, il "NOME" del file viene recuperato dal campo file del tuo form, ma non il form è per questo che ti da un errore, il file in qualunque caso deve risiedere sul server e se è un utente che va nella pigina, devi fare l'upload del file su server allo stesso modo se tu nn lavori direttamente sul server ma su un computer collegato ad esso, devi fare l'upload del file sul server.

Spero di essermi spiegato, ciao Andrea.

Ciao Ciau
Tutto si può fare, quando si stà per affogare si impara a nuotare
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.