今天来写一个用MOM监视服务器进程的VBS脚本，这个脚本的原理是监视当前服务器的进程表中是否有你想要监视的进程名，然后做一个判断，用这个脚本来监视JAVA小程序还有一些类似于ServerU的东西还是很好用的。
Const EVENT_TYPE_SUCCESS = 0
Const EVENT_TYPE_ERROR = 1
Const EVENT_TYPE_WARNING = 2
Const EVENT_TYPE_INFORMATION = 4
Const EVENT_TYPE_AUDITSUCCESS = 8
Const EVENT_TYPE_AUDITFAILURE = 16
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colMonitoredProcesses = objWMIService.ExecQuery _
("Select * from Win32_Process Where Name = 'Calc.exe'")
If colMonitoredProcesses.count = 0 Then
CreateEvent 100,EVENT_TYPE_ERROR,"进程监视","进程意外退出！"
Else
CreateEvent 200,EVENT_TYPE_SUCCESS,"进程监视","进程正常！"
End If
Sub CreateEvent(intEventNumber,intEventType,strEventSource,strEventMessage)
Set objEvent = ScriptContext.CreateEvent()
objEvent.EventSource = strEventSource
objEvent.EventNumber = intEventNumber
objEvent.EventType = intEventType
objEvent.Message = strEventMessage
ScriptContext.Submit objEvent
End Sub
以上脚本中的Calc.exe就是你想要监控的进程名子，为了使这个脚本可以实现重用，你也可以把这个进程做为一个传入MOM的参数，这样就不必每次都复制一个同样的规则在MOM里边跑了。
欢迎交流。
之前写过VBS监控队列的脚本。在MOM里边监控队列和VBS可以说是大同小异的，只需要在开头定义好事件，然后在加上把事件传给MOM的函数就好。以下是例子，这个MOM脚本的目的是监控文件的文件数然后根据设定的阀值把相应事件传给MOM：
Const EVENT_TYPE_SUCCESS = 0
Const EVENT_TYPE_ERROR = 1
Const EVENT_TYPE_WARNING = 2
Const EVENT_TYPE_INFORMATION = 4
Const EVENT_TYPE_AUDITSUCCESS = 8
Const EVENT_TYPE_AUDITFAILURE = 16
Const CountMax = 1
Set fso=createobject("Scripting.FileSystemObject")
Set objFolder=fso.GetFolder("C:\I386\")
If objFolder.Files.count >= CountMax Then
CreateEvent 100,EVENT_TYPE_ERROR,"队列轮询","发生积压！"& objFolder.Files.count &""
Else
CreateEvent 200,EVENT_TYPE_SUCCESS,"队列轮询","正常！"
End If
Sub CreateEvent(intEventNumber,intEventType,strEventSource,strEventMessage)
Set objEvent = ScriptContext.CreateEvent()
objEvent.EventSource = strEventSource
objEvent.EventNumber = intEventNumber
objEvent.EventType = intEventType
objEvent.Message = strEventMessage
ScriptContext.Submit objEvent
End Sub
其中CountMax是阀值，这个阀值其实可以做为参数传进来，我会在以后说。而接下来的C:\I386是需要监控的文件夹路径。
欢迎交流～
DBA遇到的烦心事有一项就是清理SQL日志，尽管搭配MOM会有一个预警，但是也不能一天24小时都盯着MOM。于是学会观察数据库日志的增长速度来适时的收缩日志就很必要了。
DUMP TRANSACTION 数据库名称 with NO_LOG
BACKUP LOG 数据库名 with NO_LOG
DBCC SHRINKFILE (数据库日志逻辑名) with NO_INFOMSGS
with NO_INFOMSGS的目的是在DBCC SHRINKFILE运行之后不返回信息性消息。如果不加这句话，在执行查询之后会返回“DBCC 执行完毕。如果 DBCC 输出了错误信息，请与系统管理员联系。”
我直接把这组SQL查询做进了数据库维护计划，但是网上说经常DBCC会让数据库的查询效率下降，我还没有验证这个。
今天对于我来说真的是惊心动魄的一天。原因是由于昨天晚上给单位系统升级，在今天早上使用的时候被发现有一个致命的问题会影响到整个大连地区乃至半个辽宁省的进出口通关业务。我当时接到同事打来的电话当时脑袋就轰的一下，真有一种被大棒敲晕的感觉。于是手忙脚乱的解决问题，好在同事经验丰富发现了问题所在，于是全部生产环境电脑迅速第一时间重新打补丁，给每个业务现场轮流打电话通知。可以说我当时的脑袋就是一片空白，我知道如果发生事故就一定会是致命的。
我早知道承担这个升级的任务就是有很大风险的，因为升级一定是在业务非繁忙时段，一般是晚上到凌晨，但是升级之后又不能第一时间测试成功与否，因为我们这套系统是全国联网，只有在北京的机房全部完成升级之后才能恢复全国联网通信，而且我们各地只能等到第二天业务现场使用有问题才会反映，所以必须保证完全没有问题，否则就一定是大问题。
上班以来第一次感觉到头上顶着这么大的压力，当全部客户端重新打上新补丁之后便不停地给各个现场打电话询问系统是否好用，有没有什么问题，当得知这回没问题之后，悬着的一颗心终于落了地，一看表都要到九点半了。事后还是接到了大领导的电话，询问系统发生的问题，我们实话实说，好在领导没有发脾气。万幸万幸。
以后他妈的再升级的时候一定多掐自己脸几下，一定要清醒清醒。
很纠结今天要不要更新这篇文章，后来想想有些话不说出来实在对不起自己，说出来就算发泄了，发泄了也就舒服了。在单位中午吃完饭我习惯和同事去22楼打台球，其实我对台球本来开始也没啥兴趣，只是觉得中午无聊才玩玩，打得很烂，全当放松，直到我遇到了他，这个装逼犯。他可能觉得我打得不好，所以就不应该占台子不应该玩台球，一进台球室他第一件事就是要我手里的台球杆，还说是自己的杆。“把杆儿给我”，这是我连续两天两次听到他对我说的唯一一句话。操你大爷的，我和你又不熟，让你一次就像给你脸了似的，反而你还好大不乐意，好像我抱你家孩子跳井了。就算你台球玩得好，可你也装的太大了吧？一个游戏至于这么认真吗？更何况都是一个单位的同事。下午回到办公室，查了员工名册我才知道他叫什么在什么部门。反正我总相信那一条，人总有求人的时候，别不给自己留后路，得瑟大劲儿了离倒霉就不远了。我以后也有脸了，再也不会去22楼找不自在。像这套号儿的装逼犯你他妈别犯我手里，到时候有你好看！
做系统管理员的应该都知道MOM这个东西，全称是Microsoft Operations Manager，微软出的一个功能强大的监控服务器产品，可以二次开发，潜力无限，尽管现在已经改名叫SCOM了，不过换汤不换药，我现在要部署的是微软MOM 2005 SP1 中文版。，SCOM暂时没找到有正式版都是120天试用，这个MOM 2005 SP1 中文版是微软内部版本，没有所谓过期一说。有需要的可以联系我，我的电邮是wayne[小老鼠]waynecn.com。为了维护软件版权，即日起不再提供MOM2005相关软件。
Read the rest of this entry »
今天继续研究了一天部署MOM 2005 SP1的过程。经过不断的重装、上网搜索遇到的问题，解决了几个比较恶心人的问题，总算完成了部署。刚才总结了下但是没写完，明天发上来吧。之前完全没想到部署微软的这个东西会遇到这么多问题，以为简单的安装，下一步就搞定了，自己一试验发现不是这么回事儿，部署成功与否和各个组件的版本有很大关系。
今天手欠把电脑桌面上的IE7图标给删除了。想恢复的时候才发现桌面属性里边IE图标的选项不见了，只能恢复我的电脑、网上邻居、回收站的图标。难道没有办法了吗？当然是否定的。
我们可以通过修改注册表达到恢复IE7桌面标志的目的。
找到
HKEY_CURRENT_USER
\Software
\Microsoft
\Windows
\CurrentVersion
\Explorer
\HideDesktopIcons
\ClassicStartMenu
然后修改{871C5380-42A0-1069-A2EA-08002B30309D}的键值，把这个十六进制的0改成改成十六进制的1。怎么样？IE标志又回来了吧？
在政府机关工作久了我发现真的没有不装逼的领导，也没有不装孙子的手下。为了晋升科级、处级领导职位，真是什么招数都用上了。像模像样的也搞笔试面试那一套。说是笔试，有的人100分满分能考90多分。就是开卷让你带资料也不可能把所有的考点都带这么全吧？你咋这么神奇呢？说是面试，结果往往都是谁的儿子谁的孙子谁的大爷的二姑夫的三舅妈的外孙子分数奇高。即使你“碰巧”没有被有关人等“做掉”，顺利通过笔试面试进入考察期，你还会发现，所谓的领导根本也不可能做到一碗水端平。通过笔试面试了，可就是不提拔你，你能怎么的？天天都在一个地方上班工作，低头不见抬头见，一个个也都是西装笔挺人模狗样的，见面也都是哥啊姐啊的叫着这叫一亲热，背地里恨不得都骂你八辈祖宗，我说的一点都不夸张。拉人情，找关系，送礼送钱送小姐的，都把精神头用到这个地方了，工作怎么可能不稀里糊涂？为啥拼了命的往上爬？钱多？非也！如果你每天都能看见一帮人围着你转，对你领导领导的叫着，点头哈腰的像个奴才，让你看起来像个主子，你不想当领导？操他妈的，甭管你之前干什么工作的，累不累苦不苦，业务再精，当了领导之后一准的啥都不会了，支使这个支使那个就像使唤自己家的佣人。可能也是我刚从学校大门出来见得太少了，真不怎么样，素质忒差了，都他妈活人惯的！
我的工作坦白说挺变态的，要闲闲死要忙忙死，本来最近的主要工作就是要评估一个安全管理平台，然后报给上头，尽管上头可能根本不会看，但是还要认真面对。本来打算明天晚上参加单身联谊会之后就可以等待享受一个慵懒的中秋假期，谁知道领导一句话后天就要飞南京参加一个培训，我真是晕死。尽管没去过南京，尽管我十分想去外头看看广阔的世界，但是至少要给我准备准备吧？这个来的是不是也太突然了点。没办法下午着急忙晃地订了飞南京的机票。在此感谢携程网的送票上门，没有携程网我只能自己跑去售票处自己取了。开始收拾东西啦，南京有啥好玩的吗？找找去。。。
之前加上的Wap浏览在升级了Blog程序之后发现失灵了。现在正在解决中，暂时转到FeedSky的手机页面。
明天据说处里开廉政会议，原因嘛是因为隶属单位的几个同志犯了廉政错误，数额可能挺大，惊动了检察院，几个人已经被批捕了。俗话说，常在河边走哪有不湿鞋，出来混迟早要还。只是听说其中有两个，一个刚领了结婚证还没办婚礼，另一个孩子才2岁。他们犯错不要紧，给整个家庭带来的可是灭顶之灾，让老婆孩子以后可怎么办啊？其实有些时候就是一念之差，钱的诱惑力真的那么大吗？人到底为了什么活着？