Gestisco una decina di siti web tutti identici tra loro a livello di codice e tutti su server windows in Aruba. L'ultimo sito caricato si comporta in modo assurdo: non invia più mail e l'errore che mi appare è il seguente:
CDO.Message.1 error '80040220'
The "SendUsing" configuration value is invalid.
/include\config\invia.asp, line 18
Di seguito posto il codice incriminato
<%
Sub InviaEmail(ByVal eFrom, ByVal eTo, ByVal eSubject, ByVal eBody, ByVal eServer)
Dim objCDOSYSMail
Dim objCDOSYSCon
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = eServer
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
Set objCDOSYSMail.Configuration = objCDOSYSCon
objCDOSYSMail.From = eFrom
objCDOSYSMail.To = eTo
objCDOSYSMail.Subject = eSubject
objCDOSYSMail.AddAttachment "http://b2b.solareshop.com/images/logl.jpg"
objCDOSYSMail.TEXTBody = eBody
objCDOSYSMail.Send
Set objCDOSYSMail = Nothing
Set objCDOSYSCon = Nothing
End Sub
I valori eServer, e From, eTo si ricavano più avanti
InviaEmail defEmailName & " <" & defEmail & ">", email, "PREVENTIVO SOLARESHOP DA " & defSiteName & " - Rif: " & NumOrd, testoCliente, defSMTPServer
InviaEmail defEmailName & "<" & defEmail & ">", defEmail, "NUOVO PREVENTIVO dell'agente: " & email3 & " - Rif: " & NumOrd, testoGestore, defSMTPServer
InviaEmail defEmailName & " <" & defEmail & ">", email3, "NUOVO PREVENTIVO inviato a " & titolare & " - Rif: " & NumOrd, testoGestore, defSMTPServer
Il tutto correlato a un'altra pagina in cui sono specificati i valori di ogni singolo sito:
defDomain = "solareshop.com"
defSiteUrl = "http://agenti." & defDomain
defSiteName = "Area Agenti Solarshop"
defEmail = "agenti@" & defDomain
defEmailName = "Area Agenti Solareshop"
defSMTPServer = "smtp." & defDomain
defIndex = "/index.asp"
Il tutto risulta incomprensibile perchè su nove siti funziona perfettamente e su questo no..
Non vorrei fosse cambiata qualche configurazione in quel di Aruba, ma ovviamente non hanno spauto darmi alcuna risposta...
Qualcuno mi può aiutare? Grazie fin d'ora