Il componente CDONTS e’ diventato obsoleto dalla versione Windows 2003. Per poter inviare email conviene utilizzare il componente CDOSYS. In particolare

Dim objCDOSYSCon
Set objCDOSYSMail = Server.CreateObject(”CDO.Message”)

Set objCDOSYSCon = Server.CreateObject (”CDO.Configuration”)

‘Il server SMTP va inserito nella riga successiva
objCDOSYSCon.Fields(”http://schemas.microsoft.com/cdo/configuration/smtpserver”) = “localhost”
‘porta SMTP
objCDOSYSCon.Fields(”http://schemas.microsoft.com/cdo/configuration/smtpserverport”) = 25
objCDOSYSCon.Fields(”http://schemas.microsoft.com/cdo/configuration/sendusing”) = 2
‘Timeout
objCDOSYSCon.Fields(”http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout”) = 60
objCDOSYSCon.Fields.Update
Set objCDOSYSMail.Configuration = objCDOSYSCon

objCDOSYSMail.From = “mittente@test.net”
objCDOSYSMail.To = “destinatario@anywhere.com”
objCDOSYSMail.Subject = “Il subject va inserito qui”
‘Set the e-mail body format (HTMLBody=HTML TextBody=Plain)
objCDOSYSMail.HTMLBody = “Il corpo del messaggio va inserito qui”
objCDOSYSMail.Send
Set objCDOSYSMail = Nothing
Set objCDOSYSCon = Nothing

Lo script in questione non prevede l’autenticazione in uscita, a breve verra’ postato un articolo per il sistema con autenticazione in uscita.

#!/bin/bash

DATA=`/bin/date +”Giorno_%d-%m-%y_Ora_%H-%M”`

/usr/bin/mysqldump -uUTENTE -pPASSWORD DATABASE_UNO > /var/backupdb/DATABASE_UNO_$DATA.sql
/usr/bin/mysqldump -uUTENTE -pPASSWORD DATABASE_DUE TABELLA > /var/backupdb/TABELLA_$DATA.sql

chmod 600 /var/backupdb/ -R

/usr/bin/find /var/backupdb/ -type f -mtime +93 -exec rm -f {} \;