Invio mail con cdo

[fruttosio79]

kalosjo help me !!!

Praticamente in IIS c'è Server virtuale smtp predefinito e clicco su proprietà, e poi che devo fà?

Ciaoooo

[kalosjo]

Intanto vedi se è in esecuzione...

[fruttosio79]

nessuno sa come impostare il server smtp in IIS?

Ciao

[fruttosio79]

si è in esecuzione

[fruttosio79]

up

[fruttosio79]

aiuto

[fruttosio79]

[fruttosio79]

Ciao ragazzi,
nessuno riesce ad aiutarmi per impostare la stringa di connessione al server smtp.
Io lavoro in locale ....

Ciao

[fruttosio79]

Ho fatto così:

Dim objMail, objConfig 
	
	Set objMail = Server.createObject("CDO.Message") 
	Set objConfig = Server.createObject("CDO.Configuration") 
	
	' Imposta le configurazioni 
	With objConfig 
	
	' Server SMTP di uscita 
	.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
	
	' 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 
	
	objMail.From = "prova@prova.com" 
	objMail.To = sUserMail
	objMail.Subject = "Conferma registrazione" 
	
	' Valore di priorità 
	objMail.Fields("urn:schemas:httpmail:importance").Value = 2 
	objMail.Fields.update() 
	
	' Corpo del messaggio 
	'objMail.TextBody = "Testo della mail" 
	objMail.HTMLBody = "Testo della mail" 
	
	objMail.Send() 
	Set objMail = Nothing

Mi esce che è impossibile connettersi al server smtp.
Io in effetti lavoro in locale con questo sito, per cui che devo fare?
Le stringhe come ("http://schemas.microsoft.com/cdo/configuration/smtpserver")
cosa significano? Dovono rimanere tali?

Ciao