原始问题：
用vbs复制Sap左下角弹出的消息
Set SapGuiAuto = GetObject("SAPGUI")
Set Application = SapGuiAuto.GetScriptingEngine
Set Connection = Application.Children(0)
Set Session = Connection.Children(0)
Message=Session.findById("wnd[0]").text '获取弹出消息内容
WScript.Echo Message
Prev：python任意区间求偶数个数