I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
mattt
mattt
il 23 luglio 2014 alle 13:02
7 messaggi dal 23 luglio 2014
Ciao a tutti ho creato questo codice per mandare mail che funziona molto bene fino a quando non allego un file ics. creato da una pagina asp; il file calendario mi arriva come allegato .txt e non come .ics. Cosa sbaglio? 
If request("invia") <> "" then 
  
    Dim objMail, objConfig 
    
    ' Crea l'oggetto email 
    Set objMail = Server.CreateObject("CDO.Message") 
    
    ' Dimensiona l'oggetto configurazione
    Set objConfig = Server.CreateObject ("CDO.Configuration")
    
    ' Imposta le configurazioni 
    With objConfig 
    
    ' Server SMTP di uscita 
    ' ATTENZIONE! Usare il proprio indirizzo di server email! 
    ' E' FONDAMENTALE per l'invio della email 
    .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "server" 
    
    ' Porta SMTP
    .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
    
    ' Porta CDO 
    .Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
    
    ' Timeout 
    .Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 
    .Fields.Update 
    
    End With 
    
    ' Assegna le configurazioni 
    Set objMail.Configuration = objConfig 
    
    ' Assegna all'oggetto le propriet&agrave; necessarie 
    objMail.From = request("mailfrom") ' Mittente 
    objMail.To = request("mailto") ' Destinatario
    objMail.Subject = request("oggetto") 'Oggetto 
    'objMail.Headers.Add = ("content-disposition", "inline; filename=vCal.ics;")
    objMail.HTMLBody = "<html><body>testo</body></html>" ' Messaggio
    objMail.AddAttachment ("http://sito/ics.asp?t1=fere, ferie.ics")
    
    ' Invia l'email 
    objMail.Send() 
    
    Set objMail = Nothing 
    
    Response.Write("-- mail prova, inviata --")
else 
end if
RispondiQuoting
BrightSoul
BrightSoul
il 24 luglio 2014 alle 22:58
11.886 messaggi dal 09 febbraio 2002
Contributi
ciao,
prima di allegarlo, prova a scaricare e salvare il file .ics nell'hard disk del server, come ti suggeriva Daniele nell'altro post.
Prova con qualcosa del genere (XMLHTTP per scaricare e FileSystemObject per salvare)
http://www.webmasterworld.com/microsoft_asp_net/3587710.htm

Dopodiché passa il percorso fisico (es. C:\inetpub\wwwroot\cartella\ferie.ics) al metodo AddAttachment. In questo modo sarà chiaro a CDO.Message che il nome del file è proprio "ferie.ics" (lo inferisce dal percorso).

Per scrupolo controlla anche che l'estensione .txt non sia data da ics.asp, che sta impostando un filename incorretto (si controlla dall'intestazione HTTP Content-Disposition).

ciao,
Moreno
Modificato da BrightSoul il 24 luglio 2014 23.01 -
Enjoy learning and just keep making
RispondiQuoting
mattt
mattt
il 25 luglio 2014 alle 10:14
7 messaggi dal 23 luglio 2014
grazie mille ci provo
RispondiQuoting
mattt
mattt
il 25 luglio 2014 alle 10:34
7 messaggi dal 23 luglio 2014
l'allegato arriva come: "alleato senza titolo... .dat"

devo però verificare i permessi sulla cartella. devo aspettare lunedì il ced.

grazie vi aggiorno.
RispondiQuoting
mattt
mattt
il 31 luglio 2014 alle 08:54
7 messaggi dal 23 luglio 2014
Con il percorso fisico funziona, grazie.
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.