I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio 1 2
bech
bech
l'11 gennaio 2005 alle 17:21
16 messaggi dal 14 dicembre 2004
Non riesco a mandare mail dal sito.

ho usato diversi codici, ho anche copiato il file CDONTS.dll (ho letto che manca in XP Professional).

Il massimo cui sono arrivato è questo messaggio di errore:

Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A0046)
Autorizzazione negata: 'CreateObject'
/Problem_Manager/Finale_rispondi.asp, line 121

che mi farebbe pensare ad una mancata autorizzazione di una cartella, ma mi sembra di aver permesso proprio tutto.


Ho fatto:
1. tasto destro su mailroot - protezione. Per tutti gli utenti ho consentito il controllo completo. L' unico utente che non lo ha è il 'creator owner' (non mi consente di spuntare la casella).
2. mailroot - condivisione e condivisione web. Ho consentito a tutti.
3. mailroot - generale: la casella 'Sola lettura' non è spuntata ma verde. Ho tolto anche quello, ma non mi tiene la modifica (se la riapro è di nuovo verde)

Nonostante tutto questo mi restituisce il solito messaggio di errore.

Ecco il codice:

Dim miaMail
Set miaMail = CreateObject("CDONTS.NewMail")

miaMail.From = "mittente@della.mail"
miaMail.To = "destinatario@della.mail"
miaMail.Subject = "Oggetto della mail"
miaMail.BodyFormat = 0 
miaMail.MailFormat = 0
miaMail.Importance = 0 
miaMail.Body = "Testo della mail" 
miaMail.Send

Set miaMail = Nothing


Ciao e grazie


la linea incriminata è la seconda
RispondiQuoting
MaurizioG
MaurizioG
l'11 gennaio 2005 alle 23:01
43 messaggi dal 24 dicembre 2004
Ciao,
non ho ben capito quale sia il tuo problema, se vuoi far girare sul tuo server il servizio smtp... o no...

comunque se vuoi inviare email con asp usa questa funzione, dovrebbe funzione

<!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D" NAME="CDO for Windows 2000 Type Library" -->
<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library" -->
<%
sub invia_email(destinatario, from, sender, oggetto, body, cc, conferma, testo_conferma)
DIM iMsg, Flds, iConf
err.clear

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = 2 'cdoSendUsingPort
Flds(cdoSMTPServer) = "smtp.nomeserver.it" '<-- nome del server o ip
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = 0 'cdoAnonymous
Flds.Update

With iMsg
Set .Configuration = iConf
.To = destinatario
.Bcc = cc
.From = from
.Sender = sender
.Subject = oggetto
.HTMLBody =body
.Send

End With

Set iMsg = nothing
Set iConf = nothing
Set Flds = nothing

end sub
RispondiQuoting
bech
bech
il 12 gennaio 2005 alle 17:15
16 messaggi dal 14 dicembre 2004
In effetti mi sonon dimenticato di dire alcune cose.
Sto lavorando con ASP 3.0 sto usando IIS sul mio computer locale.

Il codice che hai scritto funziona, ovvero mi si carica la pagina senza errori.
Volevo chiedere:
dovrebbe effettivamente mandare mail anche se non sono un server?
perdona l'ignoranza, ma...in che linguaggio è il codice?

ciao e grazie mille!!!
RispondiQuoting
MaurizioG
MaurizioG
il 12 gennaio 2005 alle 17:21
43 messaggi dal 24 dicembre 2004
Si perchè lo script si connette direttamente al server di posta.

Prova ad eseguire la routine inviandoti una eamil.

Attenzione alcuni server di posta, tipo "libero" non accettano posta in ingresso se il sender non esiste.(mi sembra)
RispondiQuoting
bech
bech
il 12 gennaio 2005 alle 17:22
16 messaggi dal 14 dicembre 2004
ho riguardato meglio il codice e forse ho capito qualcosa..

si tratta della definizione di una funzione che conviene mettere in un include e richiamare all' occorrenza?

se sì, come la richiamo?
le variabili (destinatario, from, sender, oggetto, body, cc, conferma, testo_conferma) le definisco tra ()quando la richiamo, giusto ?
RispondiQuoting
MaurizioG
MaurizioG
il 12 gennaio 2005 alle 17:27
43 messaggi dal 24 dicembre 2004
la <!-- #include i ,...
e quando hai bisogno
call invia_email(email, "", "", "Attivazione", "body_email" .....


p.s. togli gli ultimi due parametri "conferma" e "testo_conferma" che non vengono utilizzati
Modificato da MaurizioG il 12 gennaio 2005 17.28 -
RispondiQuoting
bech
bech
il 12 gennaio 2005 alle 20:18
16 messaggi dal 14 dicembre 2004
Mi dà quest'errore:
Tipo di errore:
CDO.Message.1 (0x80040213)
Il trasporto non è riuscito a connettersi al server.
/Problem_Manager/sendmail.inc, line 26

Posto anche i codici, magari ho sbagliato qualcosa

sendmail.inc

<!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D" NAME="CDO for Windows 2000 Type Library" --> 
<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library" --> 
<% 
sub invia_email(destinatario, from, sender, oggetto, body, cc) 
DIM iMsg, Flds, iConf 
err.clear 

Set iMsg = CreateObject("CDO.Message") 
Set iConf = CreateObject("CDO.Configuration") 
Set Flds = iConf.Fields 

Flds(cdoSendUsingMethod) = 2 'cdoSendUsingPort 
Flds(cdoSMTPServer) = "smtp.nomeserver.it" '<-- nome del server o ip 
Flds(cdoSMTPServerPort) = 25 
Flds(cdoSMTPAuthenticate) = 0 'cdoAnonymous 
Flds.Update 

With iMsg 
Set .Configuration = iConf 
.To = destinatario 
.Bcc = cc 
.From = from 
.Sender = sender 
.Subject = oggetto 
.HTMLBody = body 
.Send 

End With 

Set iMsg = nothing 
Set iConf = nothing 
Set Flds = nothing 

end sub
%>



pagina che invia: 

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">

<!--#include file="utils.inc"-->
<!--#include file="Security.inc"-->
<!--#include file="sendmail.inc"-->

<html>
<head>
  <title>Conferma invio</title>
<%
call invia_email("bech@tele2.it","bech54@libero.it","bech54@libero.it","obj","messaggio","zbech@libero.it")
%>


Ovviamente sono connesso ad internet
Modificato da bech il 12 gennaio 2005 20.19 -
RispondiQuoting
MaurizioG
MaurizioG
il 12 gennaio 2005 alle 22:13
43 messaggi dal 24 dicembre 2004
Non hai indicato un nome di server valido....

"smtp.nomeserver.it" '<-- nome del server o ip
es. smtp.aruba.it
RispondiQuoting
1 2

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.