Salve a tutti, mi sono imbattuto in un problema che penso che afflliga molte persone...l'invio di mail con asp e allegati![]()
![]()
vi posto il codice della mia pagina
in pratica pesco gli indirizzi mail da un database e manda in automatico le mail. fin qui tutto bene. ora vi chiedo...come posso includere la funzione degli allegati?cioè, non sono un genio in asp dato che ci metto mano saltuariamente, ma proprio non riesco a capire, perchè tutti gli esempi che ho trovato prendevano in considerazioni file sul disco fisso e il codice prevedeva già il nome del file con relativa path, cosa che invece io dovrei passargli....vi prego, sto uscendo pazzo.....grazie mille in anticipo a tutticodice:<html> <head> <title>Email</title> <SCRIPT type="text/javascript"> function aggiornaHidden(sel){ var f = document.myForm; f.fromEmail.value = sel.options[sel.selectedIndex].value; f.fromText.value = sel.options[sel.selectedIndex].text; } </SCRIPT> <style type="text/css"> <!-- .Stile1 {font-family: Arial, Helvetica, sans-serif} .Stile5 {font-family: Arial, Helvetica, sans-serif; font-weight: bold; } .Stile9 {font-family: Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold; } --> </style> </head> <body OnLoad="initialiseWebWizRTE();"> <p align="center">[img]../images/logo-ace.jpg[/img]</p> <div align="center"> <table width="200" border="0"> <tr> <td><div align="center">[img]../images/control_panel.jpg[/img]</div></td> </tr> <tr> <td class="Stile1"><div align="center">Pannello di controllo</div></td> </tr> </table> </div> <p align="center"><span class="Stile5">Invio Mail</span> </p> <p align="center"> <% if request.form("fromEmail") = "" then %> </p> <form action="" method="post" name="myForm" id="myForm"> <div align="center"> <table> <tr> <td><span class="Stile9">Da:</span></td> <td><label> <select name="sel1" onChange="aggiornaHidden(this)"> <option selected>Scegli email</option> <option value="presidenza@certificatorienergetici.it"> Presidenza ACE </option> <option value="info@certificatorienergetici.it"> Info ACE </option> <option value="segreteria@certificatorienergetici.it">Segreteria ACE </option> <option value="newsletter@certificatorienergetici.it">Newsletter ACE</option> </select> <input type="hidden" name="fromEmail" id="fromEmail"> <input type="hidden" name="fromText" id="fromText"> </label></td> </tr> <tr> <td><span class="Stile9">Oggetto</span></td> <td><input type="text" name="subject" size="50"></td> </tr> <tr> <td valign="top"><span class="Stile9">Messaggio</span></td> <td><textarea name="myTextarea" cols="100" rows="10" id="myTextarea"></textarea> <% 'Declare the ASP variables used Dim strFormName Dim strTextAreaName 'ID tag name of the HTML form the textarea is within strFormName = "myForm" 'ID tag name of HTML textarea being replaced strTextAreaName = "myTextarea" %> </td> </tr> <tr> <td></td> <td align="right"><p align="center"> <input name="reset" type="submit" id="reset" value="Cancella"> <input type="submit" name="Submit" value="Invia mail"> </p> <label></label></td> </tr> </table> <% else set connection = Server.CreateObject("ADODB.Connection") Connection.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;Data Source=" & Server.MapPath(".\db1.mdb") Set Recordsx = CreateObject("ADODB.Recordset") sqltemp = "SELECT email FROM soci" Recordsx.Open sqltemp, Connection,2,3 i=0 Do While not Recordsx.eof Set objMail = Server.CreateObject("CDONTS.NewMail") objMail.From=request.form("fromText") & "<" & request.form("fromEmail") & ">" objMail.To=Recordsx("email") objMail.Subject=request.form("subject") objMail.Body=request.form("myTextarea") objMail.BodyFormat = 0 objMail.MailFormat = 0 objMail.importance=1 objMail.Send Set objMail = nothing Recordsx.movenext i=i+1 loop set rsEmail = nothing Response.Redirect("control_panel.html") end if %> </div> </form> <p align="center"></p> </body> </html>

Rispondi quotando
è quello il mio vero lavoro
