<div>
how do I run the script, do i use cscript?
</div>

<div>
just make sure you have edited the path to the logs, smtp server and the email address, 
 
then yes use cscript, or create a task that will run after the backup finishes. 
 
eg: cscript &lt;filename.vbs&gt;
</div>

<div>
So the way it is setup where it asks for a filename put nothing and it will find the newest file in the DIR? Can I use &nbsp;&quot;*.log&quot;
</div>

<div>
I am sorry to be a pain but is there a way to merge the file into the body of the email? 
 
The script sends with no problems....
</div>

<div>
uncomment the 
'oCDO.AddAttachment BACKUP_LOG_PATH &amp;&nbsp;&quot;\&quot; &amp;&nbsp;logFilePath 
to also attach the file. 
 
this should work 

<pre><code class="code-100 nolinks" id="code-1419391">Option Explicit

' ***************************************************************
' * Email NT Backup log file
' * © Andrew Taylor 2008 www.andrewtaylor.me.uk
' * Free to use providing this acknowledgement remains in place
' ***************************************************************

' Dim variables
Dim oFSO, oWshNetwork, oCDO, oFolder, oFiles, oFile, objFile
dim strFileName, strComputerName, strContents

' Create Objects
Set oFSO = CreateObject(&quot;Scripting.FileSystemObject&quot;)
Set oWshNetwork = WScript.CreateObject(&quot;WScript.Network&quot;)


' Set constants
Const BACKUP_LOG_PATH = &quot;C:\Documents and Settings\Administrator\Local Settings\Application Data\Microsoft\Windows NT\NTBackup\data&quot;
Const EMAIL_RECIPIENT = &quot;you@yourdomain.com&quot;

' Set variable defaults
strFileName = &quot;&quot;
strComputerName = oWshNetwork.ComputerName

' Start script
Set oFolder = oFSO.GetFolder(BACKUP_LOG_PATH)

Set oFiles = oFolder.Files

For Each oFile in oFiles
	If oFSO.GetExtensionName(oFile.Name) = &quot;log&quot; Then
		If DateValue(oFile.DateLastModified) = Date() Then
			strFileName = oFile.Name
			Exit For
		End If
	End If
Next

If strFileName &lt;&gt; &quot;&quot; Then

	EmailLog(strFileName)

Else

	EmailError

End If

