Linguaggio scripting: VBS
Mi serve uno script per inviare mail.
Ho trovato questo sul sito della Microsoft:
L'ho modificato per i miei bisogni. ossia ho messo server e porta smtp, i campi From, To e tolto Addattachment.
Cos'è rimasto da fare?
Cosa devo mettere in "smtpauthenticate" e "objEmail.Configuration"?
Mi viene questo errore
Devo inviare tanti piccoli file da alcuni computer, quindi ho creato una cartella col solito nome e percorso su ogni computer; ogni giorno quel che dev'essere spedito viene messo in quella cartella.
Questo script dovrebbe occuparsi di inviare i file, poi ne farei un altro per cancellare i file una volta inviati, per far sì che la cartela rimanga vuota per la volta dopo, per evitare duplicati.
I sistemi operativi sono tutti Windows XP 32 bit, non voglio aggiungere cose come programmi e librerie esterne, voglio fare tutto con gli strumenti standard.
Se ci sono migliori linguaggi di scripting disponibili sul sistema standard, per me è a posto.
Va bene anche se ci sono altri modi di ricevere, come metterli su un server ftp o qualunque cosa.
Quindi dropbox, box.net eccetera.
Mi serve uno script per inviare mail.
Ho trovato questo sul sito della Microsoft:
Codice:
Set objEmail = CreateObject("CDO.Message")
set objConf = CreateObject("CDO.Configuration")
Set objFlds = objConf.Fields
With objFlds
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "XXX-ex100"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
'.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoBasic
.Update
End With
Set objEmail.Configuration = objConf
objEmail.From = "ron.nixon@fastmail.us"
objEmail.To = "users.name@abc.com"
objEmail.Subject = "All done!"
objEmail.Textbody = "...here you go..."
objEmail.Addattachment "C:\directory name of file\filename"
objEmail.SendL'ho modificato per i miei bisogni. ossia ho messo server e porta smtp, i campi From, To e tolto Addattachment.
Cos'è rimasto da fare?
Cosa devo mettere in "smtpauthenticate" e "objEmail.Configuration"?
Mi viene questo errore
Codice:
---------------------------
Windows Script Host
---------------------------
Script: C:\Documents and Settings\tizio\Desktop\script\MioSendCDOEmail.vbs
Line: 20
Column: 1
Error: The transport couldn't connect to the server.
Code: 80040213
Origin: CDO.Message.1
---------------------------
OK
---------------------------Devo inviare tanti piccoli file da alcuni computer, quindi ho creato una cartella col solito nome e percorso su ogni computer; ogni giorno quel che dev'essere spedito viene messo in quella cartella.
Questo script dovrebbe occuparsi di inviare i file, poi ne farei un altro per cancellare i file una volta inviati, per far sì che la cartela rimanga vuota per la volta dopo, per evitare duplicati.
I sistemi operativi sono tutti Windows XP 32 bit, non voglio aggiungere cose come programmi e librerie esterne, voglio fare tutto con gli strumenti standard.
Se ci sono migliori linguaggi di scripting disponibili sul sistema standard, per me è a posto.
Va bene anche se ci sono altri modi di ricevere, come metterli su un server ftp o qualunque cosa.
Quindi dropbox, box.net eccetera.