COEM ADATTO LO SCRIPT A CDOSYS?
codice:
Dim objCDO
Set objCDO = Server.CreateObject("CDOSYS.NewMail")
objCDO.From = Request.Form("ART_EMAIL")
objCDO.To = myEmail
objCDO.CC = Request.Form("ART_EMAIL")
objCDO.Subject = "New article has been submited"
objCDO.Body = "A new article has been submited and needs to be approved." & vbnewline & "Name: " & Request.Form("ART_NAME") & vbnewline & "URL: " & Request.Form("ART_URL") & vbnewline & "Description: " & Request.Form("ART_DESCRIPTION") & vbnewline & "Submited By: " & Request.Form("ART_EMAIL")
objCDO.Send()
Set objCDO = Nothing
' execute the insert
Set MM_editCmd = Server.CreateObject("ADODB.Command")
MM_editCmd.ActiveConnection = MM_editConnection
MM_editCmd.CommandText = MM_editQuery
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close
If (MM_editRedirectUrl <> "") Then
Response.Redirect(MM_editRedirectUrl)
End If
End If
End If
%>