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.

Questo script puo’ essere eseguito tramite il cron di sistema per fare un backup incrementale di un database. Nel nostro esempio verra fatto un dump del databse chiamato DATABASE_UNO e una copia di una sola tabella del database DATABASE_DUE. Tutti i backup piu’ vecchi di 3 mesi verranno cancellati:

#!/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 {} \;