SMTP ≠ SNMP
Thank you, Mitch Lawrence Lead Applications Analyst Technical Support - NPR/Automation CHRISTUS Information Management *: [email protected] <mailto:[email protected]> ________________________________ From: [email protected] [mailto:[email protected]] Sent: Thursday, July 02, 2009 7:18 AM To: [email protected] Subject: [talkbws] RE: SNMP - Greetings, The BWS SendMail command uses SNMP. Regards, Thom Thom C. Blackwell Product Manager Boston Software Systems (866) 653-5105 ex 807 www.bossoft.com <http://www.bossoft.com/> Sign up for my weekly webinar! <http://www.bostonworkstation.com/customer_center/special_events.aspx> LEGAL NOTICE Unless expressly stated otherwise, this message is confidential and may be privileged. It is intended for the addressee(s) only. Access to this E-mail by anyone else is unauthorized. If you are not an addressee, any disclosure or copying of the contents of this E-mail or any action taken (or not taken) in reliance on it is unauthorized and may be unlawful. If you are not an addressee, please inform the sender immediately, then delete this message and empty from your trash. From: [email protected] [mailto:[email protected]] Sent: Wednesday, July 01, 2009 6:07 PM To: Talk Subject: [talkbws] RE: SNMP - This subroutine we use to send notifications by email of scripts completing and/or stopping due to an error. Sub Send_Message(Msg) Dim EmailTo, EmailBcc, EmailFrom, EmailSubject, EmailCc Dim ObjSendMail, Flds Dim HTML ' ---------------- CHANGE EMAIL INFO HERE --------------------------- EmailFrom = "[email protected]" EmailTo = "[email protected]" EmailSubject = “Your subject here” & Msg ' --------------Define Mail Options---------------------------------- Dim Mailer As Object, MailConf As Object, MCFields As Object Set Mailer = CreateObject("CDO.Message") Set MailConf = CreateObject("CDO.Configuration") Set MCFields = MailConf.Fields MCFields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing";) = 2 ‘Enter your email server/relay server below MCFields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver";) = "snmp.server.net" MCFields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl";) = False 'Use SSL for the connection (True or False) MCFields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout";) = 60 MCFields.Update ' ----------------- Create Body of Email for Script Notification ------------------------ If Left(Msg, 4) = "****" Then HTML = HTML & "<html><head></head><body>" & Msg & " --- <BR> To post a message to this list, send mail to: [email protected] <BR> <BR> You are currently subscribed as: [email protected] <BR> <BR> Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx <BR> --- <BR> To post a message to this list, send mail to: [email protected] <BR> <BR> You are currently subscribed as: [email protected] <BR> <BR> Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx <BR> </BODY></html>" Else HTML = HTML & "<html>" HTML = HTML & "<head>" HTML = HTML & "<title>Your Title Here</title>" HTML = HTML & "</head>" HTML = HTML & "<body>" HTML = HTML & "<h3 align='center'>Script Completion/Error</br>" HTML = HTML & " --- <BR> To post a message to this list, send mail to: [email protected] <BR> <BR> You are currently subscribed as: [email protected] <BR> <BR> Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx <BR> --- <BR> To post a message to this list, send mail to: [email protected] <BR> <BR> You are currently subscribed as: [email protected] <BR> <BR> Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx <BR> </BODY></html>" End If 'send email Set Mailer.Configuration = MailConf 'Mailer.addattachment (strInputFile) Mailer.To = EmailTo Mailer.Cc = EmailCc Mailer.From = EmailFrom Mailer.Subject = EmailSubject Mailer.HTMLBody = HTML Mailer.Send HTML = "" EmailCc = "" End Sub Matt ________________________________ From: [email protected] [mailto:[email protected]] Sent: Wednesday, July 01, 2009 4:24 PM To: [email protected] Subject: [talkbws] SNMP - I Received a request from our operations section to start using SNMP notification for some of the scripts we have deployed. Has anyone successfully used the SNMP functionality? Background: We have 15 VM clients running a continual process against our billing system and we have asked operations to monitor them all. They have "What's Up Gold" as a dashboard solution for monitoring their other servers, routers, etc. We're going to try to add BW scripts into their monitoring process for when a script errors or stalls. Jim Mullowney | Systems Consultant | Information Services | [email protected] <mailto:[email protected]> | www.billingsclinic.org <http://www.billingsclinic.org/> Billings Clinic | 2800 Tenth Avenue North - P.O. Box 37000 | Billings Montana 59107-7000 | (406) 657-3823 | Fax (406) 657-3771 --- To post a message to this list, send mail to: [email protected] You are currently subscribed as: [email protected] Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx --- To post a message to this list, send mail to: [email protected] You are currently subscribed as: [email protected] Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx --- To post a message to this list, send mail to: [email protected] You are currently subscribed as: [email protected] Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx
<<image001.jpg>>
