Invio email cdosys con vista

[millennium_y2k]

Sto cercando di testare un invio email da locale.
sul sito pubblico funziona, ma in locale no.. mi ricordo che in xp ero riuscito a configurare l'smtp locale, ma in vista nn riesco.. chi mi aiuta??

ecco il codice:

'---Script per CDOSYS
Dim Mail
set Mail = server.CreateObject("CDO.Message")
With Mail
.From = mittente
.To = destinatario
.Subject = titolo
.TEXTBody = corpo

Mail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
Mail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "127.0.0.1"
Mail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
Mail.Configuration.Fields.Update

.Send
end With
set Mail=nothing

[ResianTaxidrive]

penso che in locale vada

Mail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1

[millennium_y2k]

non funziona...

CDO.Message.1 error '80040222'

Percorso directory di prelievo necessario non specificato.

/relations/send_mail.asp, line 45



linea 45 è .Send