Ovako recimo izgleda Batch skripta
@echo off
title Please Wait...
start C:\IT\1_smena\Reports\MR.xls
start C:\IT\1_smena\Reports\DS.xls
start C:\IT\1_smena\Reports\HT.xls
start C:\IT\1_smena\Reports\PO.xls
start C:\IT\1_smena\Reports\MTD.xls
PING 1.1.1.1 -n 1 -w 5000 >NUL
t:\IT\1_smena\Daily_0720.vbs
PING 1.1.1.1 -n 1 -w 5000 >NUL
exit
A VBS skripta ovako
Set objOutlook = CreateObject("Outlook.Application")
Set objMail = objOutlook.CreateItem(0)
objMail.To = "[email protected]; [email protected]"
objMail.cc = "[email protected]"
objMail.Subject = "Dnevni Izvestaji"
objMail.Body = "Pozdrav," & vbNewLine & "IT Kragujevac"
objMail.Attachments.Add("t:\IT\1_smena\Reports\TMP\MR" & " " & Day(Now()) & "-" & MonthName(Month(Now()), 1) & ".xls")
objMail.Attachments.Add("t:\IT\1_smena\Reports\TMP\DS" & " " & Day(Now()) & "-" & MonthName(Month(Now()), 1) & ".xls")
objMail.Attachments.Add("t:\IT\1_smena\Reports\TMP\HT" & " " & Day(Now()) & "-" & MonthName(Month(Now()), 1) & ".xls")
objMail.Attachments.Add("t:\IT\1_smena\Reports\TMP\PO" & " " & Day(Now()) & "-" & MonthName(Month(Now()), 1) & ".xls")
objMail.Attachments.Add("t:\IT\1_smena\Reports\TMP\MTD" & " " & Day(Now()) & "-" & MonthName(Month(Now()), 1) & ".xls")
objMail.Send
Set objMail = Nothing
Set objOutlook = Nothing
Ranije sam u XLSu koristio makro koji bi odmah cim se izvrsi fajl, automatski posalje na mailove, ali kad se nagomilalo brdo izvestaja, ili jedan kolega da otkaz, onda moram da trazim fajlove koji su isli njemu, da ih otvaram jedan po jedan i ispravljam.
Iz tog razloga bih hteo na gore pomenuti nacin da saljem.
Ali bih zeleo da pojednostavim jos vise.
Odnosno da ne upotrebljavam i batch i vbs nego jedno od ta dva.
Za batch nisam uspeo da nadjem neki jednostavni nacin za slanje mailova, a to bi mi mozda najvise i odgovaralo.
A za VBS nisam nasao neki nacin za pokretanje fajlova.
Tj. sa batch skriptom kad napravim skriptu na gore pomenuti nacin, onda se izvrsava fajl po fajl. Prvo se startuje i izvrsi prvi, pa kad se zavrsi tek onda pokrece i sledeci i tako dalje...
Za VBS nisam nasao na netu neki slican nacin, nego mi skripta pokrene sve fajlove odjednom pa mi racunar zabode...
Dajte neki nacin da sa batch skriptom saljem mail ili sa VBS skriptom pokrecem fajlove jedan po jedan.
Da napomenem da kod ove VBS skripte mi se svidja sto ne mora da mi bude ukljucen Outlook da bi se mail poslao. Sve odradi u pozadini u delicu sekunde