errore durante l'invio di email con CDONTS

  • Creatore Discussione Creatore Discussione asevenx
  • Data di inizio Data di inizio

asevenx

Utente Attivo
7 Nov 2009
312
0
16
ciao, sto provando a creare una pagina asp per l'invio di email tramite CDONTS. Ho caricato una pagina di prova sul server (aruba) ma mi da errore.

La pagina asp è questa:

<%@ LANGUAGE = VBscript%>

<%
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.Send "[email protected]", "[email protected]", "Prove Posta", "La mia prima mail con CDONTS", 0
Set objMail = nothing
%>

mentre l'errore che mi restituisce al caricamento della pagina è questo:

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/asp.asp, line 4

800401f3
 
Stesso problema

Leggi qua:

http://vademecum.aruba.it/start/contatto/modulo_cdonts.asp

Mandami il file completo che faccio qualche prova in locale.

Ciao, anche io ho un problema simile.
Ho questo codice nella pagina asp di invio mail:

<%
Set link = CreateObject("CDOSYS.Newmail")
link.From = request.form("email")
link.To = "[email protected]"
link.Subject = "Mail creata da un server"
link.Body = request.form("mex")
link.Send
Set link = Nothing
%>

Prima nel modulo che avevo era Set link = CreateObject("CDONTS.Newmail"), ma l'ho cambiato in base alla guida a cui fai riferimento in Set link = CreateObject("CDOSYS.Newmail").

Però quando provo a inviare il form mi dà questo errore:

Microsoft VBScript runtime error '800a01ad'
ActiveX component can't create object: 'CDOSYS.Newmail'
/public/prova/mail.asp, line 2

Errore comunque identico a quando non avevo ancora cambiato da CDONTS a CDOSYS.

Ho controllato nelle proprietà del file cdosys.dll del mio PC, la versione è 6.2.4.0.

Mi potete aiutare????
Grazie :)
 
...prova questo codice

Codice:
<%
' config posta
		cSmtpServer 	= "smtp.aruba.it"
		cSmtpPort 		= "25"
		cSMTPUser	= ""
		cSMTPPassword = ""

' invio e-mail di notifica
Set myMail = Server.CreateObject("CDO.Message")
	'CDO Port (1=localhost 2=network)
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
	'Out going SMTP server
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")= cSmtpServer
	'SMTP port
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= cSmtpPort 
	'SMTP Server password	
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/c-do/configuration/sendpassword") = cSMTPPassword
	'SMTP Server username
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/c-do/configuration/sendusername") = cSMTPUser
	'Timeout
'		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
	'Update		
		myMail.Configuration.Fields.Update
' Windows XP / 2003 
' oggetto
		myMail.Subject 	= "Prova invio e-mail"
' mittente
		myMail.From	= "[email protected]"
' destinatario
		myMail.To		= "[email protected]"
			
' messaggio
		myMail.HTMLBody	=  "Ciao questo è un messaggio prova in formato HTML"
' send
		myMail.Send
Set myMail = Nothing

' confermo e redirect

%>
 
E-mail inviata

Ciao, scusate per il tempo che ci metto a rispondere... ma nel mese passato non ho proprio avuto tempo.
Ho provato il codice che mi ha mandato paolo69, sono riuscita a mandare la mail.
Volevo sapere però una cosa; ho visto nel codice che che l'oggetto, il mittente ed il testo del messaggio e-mail sono preimpostati, come faccio a fare in modo che i dati siano presi dal form che l'utente compila??
Grazie :)
Giuliana
 
Problema risolto

Ciao, scusate per il tempo che ci metto a rispondere... ma nel mese passato non ho proprio avuto tempo.
Ho provato il codice che mi ha mandato paolo69, sono riuscita a mandare la mail.
Volevo sapere però una cosa; ho visto nel codice che che l'oggetto, il mittente ed il testo del messaggio e-mail sono preimpostati, come faccio a fare in modo che i dati siano presi dal form che l'utente compila??
Grazie :)
Giuliana

Ciao,
ho risolto il problema che avevo.
Vi ringrazio tantissimo dell'aiuto che mi avete dato, è stato determinante!!! :)
Ringrazio soprattutto paolo69.

Grazie ancora :)
Giuliana
 

Discussioni simili