Notizie 

MAIL-INC.ASP modificato per l'uso con CDOSYS

Inserito il 13 dicembre 2003 alle 15:12:00 da djveleno. IT - Tutorials
Indirizzo sito : Searchwarezz
Di seguito, ho inserito il file mail-inc.asp, lo trovate nella cartella INCLUDES, modificato per l'uso di CDOSYS.
' Send mail with CDOSYS
' IN : sSender (string) : sender of the mail
' : sRecipient (string) : recipient of the mail (can use ; to send to many recipients)
' : sSubject (string) : subject of the mail
' : sText (string) : content of the mail
' : bHTML (boolean) : send HTML or text mail
' OUT : (boolean) : True
' Send mail with CDOSYS
' IN : sSender (string) : sender of the mail
' : sRecipient (string) : recipient of the mail (can use ; to send to many recipients)
' : sSubject (string) : subject of the mail
' : sText (string) : content of the mail
' : bHTML (boolean) : send HTML or text mail
' OUT : (boolean) : True
Function SendMail(ByVal sSender, ByVal sRecipient, ByVal sSubject, ByVal sText, ByVal bHTML)
Dim oMail, bOk

bOk = False

On Error Resume Next
Set oMail = Server.CreateObject("CDO.Message")
If Err.number <> 0 Then
Else
oMail.From = sSender
oMail.To = sRecipient
oMail.Subject = sSubject

If bHTML Then
oMail.HtmlBody = "" & vbCRLF & Text2HTML(sText) & vbCRLF & " "
Else
oMail.TextBody = sText
End If
oMail.Fields("urn:schemas:httpmail:importance").Value = 2
oMail.Fields.Update()
oMail.Send
bOk = True
End If
On Error GoTo 0

SendMail = bOk
Set oMail = Nothing
End Function

Dovete solo copiare e incollare su di un nuovo documento in NOTEPAD e salvare come mail-inc.asp

Commenti

3 Commenti - 5/5 - Voti : 2
Inserito il 15 dicembre 2003 alle 15:28:08 da azzurro.  5/5
 
ottimo per chi ha aspnuke su winserver 2k3

Grande DJ :)
Inserito il 16 dicembre 2003 alle 11:29:44 da bricke.  5/5
 
Beh potevi almeno citarmi come fonte. Un grazie Bricke sarebbe bastato :P
Inserito il 16 dicembre 2003 alle 22:39:02 da djveleno.  0/5
 
Bhe, mi sembra di averlo fatto pubblicamente nel FORUM.... ma se non ti basta.... GRAZIE BRICKE!!!!!
Ciauzz DJ

Aggiungi - Commenti

Login Anonimo
Messaggio
[b] [i] [u] [s] [url] [img] [cit]
Codice di sicurezza
Vota! / 5

Log in

Login
Password
Memorizza i tuoi dati:

Cerca

 

Sostieni AspNuke

Un piccolo gesto per aiutarci a mantenere AspNuke.it online

Promo

MusicWebItalia.it
Video Testi Traduzioni Spot Colonne sonore Accordi e Spartiti gratis.

Visitatori

Visitatori Correnti : 86
Membri : 0 offline Anna

Iscritti

 Utenti: 18940
Ultimo iscritto : glauco
Lista iscritti
Messaggi privati: 3373 Commenti: 2210 Immagini: 39 Downloads: 144 Articoli: 49 Pagine: 101 Siti web: 425 Notizie: 180 Sondaggi: 11 Preferiti: 28003 Post sui forum: 51195 Libro degli ospiti: 4 Eventi: 7

Versioni

Temi