Set ObjMail = Server.CreateObject("CDO.Message")
ObjMail.from = StrCognome
if Strsettore = "info" then
ObjMail.to = "ssss@sss.it"
else
end if
if Strsettore = "direzione" then
ObjMail.to = "xxxxx@xxxxx.it;yyyy@yyyy.it "
else
end if
ObjMail.Subject = "Richiesta informazioni dal sito xxxxxx"
ObjMail.Htmlbody = StrBody
ObjMail.Send
Set ObjMail = Nothing
Funziona se separo con ; gli idirizzi?