旋转木马

真的要变宅男

今天基本上在屋里宅了一天。中午懒得给自己弄一顿像样的饭，对付了一包饼干两袋加糖的牛奶，吃得我还挺高兴。掏出手机想给谁打个电话，却发现没什么想打给的人。要不就是N年没联系的朋友，如果冒失的打过去会不会太奇怪了点？要不就是一些周末肯定不会在家闲着的人，打过去也会耽误人家玩。上网发了会呆有点困，在床上小咪了会。电脑中下着枪版的三枪，DVD的刺陵，等我醒了起来看，这叫一个难看。三枪基本上看得我又困了，刺陵根本没坚持到最后就删了。洗了个澡想去理发，外头不算冷。走到理发店发现人很多，于是又作罢，明天吧。逼着自己沿马路溜达，真无聊。无聊的日子，无聊的人生。

MOM监视服务器进程

今天来写一个用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 & "rootcimv2")
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里边跑了。

欢迎交流。

MOM监视BizTalk文件夹队列

之前写过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是需要监控的文件夹路径。

欢迎交流～

自动收缩SQL数据库日志

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会让数据库的查询效率下降，我还没有验证这个。

中国导演们，又到了面壁思过时间

下午去看了3D的《阿凡达》，用什么词形容呢？美轮美奂？不对，这个电影不是要表达这个意思。就完美吧。我承认我之前被各种轰炸式的报道给迷惑了，什么“IMAX”、“晕3菜”、“买票堪比春运”等等等。我曾经不止一次地去想这是一部什么类型什么样子的电影会让中国影迷如此的为之疯狂。看过之后，我能说，这80块钱虽然有点贵但是真没白花。同样几年没拍电影，但卡梅隆至少比张艺谋诚恳，他拍的至少还是电影，而后者？结果当然不言而喻，卡梅隆再一次用票房狠狠抽了一票自负中国导演一耳刮子。所以，中国导演们，丫都给我闭嘴，又到面壁思过的时间了，快来排队！

黄小琥

第一次知道黄小琥是偶然看中视的晚会。她上台唱了一个歌曲串烧，当时听了就感觉不错。她绝对不是偶像型的，因为我从外表看上去她就是很大的那种，不过中气十足。后来上网搜才知道也是从Pub里唱出来了，实力在那里摆着。据说台湾的星光选秀她还是评委，不过我没看过。

最近很喜欢听她唱的那个《没那么简单》。勾起了我很多的回忆。听了让人有种想哭的感觉。

天气晴但是很冷

今天是下过大雪的第二天，路面上到处都是积雪。天气很晴但是很冷，对于下过雪来说在正常不过了。科里一个同事没有任何预兆就调走了，在我看属于发配了。呵呵他的活儿没干几天又交接给我了。唉～可以预兆2010 年我的日子不会太好过。领导好歹从其他科室调来一个，但是把活儿也带过来了，太不爽了。办公室倒是有了人气，但是总感觉别扭。

最近有想买单反的冲动，可一想到又是一笔大支出就有点动摇。这年头钱好花不好赚啊，先放放吧。

大雪

09年12月25日，大雪

白色的圣诞节在大连真的不常见，特别是像今天这么大的雪。

不知道是不是巧合，结果出来了，11年。

意料之外吗？

不。

只想说，不管喉舌放不放话。

有些事我们是应该知道的。

至少，我们应该站对边。

保重。

很平常的一天

今天是X’mas eve。周围大多数的朋友都选择聚在一起吃喝玩乐。其实圣诞只是一个聚会的理由，大家就是想热闹热闹。对于我也算不上什么节日，很平常的一天，我也不是很好热闹的人，就不去凑热闹了，关键是没人理，哈哈最后还是对大家说圣诞快乐，应个景吧。

胃痛

胃痛了一整天，在单位窝着大概活动时间不到一个小时。同事帮忙去医务室拿了胃药冲剂。下了班强忍着自己熬了点粥，窝到刚才感觉好点。最近一直对身体状况不太满意，难道还不到30就走下坡路了？

成为房奴

今天是一个值得纪念的日子。我光荣地成为了一名房奴。以后的日子，每天醒来就要欠银行钱了。哈

高兴的是终于有了一套属于我自己的房子，有了一张属于我自己的床。

小麻烦

虚拟带库有点玩不明白，遇上一点小麻烦，不知道各位谁对HP的DP软件比较了解，我想请教几个问题。

终于要有自己的房子了。离成为房奴还有一天半。

重新起步

周五了，一周就這么過去。這一周的過去也預示著新起點的開始。因為一個可以依賴的同事升任副科長調走了，以一種最為風光的方式出走，迎來了自己的又一個事業轉折點。我心里由衷的祝賀他。以后科里剩下了我一個做主力軍。這個主力意味著以后可能休息日會加班，也會時不時的不按照正點下班。可能會面對更加不可預料的困難局面，可能……。有太多種可能了，這些可能既有機遇更有挑戰。這一切對于我來說未必是壞事。心里有點小忐忑小不安。以后沒有什么所謂的依靠，以后的每一步都要自己腳踏實地，以后……。管它那么多以后呢。加油！

今天抽了一个下下签

今天单位选房，结果抽了一个下下签。郁闷死了，基本上选不到心仪的户型了。该死的开发商，既然是团购，还征求了我们的意见，为啥不按照我们的要求盖足够啊！

奉化见闻

今天去奉化蒋中正先生的故居参观，一路下着淅淅沥沥的小雨。一直觉得江南小镇必须要在这种小雨中游览才有感觉。50分钟的车程到了溪口，跟着导游参观了好多古迹，听了导游的讲解之后对于蒋中正先生的家庭历史也有了比较深入的了解。导游说好多古迹都在文化革命中被人捣毁了，心中不免一阵唏嘘。我注意到一个细节，在一处门楼墙壁上依稀还能看见当年造反派写的标语，也正是由于有了这些几乎和“符咒”一样的标语在那样一个疯狂的年代才保护了这些古迹。我不禁要问到底是谁在破坏我们的文化？我们是不是被骗了？有点跑题了，但是我就是这么想的。

19日夜写于宁波饭店