Sub EmailLog(logFilePath)

	Set oCDO = CreateObject(&quot;CDO.Message&quot;)

	oCDO.Subject = &quot;Backup Log - &quot; &amp; strComputerName
	oCDO.From = strComputerName &amp; &quot;@yourdomain.com&quot;
	oCDO.To = EMAIL_RECIPIENT
	
	Set objFile = objFSO.OpenTextFile(BACKUP_LOG_PATH &amp; &quot;\&quot; &amp; logFilePath, 1)
	strContents = objFile.ReadAll
	objFile.Close

	oCDO.TextBody = &quot;Backup log attached for &quot; &amp; strComputerName &amp; vbCrLf &amp; strContents

	'oCDO.AddAttachment BACKUP_LOG_PATH &amp; &quot;\&quot; &amp; logFilePath

	oCDO.Configuration.Fields.Item(&quot;http://schemas.microsoft.com/cdo/configuration/sendusing&quot;) = 2

	oCDO.Configuration.Fields.Item(&quot;http://schemas.microsoft.com/cdo/configuration/smtpserver&quot;) =&quot;mail.yourdomain.com&quot;

	oCDO.Configuration.Fields.Item(&quot;http://schemas.microsoft.com/cdo/configuration/smtpserverport&quot;) = 25 

	oCDO.Configuration.Fields.Update

	oCDO.Send

	set oCDO = Nothing


End Sub

Sub EmailError

	Set oCDO = CreateObject(&quot;CDO.Message&quot;)

	oCDO.Subject = &quot;Backup Log Missing - &quot; &amp; strComputerName
	oCDO.From = strComputerName &amp; &quot;@yourdomain.com&quot;
	oCDO.To = EMAIL_RECIPIENT

	oCDO.TextBody = &quot;No backup log found on &quot; &amp; strComputerName &amp; &quot; for today&quot;

	oCDO.Configuration.Fields.Item(&quot;http://schemas.microsoft.com/cdo/configuration/sendusing&quot;) = 2

	oCDO.Configuration.Fields.Item(&quot;http://schemas.microsoft.com/cdo/configuration/smtpserver&quot;) =&quot;mail.yourdomain.com&quot;

	oCDO.Configuration.Fields.Item(&quot;http://schemas.microsoft.com/cdo/configuration/smtpserverport&quot;) = 25 

	oCDO.Configuration.Fields.Update

	oCDO.Send

	set oCDO = Nothing


End Sub

set oFSO = Nothing
Set oWshNetwork = Nothing
</code></pre>
</div>

<div>
Thank you for all your help so far......
</div>

<div>
small issue it is not picking up the newest file, might there be something in the code that I need to modify? I looked through the code and cannot find anything!
</div>

<div>
it will email a log file that was created on the day it was run 
 
eg: backup finishes at 2am on the 17/11/2010 
then the script needs to be run on 17/11/2010 after the back is finished 
 
have a look at implementing this function if you want the newest file 
found on: <a href="http://www.ureader.com/msg/1677440.aspx" rel="ugc">http://www.ureader.com/msg/1677440.aspx</a> 
 
Function GetNewestFile(ByVal sPath) 
 
&nbsp; &nbsp;sNewestFile = Null &nbsp; ' init value 
 
&nbsp; &nbsp;Set oFSO = CreateObject(&quot;Scripting.FileSystemObject&quot;) 
&nbsp; &nbsp;Set oFolder = oFSO.GetFolder(sPath) 
&nbsp; &nbsp;Set oFiles = oFolder.Files 
 
&nbsp; &nbsp;' enumerate the files in the folder, finding the newest file 
&nbsp; &nbsp;For Each oFile In oFiles 
&nbsp; &nbsp; &nbsp;On Error Resume Next 
&nbsp; &nbsp; &nbsp;If IsNull(sNewestFile) Then 
&nbsp; &nbsp; &nbsp; &nbsp;sNewestFile = oFile.Path 
&nbsp; &nbsp; &nbsp; &nbsp;dPrevDate = oFile.DateLastModified 
&nbsp; &nbsp; &nbsp;Elseif dPrevDate &lt;&nbsp;oFile.DateLastModified Then 
&nbsp; &nbsp; &nbsp; &nbsp;sNewestFile = oFile.Path 
&nbsp; &nbsp; &nbsp;End If 
&nbsp; &nbsp; &nbsp;On Error Goto 0 
&nbsp; &nbsp;Next 
 
&nbsp; &nbsp;If IsNull(sNewestFile) Then sNewestFile = &quot;&quot; 
 
&nbsp; &nbsp;GetNewestFile = sNewestFile 
 
End Function
</div>

<div>
<div class="content wysiwyg-content">
I have a windows 2003 server that is using the windows backup utility to backup to an external drive. It does not have the option to email log files. Is there a way to easily grab the newest file from the DIR that contains the files and email them nightly using a script? I do not want to use another piece of software I would prefer a simple script. 
</div>
</div>

I have a windows 2003 server that is using the windows backup utility to backup to an external drive. It does not have the option to email log files. Is there a way to easily grab the newest file from the DIR that contains the files and email them nightly using a script? I do not want to use another piece of software I would prefer a simple script. 

Email log files from backup windows 2003

Microsoft server applications are those applications developed specifically, but not necessarily exclusively, on the Windows Server platform. In addition to well-known products like SQL Server, Exchange, Internet Information Services (IIS), Microsoft Dynamics, Forefront, Lync and Sharepoint, they include applications like Skype, BizTalk, Hyper-V, Groove and Commerce Server. Server applications are managed with the Microsoft System Center.

Microsoft Server Apps

Microsoft applications include a variety of software programs, including development and digital authoring programs (Expression and Media Center), educational programs, Internet software, including Essentials, Skype and the Live family, anti-virus, productivity applications and suites like Office, Excel, Word, Outlook, Access and PowerPoint, video games and server applications such as Exchange, SharePoint, IIS and Virtual Server.