|
I thought the same thing until this email thing came up. here is the vbscript i run:
Set objNetwork = WScript.CreateObject("WScript.Network")
UserName = objNetwork.UserName
CompName = objNetwork.Computername
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "scripterror@mydomain.com"
objEmail.To = "myname@mydomain.com"
objEmail.Subject = "subject"
objEmail.Textbody = _
"The User: " & UserName & " on Worksation: " & CompName & " could not get to subject"
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _
"mail.mydomain.com"
objEmail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update
objEmail.Send
| 
