发哥的空间's profile发哥的空间PhotosBlogListsMore Tools Help

Blog


    November 29

    增加音乐播放功能

    今天增加了音乐播放功能,具体实现如下,供参考:
    1. 确保您已登录到您的共享空间并处于编辑模式(MSN Spaces 中,共享空间作者可以使用的两种视图之一,使您可以使用自定义的共享空间并向其中发送内容。) 下。
    2. 在您的 web 浏览器地址栏中,将 &powertoy=musicvideo 添加到显示的 URL 的末尾。
    3. 在 web 浏览器中,单击地址行旁边的“转到”按钮,然后,等待系统重新加载您的共享空间。
    4. 在您的共享空间中,单击“自定义”。
    5. 单击“模块”,然后单击“Power Toy: Windows Media Player”旁边的“添加”。
    6. 单击“保存
    November 22

    打出来的女人嘴服 疼出来的女人心服

      女人入洞房那天,早早收起了自己的鞋,等男人脱鞋上炕,女人却双脚踩在男人的鞋上。男人见了,“嘿嘿”笑着说,还挺迷信。女人却认真地说,俺娘说了,踩了男人的鞋,一辈子不受男人的气。男人说,俺娘也说了,女人踩了男人的鞋,那是一辈子要跟男人吃苦受罪的。
      女人开始试探着管男人,先从生活小事儿开始,支使男人拿尿盆倒尿罐,男人全干了。地里的庄稼女人说种啥,男人就种啥。左邻右舍女人说跟谁走近点跟谁走远点,男人全听女人的。男人正跟人闲侃,女人一声喊,男人像被牵了鼻子的牛,乖乖就回去了。男人正跟人喝酒,女人上前只扯一下耳朵,就被拽进家。有人激男人,这女人三天不打,她就上房揭瓦。你也算个男人,怎能让女人管得没有一点男人的气概?若是我的女人,非扇她两鞋底不可。男人不急不慌地说:把你的女人叫来,我也舍得扇她两鞋底子。那人急了,你懂个好赖话不?上辈子老和尚托生的没见过女人!真不像你爹的种,怕老婆!   
      村里人再有大事商量,男人一出场,人们就说,这商量大事你也做不了主,还是把你家女人请来吧。男人还真把女人叫来了。  
      女人能管住男人觉着很得意,直到有一天女人在男人耳边说起了婆婆的不是。男人红了眼,一声吼,想知道我为啥不打你吗?就因为我老娘。我娘一辈子不容易,我爹脾性暴躁,稍有不顺心,张口就骂举手就打,我爹打断过胳膊粗的棍子,打散过椅子。我娘为了我们几个孩子,竟熬了一辈子。每次见娘挨打,我都发誓,我娶了女人决不捅他一指头。不是我怕你,是我忘不了我老娘说的话,她说女人是被男人疼的,不是被男人打的。    
      女人惊呆了,她没想到男人的胸怀竟这样宽广。    
      男人在外再同人神吹海喝,女人不喊也不再拽耳朵,有时会端碗水递给男人。有人问男人,咋调教的?男人却一本正经地说:打出来的女人嘴服,疼出来的女人心服。
      看完了,你从中领悟到了那个朴实的道理了吗?
      祝天下所有的母亲 和被爱着的女人...幸福. 快乐
    有种不转不行的感觉~~~~~~

    November 20

    一位极品毕业生的实习故事

        公司新配给我一个助理。这位老先生,让我心服、口服、外带佩服!下面,我就把这位大爷的“英雄事迹”娓娓道来。
    1

        一天,我和助理以及我们老总去局里开会。会毕,领导要写个注意事项给我们。我和老总当时拿笔都不太方便。我随口问助理:“你带笔了吗?”

        他马上回答:“带了。”

        然后,几双眼睛看着他。接下来的十秒钟内,他睁着那双无辜的大眼,看着我们三个。

        于是,我打破这个尴尬的僵局,补充一句:“借我用用。”

        又是尴尬的十秒过去了,他才从背包里找到一只笔递给了我,我这才递给领导。

        回来时在车上,我们老总问他:“为什么要让XX(我的名字)补充一句,你才把笔递给领导呢?你就不能聪明点吗?”

        他很气愤的大声在车里说道:“我是故意的,因为我觉得你们在利用我!”

        车里又是尴尬的十秒……

    2

        公司让他送份资料给局里领导看,我嘱咐他打车去,然后坐公车回来。结果人家老先生坐公交去,打车回来的。人家说什么送去的时候他不累,回来时他累了,就打车了。

    3

        他帮我接了个电话,电话里是个搞推销的,卖办公用品。我跟他说这事是出纳那边负责,让他找她问问我们要不要。我们出纳大姐说已经买过了,让他推了。结果,十分钟过去后,我看他还在那聊。我就过去问他:“怎么还不挂?”他来了句:“X姐,我们还是买他们的东西吧,挺好的,真的。”

    4

        他:“X姐,我想成为商场上的巨子。”

        我忍:“哦,呵呵,抱负不小。”

        他:“真的,我是说真的,我将来一定要像王总一样。”

        我:“呵呵。行啊,努力做,一定行的。”

        他:“你有什么话想提醒我吗?”

        我愕然:“没……没有啊?”

        他:“我知道,你们职场上的人都有很多心眼。”

        我忍:“你也在职场上啊?”

        他:“所以,我也有很多心眼啊。”

        我忍不住了:“你回去做事吧!”

    5

        我:“XX,你加一下我的MSN。”

        他:“哦。”

        3分钟后,我突然意识到自己没有告诉他我的MSN帐号,而且我肯定他不会自己去问别的同事。

        我:“XX。你过来下,我把我的MSN写给你。”

        他:“写什么给我?”

        我:“MSN的帐号啊。”

        他:“什么是MSN?”

    November 19

    男人最值得玩的十款网络游戏

     

    查看更多精彩图片
    《魔剑》,一款非常有内涵的网络游戏,也许是它出生的太早,注定结局比较悲惨,不但是它留给中国网络游戏界一笔丰富的财富,那就是逐渐兴起的网络游戏公会。今天游戏公会成长为巨人,完善的制度,统一的目标使的他们征服一个又一个游戏。
    查看更多精彩图片
    《街头篮球》,体育同样也是男生的最爱,在篮球场上挥洒青春的汗水同样也是一件非常惬意的事情。就像热爱体育一样,《街头篮球》也应该是你的最爱。推荐理由:目前市面上唯一的体育网络游戏,值得男人尝试,也许你在现实中因为种种原因无法打好篮球,但在网络上,你会做得更好。
    查看更多精彩图片
     《征途》,也许这2个字已经被骂了无数次,不过今天还是要提,不得不佩服史玉柱的销售策略,把脑百金的那套贯彻到底。其实征途不光是游戏宣传做的好,游戏更是接近现实,在游戏内的一切都是利益为先,强者生存。
    查看更多精彩图片
     《仙境传说》。很多人都说仙境传说太过卡通,确实,单从画面和人设方面来说,卡通可爱的风格非常适合女生玩,所以吸引了众多MM的加入,有了这么多的MM,我想各位GG一定会心养,想英雄就美吗?那快加入仙境传说吧。
    查看更多精彩图片
    《奇迹》 同样和《传奇》是一个时代的产物,曾被称为《传奇》的接班人,可惜,如今的《奇迹》满目疮痍,是9城得到了新宠所忘了的旧爱.曾经的一款号称3D的游戏凭借画面吸引了众多玩家.推荐理由:如今的这款游戏的画面已经不能算是出色了,唯一推荐给你的理由是希望你能在这里找寻回你曾经的记忆
    查看更多精彩图片
     《A3》 曾经风靡一时的游戏,号称中国首款成人游戏,推荐这个游戏的理由是:游戏的成人性,暴力性,不过由于国内法律的规定,我们玩到的都是阉割版本的游戏,但还是能满足男人某些特殊的爱好.不过这个游戏的倒闭也让玩家无法在领略他的美丽.当然,光通代理的《SHAIYA》也许是这种成人游戏最好的替代品.
    查看更多精彩图片
     《魔兽世界》,做为05年最优秀的一款网络游戏,它继承了暴雪的悠久历史传统,丰富的游戏内容与独到的游戏性使得《魔兽世界》全球付费用户超过700万,它是一款另人热血沸腾的游戏,一个男人,不玩《魔兽世界》,我只能说,你离网络游戏已经很远了。
    查看更多精彩图片
    《传奇》:可能这款游戏被许多玩家指为一款垃圾游戏,但他在中国网络游戏历史上的地位恐怕没有人能否认,这个游戏本身就是一个传奇,一个让陈天桥座上首富宝座的游戏,一个促使中国网络游戏普及的传奇。推荐他的理由太多了:有多少人在这片玛珐大陆留下自己的足迹,在沙巴克如火战场中征战过。即便这款游戏在质量上很差,但是作为一个男性玩家,《传奇》你不应该错过一款游戏。你可以在他的身上找到游戏最原始的冲动和乐趣。
      《梦幻西游》:为什么要推荐这个游戏呢?理由中国在线人数最高的网络游戏,135万!应该也是全世界在线人数最高的MMORPG游戏,当然没有理由错过它,它是一款非常大众化的游戏,你可以在这里体验人山人海的感觉.而且要求机器的配置不高.一款相对平衡的游戏,在如今的游戏市场基本上是最干净的游戏之一了.
    查看更多精彩图片
     《龙与地下城》 一款到6月28日才会开始测试的游戏,其实这款游戏注定在中国不能成为主流,但是其游戏的内涵,30年所沉淀的文化,是推荐给男人们的一款你可以选择不玩但是不能错过的游戏.其高傲的游戏,你值得一试,没准你会沉溺其中.
      其实,在玩家心中,曾经的《石器时代》、《龙族》、《千年》、《红月》、《魔力宝贝》等等都曾经是玩家的最爱,只是如今的这些游戏已经繁华难现,变成了记忆中最美丽的片断。限于只能找10款游戏,所以很多的确经典的游戏被舍弃,其实在放弃他们的同时,我的心也很疼。希望能把本文纪念大家曾经热爱的游戏。也希望所有玩游戏的男人能找到自己的最爱。

    November 18

    闲人写的在word中生成日历的问题的解答

    csdn论坛中关于在word中生成日历的问题的解答

    原贴地址http://community.csdn.net/Expert/topic/4304/4304006.xml?temp=.9009668

    因为代码比较长所以帖到blog中来,也欢迎大家提意见

    曾经将以前在web上看到的一个挺不错的万年历javascript脚本移植到VB,今天再把它移植到VBA上来
    运行效果见http://blog.csdn.net/chewinggum/gallery/image/73261.aspx
    http://blog.csdn.net/chewinggum/gallery/image/73262.aspx


    下面是完整的宏代码。可以将下面的代码保存成为.bas文件,并在word的VisualBasic编辑器中导入该文件。然后在空白文档中运行Macro1()宏,就可以按照提示生成月历。年份范围1900~2049

    Option Explicit

    Dim LunarInfo(0 To 149) As Long
    Dim SolarMonth
    Dim Gan
    Dim Zhi
    Dim Animals
    Dim SolarTerm
    Dim sTermInfo
    Dim nStr1
    Dim nStr2
    Dim nStr3
    Dim MonthName
    Dim sFtv
    Dim lFtv
    Dim wFtv

    Sub Macro1()
        Dim InputYear As Integer         '输入年
        Dim InputMonth As Integer        '输入年
        Dim intTableRows As Integer     '表格的列数
        Dim intMonthDays As Integer        '该月的天数
        Dim intWeekDay As Integer       '星期几
        Dim intFirstDayWeek As Integer  '第一天是星期几
        Dim i As Integer
        Initialize  '初始化数据
        InputYear = CInt(InputBox("输入年如 2005:", , "2005"))
        InputMonth = CInt(InputBox("输入月如 09:", , "09"))
        '计算表格的列数
        intMonthDays = SolarDays(InputYear, InputMonth)
        intFirstDayWeek = Weekday(InputYear & "-" & InputMonth & "-1")
        intTableRows = (intMonthDays + intFirstDayWeek - 1)
        If intTableRows / 7 <> Int(intTableRows / 7) Then
            intTableRows = Int(intTableRows / 7) + 1
        Else
            intTableRows = intTableRows / 7
        End If
        ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=intTableRows * 2 + 2, NumColumns:= _
            7, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
            wdAutoFitWindow
        Selection.Cells.VerticalAlignment = wdCellAlignVerticalCenter
        Selection.Tables(1).Range.ParagraphFormat.Alignment = wdAlignParagraphCenter
        Selection.Tables(1).LeftPadding = CentimetersToPoints(0.05)
        Selection.Tables(1).RightPadding = CentimetersToPoints(0.05)
        Selection.Tables(1).Spacing = 0
        '生成表头
        Selection.Tables(1).Cell(1, 1).Select
        Selection.SelectRow
        Selection.Cells.Merge
        Selection.Cells.Shading.BackgroundPatternColor = wdColorIndigo
        Selection.Font.Size = 15
        Selection.Font.Color = wdColorWhite
        Selection.TypeText "公元" & InputYear & "年" & InputMonth & "月  "
        Selection.Font.Color = wdColorYellow
        Selection.TypeText "农历 " & cyclical(InputYear) & Animal(InputYear) & "年"
        For i = 1 To 7
            If i = 1 Or i = 7 Then
                Selection.Tables(1).Cell(2, i).Range.Font.Color = wdColorRed
            Else
                Selection.Tables(1).Cell(2, i).Range.Font.Color = wdColorBlack
            End If
            Selection.Tables(1).Cell(2, i).Range.Font.Size = 15
            Selection.Tables(1).Cell(2, i).Range.Font.Bold = True
            Selection.Tables(1).Cell(2, i).Range.Text = nStr1(i - 1)
            Selection.Tables(1).Cell(2, i).Shading.BackgroundPatternColor = wdColorYellow
        Next
        '生成日历
        For i = 1 To intMonthDays
            Dim intRow As Integer
            Dim strDate As String
            intWeekDay = Weekday(InputYear & "-" & InputMonth & "-" & i)
            intRow = ((intFirstDayWeek + i - 2) \ 7 + 1) * 2 + 1  '计算行位置

            Dim strTmp As String
            Dim lngColor As Long
            strTmp = Trim(GetDayString(CDate((InputYear & "-" & InputMonth & "-" & i)), lngColor))
            Selection.Tables(1).Cell(intRow, intWeekDay).Select
            If intWeekDay = 1 Or intWeekDay = 7 Then
                Selection.Font.Color = wdColorRed
            ElseIf Left(strTmp, 1) = "*" Then
                Selection.Font.Color = wdColorRed
                strTmp = Replace(strTmp, "*", "")
            Else
                Selection.Font.Color = wdColorBlack
            End If
            Selection.Font.Size = 22
            Selection.Font.Name = "Arial Black"
            Selection.Font.Bold = True
            Selection.TypeText i
            Selection.TypeText Chr(11)
            If Len(strTmp) > 5 Then
                Selection.Font.Size = 8
            Else
                Selection.Font.Size = 10
            End If
            Selection.Font.Name = "宋体"
            Selection.Font.Color = lngColor
            Selection.TypeText strTmp
        Next
        '以下部分是为了美化输出,如搂住不需要可以将以下部分完全注释掉
         With Selection.Tables(1)
            .Borders(wdBorderLeft).LineStyle = wdLineStyleNone
            .Borders(wdBorderRight).LineStyle = wdLineStyleNone
            .Borders(wdBorderTop).LineStyle = wdLineStyleNone
            .Borders(wdBorderBottom).LineStyle = wdLineStyleNone
            .Borders(wdBorderHorizontal).LineStyle = wdLineStyleNone
            .Borders(wdBorderVertical).LineStyle = wdLineStyleNone
            .Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
            .Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone
            .Borders.Shadow = False
        End With
        '以下部分是按照搂主要求增加一行
    '    For i = 1 To intMonthDays
    '        intWeekDay = Weekday(InputYear & "-" & InputMonth & "-" & i)
    '        intRow = ((intFirstDayWeek + i - 2) \ 7 + 1) * 2 + 2  '计算行位置
    '        Selection.Tables(1).Cell(intRow, intWeekDay).Select
    '        Selection.TypeText i
    '    Next
    End Sub

    '数据初始化
    Private Sub Initialize()
    Dim strTmp As String
    LunarInfo(0) = &H4BD8
    LunarInfo(1) = &H4AE0
    LunarInfo(2) = &HA570
    LunarInfo(3) = &H54D5
    LunarInfo(4) = &HD260
    LunarInfo(5) = &HD950
    LunarInfo(6) = &H16554
    LunarInfo(7) = &H56A0
    LunarInfo(8) = &H9AD0
    LunarInfo(9) = &H55D2
    LunarInfo(10) = &H4AE0
    LunarInfo(11) = &HA5B6
    LunarInfo(12) = &HA4D0
    LunarInfo(13) = &HD250
    LunarInfo(14) = &H1D255
    LunarInfo(15) = &HB540
    LunarInfo(16) = &HD6A0
    LunarInfo(17) = &HADA2
    LunarInfo(18) = &H95B0
    LunarInfo(19) = &H14977
    LunarInfo(20) = &H4970
    LunarInfo(21) = &HA4B0
    LunarInfo(22) = &HB4B5
    LunarInfo(23) = &H6A50
    LunarInfo(24) = &H6D40
    LunarInfo(25) = &H1AB54
    LunarInfo(26) = &H2B60
    LunarInfo(27) = &H9570
    LunarInfo(28) = &H52F2
    LunarInfo(29) = &H4970
    LunarInfo(30) = &H6566
    LunarInfo(31) = &HD4A0
    LunarInfo(32) = &HEA50
    LunarInfo(33) = &H6E95
    LunarInfo(34) = &H5AD0
    LunarInfo(35) = &H2B60
    LunarInfo(36) = &H186E3
    LunarInfo(37) = &H92E0
    LunarInfo(38) = &H1C8D7
    LunarInfo(39) = &HC950
    LunarInfo(40) = &HD4A0
    LunarInfo(41) = &H1D8A6
    LunarInfo(42) = &HB550
    LunarInfo(43) = &H56A0
    LunarInfo(44) = &H1A5B4
    LunarInfo(45) = &H25D0
    LunarInfo(46) = &H92D0
    LunarInfo(47) = &HD2B2
    LunarInfo(48) = &HA950
    LunarInfo(49) = &HB557
    LunarInfo(50) = &H6CA0
    LunarInfo(51) = &HB550
    LunarInfo(52) = &H15355
    LunarInfo(53) = &H4DA0
    LunarInfo(54) = &HA5D0
    LunarInfo(55) = &H14573
    LunarInfo(56) = &H52D0
    LunarInfo(57) = &HA9A8
    LunarInfo(58) = &HE950
    LunarInfo(59) = &H6AA0
    LunarInfo(60) = &HAEA6
    LunarInfo(61) = &HAB50
    LunarInfo(62) = &H4B60
    LunarInfo(63) = &HAAE4
    LunarInfo(64) = &HA570
    LunarInfo(65) = &H5260
    LunarInfo(66) = &HF263
    LunarInfo(67) = &HD950
    LunarInfo(68) = &H5B57
    LunarInfo(69) = &H56A0
    LunarInfo(70) = &H96D0
    LunarInfo(71) = &H4DD5
    LunarInfo(72) = &H4AD0
    LunarInfo(73) = &HA4D0
    LunarInfo(74) = &HD4D4
    LunarInfo(75) = &HD250
    LunarInfo(76) = &HD558
    LunarInfo(77) = &HB540
    LunarInfo(78) = &HB5A0
    LunarInfo(79) = &H195A6
    LunarInfo(80) = &H95B0
    LunarInfo(81) = &H49B0
    LunarInfo(82) = &HA974
    LunarInfo(83) = &HA4B0
    LunarInfo(84) = &HB27A
    LunarInfo(85) = &H6A50
    LunarInfo(86) = &H6D40
    LunarInfo(87) = &HAF46
    LunarInfo(88) = &HAB60
    LunarInfo(89) = &H9570
    LunarInfo(90) = &H4AF5
    LunarInfo(91) = &H4970
    LunarInfo(92) = &H64B0
    LunarInfo(93) = &H74A3
    LunarInfo(94) = &HEA50
    LunarInfo(95) = &H6B58
    LunarInfo(96) = &H55C0
    LunarInfo(97) = &HAB60
    LunarInfo(98) = &H96D5
    LunarInfo(99) = &H92E0
    LunarInfo(100) = &HC960
    LunarInfo(101) = &HD954
    LunarInfo(102) = &HD4A0
    LunarInfo(103) = &HDA50
    LunarInfo(104) = &H7552
    LunarInfo(105) = &H56A0
    LunarInfo(106) = &HABB7
    LunarInfo(107) = &H25D0
    LunarInfo(108) = &H92D0
    LunarInfo(109) = &HCAB5
    LunarInfo(110) = &HA950
    LunarInfo(111) = &HB4A0
    LunarInfo(112) = &HBAA4
    LunarInfo(113) = &HAD50
    LunarInfo(114) = &H55D9
    LunarInfo(115) = &H4BA0
    LunarInfo(116) = &HA5B0
    LunarInfo(117) = &H15176
    LunarInfo(118) = &H52B0
    LunarInfo(119) = &HA930
    LunarInfo(120) = &H7954
    LunarInfo(121) = &H6AA0
    LunarInfo(122) = &HAD50
    LunarInfo(123) = &H5B52
    LunarInfo(124) = &H4B60
    LunarInfo(125) = &HA6E6
    LunarInfo(126) = &HA4E0
    LunarInfo(127) = &HD260
    LunarInfo(128) = &HEA65
    LunarInfo(129) = &HD530
    LunarInfo(130) = &H5AA0
    LunarInfo(131) = &H76A3
    LunarInfo(132) = &H96D0
    LunarInfo(133) = &H4BD7
    LunarInfo(134) = &H4AD0
    LunarInfo(135) = &HA4D0
    LunarInfo(136) = &H1D0B6
    LunarInfo(137) = &HD250
    LunarInfo(138) = &HD520
    LunarInfo(139) = &HDD45
    LunarInfo(140) = &HB5A0
    LunarInfo(141) = &H56D0
    LunarInfo(142) = &H55B2
    LunarInfo(143) = &H49B0
    LunarInfo(144) = &HA577
    LunarInfo(145) = &HA4B0
    LunarInfo(146) = &HAA50
    LunarInfo(147) = &H1B255
    LunarInfo(148) = &H6D20
    LunarInfo(149) = &HADA0

    SolarMonth = Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31)
    Gan = Array("甲", "乙", "丙", "丁", "戊", "己", "庚", "辛", "壬", "癸")
    Zhi = Array("子", "丑", "寅", "卯", "辰", "巳", "午", "未", "申", "酉", "戌", "亥")
    Animals = Array("鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪")
    SolarTerm = Array("小寒", "大寒", "立春", "雨水", "惊蛰", "春分", "清明", "谷雨", "立夏", "小满", "芒种", "夏至", "小暑", "大暑", "立秋", "处暑", "白露", "秋分", "寒露", "霜降", "立冬", "小雪", "大雪", "冬至")
    sTermInfo = Array(0, 21208, 42467, 63836, 85337, 107014, 128867, 150921, 173149, 195551, 218072, 240693, 263343, 285989, 308563, 331033, 353350, 375494, 397447, 419210, 440795, 462224, 483532, 504758)
    nStr1 = Array("日", "一", "二", "三", "四", "五", "六", "七", "八", "九", "十", "十一", "十二")
    nStr2 = Array("初", "十", "廿", "卅", " ")
    MonthName = Array("JAN", "FEB", "MAR", "APR", "MAY", "JUN", "JUL", "AUG", "SEP", "OCT", "NOV", "DEC")

    '国历节日 *表示放假日
    strTmp = ""
    strTmp = strTmp + "0101*元旦,"
    strTmp = strTmp + "0214 情人节,"
    strTmp = strTmp + "0305 学雷锋纪念日,"
    strTmp = strTmp + "0308 妇女节,"
    strTmp = strTmp + "0312 植树节,"
    strTmp = strTmp + "0315 消费者权益日,"
    strTmp = strTmp + "0401 愚人节,"
    strTmp = strTmp + "0407 世界卫生日,"
    strTmp = strTmp + "0422 世界地球日,"
    strTmp = strTmp + "0501*劳动节,"
    strTmp = strTmp + "0502*劳动节,"
    strTmp = strTmp + "0503*劳动节,"
    strTmp = strTmp + "0504 青年节,"
    strTmp = strTmp + "0508 世界红十字日,"
    strTmp = strTmp + "0512 国际护士节,"
    strTmp = strTmp + "0515 国际家庭日,"
    strTmp = strTmp + "0517 国际电信日,"
    strTmp = strTmp + "0601 国际儿童节,"
    strTmp = strTmp + "0605 世界环境保护日,"
    strTmp = strTmp + "0606 全国爱眼日,"
    strTmp = strTmp + "0609 口香糖的结婚纪念日,"
    strTmp = strTmp + "0625 全国土地日,"
    strTmp = strTmp + "0626 国际禁毒日,"
    strTmp = strTmp + "0701 香港回归纪念日 中共诞辰,"
    strTmp = strTmp + "0707 抗日战争纪念日,"
    strTmp = strTmp + "0801 建军节,"
    strTmp = strTmp + "0815 抗日战争胜利纪念,"
    strTmp = strTmp + "0909 毛泽东逝世纪念,"
    strTmp = strTmp + "0908 国际扫盲日,"
    strTmp = strTmp + "0910 中国教师节,"
    strTmp = strTmp + "0927 世界旅游日,"
    strTmp = strTmp + "0928 孔子诞辰,"
    strTmp = strTmp + "1001*国庆节,"
    strTmp = strTmp + "1002*国庆节,"
    strTmp = strTmp + "1003*国庆节,"
    strTmp = strTmp + "1006 老人节,"
    strTmp = strTmp + "1009 世界邮政日,"
    strTmp = strTmp + "1014 世界标准日,"
    strTmp = strTmp + "1016 世界粮食日,"
    strTmp = strTmp + "1024 联合国日,"
    strTmp = strTmp + "1120*彝族年,"
    strTmp = strTmp + "1121*彝族年,"
    strTmp = strTmp + "1122*彝族年,"
    strTmp = strTmp + "1112 孙中山诞辰纪念,"
    strTmp = strTmp + "1205 国际志愿人员日,"
    strTmp = strTmp + "1220 澳门回归纪念,"
    strTmp = strTmp + "1225 Christmas Day,"
    strTmp = strTmp + "1226 毛泽东诞辰纪念"

    sFtv = Split(strTmp, ",")

    '农历节日 *表示放假日
    strTmp = ""

    strTmp = strTmp + "0101*春节,"
    strTmp = strTmp + "0102*春节,"
    strTmp = strTmp + "0103*春节,"
    strTmp = strTmp + "0115 元宵节,"
    strTmp = strTmp + "0505 端午节,"
    strTmp = strTmp + "0624*火把节,"
    strTmp = strTmp + "0625*火把节,"
    strTmp = strTmp + "0626*火把节,"
    strTmp = strTmp + "0707 七夕情人节,"
    strTmp = strTmp + "0715 中元节,"
    strTmp = strTmp + "0815 中秋节,"
    strTmp = strTmp + "0909 重阳节,"
    strTmp = strTmp + "1208 腊八节,"
    strTmp = strTmp + "1224 小年,"
    strTmp = strTmp + "0100 除夕"

    lFtv = Split(strTmp, ",")

    '某月的第几个星期几
    strTmp = ""
    strTmp = strTmp + "0520 母亲节,"
    strTmp = strTmp + "0630 父亲节,"
    strTmp = strTmp + "0730 被奴役国家周,"
    strTmp = strTmp + "1144 Thanksgiving感恩节"
    wFtv = Split(strTmp, ",")
    End Sub

    '传回农历 y年的总天数

    Private Function lYearDays(ByVal Y As Integer) As Integer
        Dim i, Sum As Double
        Sum = 0
        For i = 1 To 12
        Sum = Sum + lMonthDays(Y, i)
        Next i
        lYearDays = Sum + LeapDays(Y)
    End Function

    '传回农历 y年闰月的天数
    Private Function LeapDays(ByVal Y As Integer) As Integer
        Dim m As Integer
        Dim l As Double
        m = LeapMonth(Y)
        If m = 0 Then
            LeapDays = 0
        Else
            l = LunarInfo(Y - 1900)
            'l = LunarInfo(Y - 1900 + 1)
            If l < 0 Then l = l * (-1)
            l = (l And &H10000)
                If l = 0 Then
                    LeapDays = 29
                Else
                    LeapDays = 30
                End If
        End If
    End Function

    '传回农历 y年闰哪个月 1-12 , 没闰传回 0 OK

    Private Function LeapMonth(ByVal Y As Integer) As Integer
        LeapMonth = 0
        If Y >= 1900 Then LeapMonth = (LunarInfo(Y - 1900) And &HF)
    End Function

    '传回农历 y年m月的总天数 OK-

    Private Function lMonthDays(ByVal Y As Integer, ByVal m As Integer) As Integer
        If Y < 1900 Then Y = 1900
        If (LunarInfo(Y - 1900) And Int(&H10000 / (2 ^ m))) = 0 Then
        'If (LunarInfo(Y - 1900 + 1) And Int(&H10000 / (2 ^ m))) = 0 Then
            lMonthDays = 29
        Else
            lMonthDays = 30
        End If
    End Function

    '根据给定的阳历,返回农历的日期

    Private Function GetLunar(ByVal SolarDate As Date) As String
        Dim DaysOffset As Long
        Dim i As Integer
        Dim Temp As Long
        Dim lyear, lmonth, lday As Integer
        DaysOffset = SolarDate - CDate("1900-1-31")
        i = 1900
        Do While i < 2050 And DaysOffset >= 0
            Temp = lYearDays(i)
            DaysOffset = DaysOffset - Temp
            i = i + 1
        Loop
        If DaysOffset < 0 Then
            DaysOffset = DaysOffset + Temp
            i = i - 1
        End If
        lyear = i
        Dim Leap As Integer
        Dim IsLeap As Boolean
        Leap = LeapMonth(i)
        IsLeap = False
        i = 1
        Do While i < 13 And DaysOffset > 0
            If Leap > 0 And i = (Leap + 1) And IsLeap = False Then
                i = i - 1
                IsLeap = True
                Temp = LeapDays(lyear)
            Else
                Temp = lMonthDays(lyear, i)
            End If
            If IsLeap And i = (Leap + 1) Then IsLeap = False
            DaysOffset = DaysOffset - Temp
            i = i + 1
        Loop

        If DaysOffset = 0 And Leap > 0 And i = Leap + 1 Then
            If IsLeap Then
                IsLeap = False
            Else
                IsLeap = True
                i = i - 1
            End If
        End If
        If DaysOffset < 0 Then
            DaysOffset = DaysOffset + Temp
            i = i - 1
        End If
        lmonth = i
        lday = DaysOffset + 1

        '返回特殊标志的字符串

        If IsLeap Then

            'GetLunar = "0000【" & Animal(lyear) & "】" & cyclical(lyear) & "年闰" & Format(lmonth, "00") & "月" & Format(lday, "00") & "日" & GetTerm(SolarDate)
            GetLunar = "1" & lyear & Format(lmonth, "00") & Format(lday, "00")
        Else
            GetLunar = "0" & lyear & Format(lmonth, "00") & Format(lday, "00")
            'GetLunar = Format(lmonth, "00") & Format(lday, "00") & "【" & Animal(lyear) & "】" & cyclical(lyear) & "年" & Format(lmonth, "00") & "月" & Format(lday, "00") & "日 " & GetTerm(SolarDate)
        End If
    End Function

    '传回阳历 y年某m月的天数 OK

    Private Function SolarDays(ByVal Y As Integer, ByVal m As Integer) As Integer
        If m = 2 Then
            If (Y Mod 4 = 0 And Y Mod 100 <> 0) Or (Y Mod 400 = 0) Then
                SolarDays = 29
            Else
                SolarDays = 28
            End If
        Else
            SolarDays = SolarMonth(m - 1)
        End If
    End Function

    '某y年的第n个节气的日期(从0小寒起算)  OK

    Private Function sTerm(ByVal Y, n As Integer) As Date
        Dim D1, D2 As Double
        D1 = (31556925.9747 * (Y - 1900) + sTermInfo(n) * 60#)
        D2 = DateDiff("s", "1970-1-1 0:0", "1900-1-6 2:5") + D1
        D1 = D2 / 2
        sTerm = DateAdd("s", D2 - D1, DateAdd("s", D1, "1970-1-1 0:0"))
        sTerm = Format(sTerm, "yyyy/mm/dd")
    End Function

    '根据年份返回属象 OK
    Private Function Animal(ByVal sYear As Integer) As String
        Animal = Animals((sYear - 1900) Mod 12)
    End Function

    '根据阳历返回其节气,若不是则返回空 OK
    Private Function GetTerm(ByVal sDate As Date) As String
        Dim Y, m As Integer
        Y = Year(sDate)
        m = Month(sDate)
        GetTerm = ""
        If sTerm(Y, m * 2 - 1) = sDate Then
            GetTerm = SolarTerm(m * 2 - 1)
        ElseIf sTerm(Y, m * 2 - 2) = sDate Then
            GetTerm = SolarTerm(m * 2 - 2)
        End If
    End Function

    '根据阳历返回其节日,若不是则返回空 OK
    Private Function GetFeast(ByVal sDate As Date) As String
        Dim i As Integer
        Dim strTmp As String
        strTmp = Format(sDate, "MMDD")
        For i = LBound(sFtv) To UBound(sFtv)
            If Left(sFtv(i), 4) = strTmp Then
                GetFeast = Mid(sFtv(i), 5, Len(sFtv(i)) - 4)
                Exit Function
            End If
        Next
        GetFeast = ""
    End Function

    '根据阴历返回其节日,若不是则返回空 OK
    Private Function GetLunarFeast(ByVal sDate As String) As String
        Dim i As Integer
        Dim strTmp As String
        strTmp = Right(sDate, 4)
        For i = LBound(lFtv) To UBound(lFtv)
            If Left(lFtv(i), 4) = strTmp Then
                GetLunarFeast = Mid(lFtv(i), 5, Len(lFtv(i)) - 4)
                Exit Function
            End If
        Next
        GetLunarFeast = ""
    End Function

    '根据阴历返回其字符串 OK
    Private Function GetLunarString(ByVal sDate As String) As String
        Dim i As Integer
        Dim strTmp As String
        Dim strMonth As String
        Dim strDay As String
        strMonth = Left(sDate, 2)
        strDay = Right(sDate, 2)
        If strDay = "01" Then
            GetLunarString = nStr1(Val(strMonth)) & "月"
        ElseIf strDay = "20" Then
            GetLunarString = "二十"
        ElseIf strDay = "30" Then
            GetLunarString = "三十"
        Else
            GetLunarString = nStr2(Val(Left(strDay, 1))) & nStr1(Val(Right(strDay, 1)))
        End If
    End Function

    '返回阳历是该月的第几个星期几的字符串,如:0520表示5月份第2个星期日
    Private Function GetMonthWeek(ByVal sDate As Date) As String
        Dim D0 As Date
        D0 = CDate(Year(sDate) & "-" & Month(sDate) & "-1")
        GetMonthWeek = Format(Month(sDate), "00") & (Int((Day(sDate) - 1 + Weekday(D0) - 1) / 7) + 1) & Weekday(sDate) - 1
    End Function

    '天干地支计算 OK
    Private Function cyclical(num) As String
       cyclical = Gan((num - 1864) Mod 10) + Zhi((num - 1864) Mod 12)
    End Function

    '获取农历或节日说明
    Private Function GetDayString(ByVal sDate As Date, ByRef lngColor As Long) As String
        Dim strLunarDate As String
        Dim strTmp As String
        strTmp = GetTerm(sDate)
        If strTmp <> "" Then GetDayString = strTmp: lngColor = vbGreen: Exit Function
        strTmp = GetFeast(sDate)
        If strTmp <> "" Then GetDayString = strTmp: lngColor = vbBlue: Exit Function
        strLunarDate = GetLunar(sDate)
        strTmp = GetLunarFeast(Right(strLunarDate, 4))
        If strTmp <> "" Then GetDayString = strTmp: lngColor = vbRed: Exit Function
        strTmp = GetLunarString(Right(strLunarDate, 4))
        lngColor = vbBlack:
        GetDayString = strTmp
    End Function

    你的成功在于你每天养成的习惯

    要成功,就马上准备有所付出吧!这就是每天你应该养成的习惯。
    1、不说“不可能”;
    2、凡事第一反应: 找方法,不找借口;
    3、遇到挫折对自己说声:太好了,机会来了!
    4、不说消极的话,不落入消极的情绪,一旦发生立即正面处理;
    5、凡事先订立目标;
    6、行动前,预先做计划;
    7、工作时间,每一分、每一秒做有利于生产的事情;
    8、随时用零碎的时间做零碎的事情;
    9、守时;
    10、写点日记,不要太依靠记忆;
    11、随时记录想到的灵感;
    12、把重要的观念、方法写下来,随时提示自己;
    13、走路比平时快30%,肢体语言健康有力,不懒散、萎靡;
    14、每天出门照镜子,给自己一个自信的微笑;
    15、每天自我反省一次;
    16、每天坚持一次运动;
    17、听心跳一分钟,在做重要的事情,疲劳时,紧张时,烦躁时。。。。
    18、开会做前排;
    19、微笑;
    20、用心倾听,不打断对方的话;
    21、说话有力,感觉自己的声音能产生感染力的磁场;
    22、说话之前,先考虑一下对方的感觉;
    23、每天有意识赞美别人三次以上;
    24、及时表示感谢,如果别人帮助了你的话;
    25、控制住不要让自己作出为自己辩护的第一反应;
    26、不用训斥、指责的口吻与别人说话;
    27、每天做一件”分外事“;
    28、不关任何方面,每天必须至少做一次”进步一点点“,并且有意识的提高;
    29、每天提前15分上班,推迟30分下班;
    30、每天下班前5分钟做一下今天的整理工作;
    31、定期存钱;
    32、节俭;
    33、时常运用”头脑风暴“,利用脑力激荡提升自己创新能力;
    34、恪守诚信;
    35、学会原谅。

    改变自己从现在开始,坚持不懈,努力进取,成功就会在下一个路口等你。

    中国式管理可以休矣

    【2006.11.16 14:10】来源:第一财经日报

        作者:陈雪频

      我亲历过两次中国企业家挑战西方管理学家的场面,场面可用“火爆”二字来形容。
      两位管理学家,一个是菲利普·科特勒,一个是亨利·明茨伯格,在管理学界也算是泰斗级的人物了。前者被公认为“现代营销管理学之父”,后者被汤姆·彼得斯称为“当今最优秀的管理学家”。两位老先生不远万里来到中国,本来是要“传道授业解惑”的,却差点被几个中国的企业家弄得下不了台。

      两次冲突都是在第一财经《头脑风暴》的录制现场,这是一个要求有冲突感的节目。事实上,几个企业家嘉宾也很配合,早就准备好了一大堆石头,一开始就向台上的主嘉宾发难。有“地产哲学家”之称的冯仑对亨利·明茨伯格说的第一句话是:“我严重不同意你的观点。”而另一个企业家嘉宾对菲利浦·科特勒说的话是:“你那套理论在中国行不通!”
      到现在我也没搞明白,冯仑到底不同意明茨伯格说过的什么观点,那个企业家也没有说明白为什么科特勒的理论在中国行不通。两位管理学家也还算是很有涵养的了,不过场面确实比较尴尬,学生挑战老师也很正常,问题在于没挑战出什么所以然来。
      我想,问题的关键不在于挑战的逻辑,而在于那些中国企业家“亮剑”的姿态。几乎所有挑战的话语潜台词都如出一辙:“你那一套西方的管理学理论不适用于中国,你解决不了我们现在遇到的问题,要不你给我们现在碰到的问题支支招?”
      中国企业家的这种思维方式通常有两层含义:一是管理学家应该像一个咨询顾问一样,给出一些具体的解决方案;二是“中国国情”和西方非常不同,需要一套“中国式管理”。
      有需求就有市场,你需要“中国式管理”,我就给你“中国式管理”。中国的企业家经常坐飞机,于是便在机场书店的电视上(别的书店很少有电视)经常能看到一位老先生在讲“中国式管理”,这位老先生在中国拥有一大批“粉丝”。
      这位老先生叫曾仕强。他喜欢用中国的历史来包装他的理论,而且强调“西方式管理”多么恶劣,来证明他的“中国式管理”多么正确。老先生学识渊博,也有演讲才能,以至于经常有人将他和那些做励志培训的人混淆起来,因为他们都能让人振奋起来,“我能!”
      这种思维最近几年很流行,以至于中国的四大古典文学名著都被中国的企业家当管理书籍来读了。“水煮三国”、“孙悟空是一个好员工”、“王熙凤是一个好领导”,《水浒传》就不用说了,简直就是一本活生生的管理教材,这种思维方式都是“中国式管理”。
      在曾仕强先生的话语体系里,“中国式管理”的假想敌是“西方式管理”。我不知道两位管理学家听到“西方式管理”这种说法有什么感想,因为在他们看来,从来就没有存在过“西方式管理”这种东西,也从来没有所谓的“美国式管理”、“法国式管理”、“日本式管理”或者“德国式管理”这种东西。
      不要说美国公司和德国公司的风格差异巨大,就是在美国,不同公司的管理风格也存在巨大差异,并没有一种统一的管理风格。即便是管理学界,也存在不同的流派,没有统一的“西方式管理学”。那么,为什么偏偏有所谓的“中国式管理”呢?我想这大约与中国100多年的思维习惯有关。100多年前,张之洞就提出了“中学为体,西学为用”,这种说法和现在的“中国式管理”有异曲同工之处。就是说,“体”还是中国的好,西方的东西都是“用”,都是器具层面的,不改变体制层面的东西。
      “中国式管理”习惯于用一套西方的词语去包装中国的传统文化,类似于“改良旗袍”。如果说这种说法只是为了便于大家理解的话,其实也无可厚非,但如果只是做一种简单的嫁接,就宣称我们发明了一种“中国式管理”,这种做法实在有些偷懒了。
      肖知兴教授经常用“睡莲”来比喻管理的三种层次。如果说睡莲的叶是管理的器具层面,那么茎就是管理的制度层面,根则是管理的文化层面。如果我们不能掌握管理中的文化层面,而是从工具层面去学习别人的东西,结果往往是似是而非的。
      我们自然需要从我们的文化中去发掘一些管理的本质性的东西,因为只有从文化层面去理解管理,这种管理才能真正成为我们自己的东西。不过这种思维方式和“中国式管理”完全不同,我们需要更大的智慧,来探究管理的文化本质,而不是用管理来包装文化。
      也是在《头脑风暴》,我终于等到了曾仕强和《一分钟经理人》的作者肯·布兰佳斗法。虽然肯·布兰佳不能代表“西方式管理”,我当时还是满怀期待,希望曾先生能够说清楚什么是“中国式管理”,可惜那天我花了两个小时,也没有听到什么有说服力的话。
      正如明茨伯格后来接受我的采访时说的,他认为文化在管理中比较重要,管理的实践必须要考虑不同国家的文化要素。但管理的本质在各个国家中并没有太多不同,“我调查过39个管理者,他们来自不同的文化背景,但研究结果表明,他们的管理方式并没有太多不同。”
      也许将来,中国会产生一位真正的管理大师,但我相信这位大师肯定不会打着“中国式管理”的旗号。他的理论也许会有一些中国文化的背景,但一定也是能被全球所通用的,这一天也是中国真正为管理理论作出自己贡献的一天。

    November 14

    贾政难题——官VS吏

    ZT ■文/范卫锋

    在中国做企业,创业之初,必读《水浒传》;创业小成之后,非读《红楼梦》不可。

    《红楼梦》里,荣国府的二老爷贾政,老实办差,勤奋做官,被安排了一个江西粮道的“肥差”。贾政家里有钱、又有世袭的勋职,立志当一个大清官,不但不搜刮民财,还从家里拿钱倒贴。可是,这个一心当清官、好官的贾政,有背景、有文化、有资历的大领导,却栽在了一帮小吏手里。

    不是贾政无能,而是小吏太难对付。

    “贾政难题”的起源

    要解决“贾政难题”,必须先弄清楚:到底什么是官,什么是吏。

    官吏二字,往往混用,其实不同。通俗地讲,官,是管人的人,管比他更小的官、管下面的吏,官不直接管事,不直接管老百姓。吏,是衙门里、机关里、企业里的中间阶层,他们直接管事、做事。老百姓、客户、消费者平时见不着官,与他们打交道的往往是吏。现官不如现管,阎王好见,小鬼难缠。

    汉朝的时候,官和吏没有明显区别。当时每个部门的老大是官,其他的全是吏。汉朝的大官,常常由吏而来。甚至宰相从吏员升上去,也不是什么奇怪的事情。到了唐朝,吏和官,已经有了清浊、高下的区分了。

    造成重官轻吏的罪魁祸首,是元朝的蒙古人。蒙古人马上得天下,以为骑兵就是一切,不学中国字,根本无法治国。而汉族的读书人,又被堵住了科举做官的路,正好适合蒙古人的需要,进政府当书记、文案,也就是吏。吏成了一条无可奈何的出路。从此官吏分流,遗祸千年。

    到了明成祖朱棣时,又定了一条更坏的政策:吏不能当御史、不能考进士。这样一来,吏在官场上再也没有前途。结果,优秀的读书人都不去做吏,只有落第秀才们去充当。朝廷里充斥着读四书的书呆子,绍兴师爷则把握朝廷六部、地方州县的行政。明代有人去绍兴当官,朋友鼓励他说,天下治乱在于六部,六部的吏完全是绍兴人,所以,治好绍兴就治好了天下,可见当时吏的权力之大。到了清朝年间,吏的权力更大了。天下不管什么事情,到了吏的手里,铨选(考察提拔干部)可疾可迟,处分可轻可重,财赋可侵可化,典礼可举可废,人命可出可入,讼狱可大可小,工程可增可减。他们既被人看不起,又没有官场的前途,也没有正式的俸禄,索性自认流品卑污,自暴自弃,捞钱使坏。

    明清的官员,别看是才子名臣,甚至像张居正、曾国藩、张之洞,其实都是管人的官,不是管事的官,基本没有地方基层的行政经验。所有的事务,都把持在吏的手里。一般人十年寒窗,进翰林院,天天读圣贤书,到了三十来岁出来做官,对于实际的事务,几乎一无所知,只能任由吏们摆布。书办的官称为“书吏”,大小衙门基层的公务,只有书办才熟悉,这一点就是他们的“本钱”,其中的真实情况,以及关键、诀窍,为不传之秘,所以书办虽无“世袭”的明文,但无形中父子相传,有世袭的惯例。户房书办简你“户书”,他之所以阔气,是因为额征钱粮地丁,户部只问总数,不问细节,当地谁有多少田、多少地,坐落何方,等则如何?只有“户书”才一清二楚。他们所凭借的就是祖传的一本秘册,称为“鱼鳞册”,没有这本册子,天大的本事,也征不起钱粮。有了这本册子,不但公事可以顺利,户书本人也可以大发其财。

    中国企业现在又在走这条死路,走向“贾政难题”。企业里也开始官吏分流,管人的官不懂事务、管事的吏不顾大局。不解决吏这个“贾政难题”,其他的战略、战术、思想、理念、机制都是白费,就像张居正说的“浪费纸张和口水”。

    治官容易治吏难

    贾政自幼饱读诗书,也有多年的京城部委工作经验,家世更是显赫,四大家族同气连枝。然而,到了地方上当官,由于不懂“吏”情,结果被“吏”们收拾得服服帖帖,吃了大亏。

    贾政是有心做个清官的,一是家里有钱,钟鸣鼎食,从来不用为钱操心;二是有这个可以世代传下去的爵位,不想为了眼前小利坏了大局,另外,贾政的个人修养,也是荣宁二府中最高的。可是,他想做清官,底下的吏们不干,他们联合起来收拾这位清官老爷,搞得这位贾大老爷事事不爽,样样不利。贾政想出趟门,没人打鼓、没人抬轿、没人吹吹打打,寸步难行。贾政没办法,只好向这帮吏的头子李十儿打听,李十儿告诉他:“那些书吏衙役都是花了钱买着粮道的衙门,那个不想发财?俱要养家活口。”说来说去,贾政要想把这个官当得舒服,只能默许这帮吏贪污受贿。贾政只能撂下一句“我是要保性命的,你们闹出来不与我相干。”这些吏逼迫贾政默许之后,开始无法无天,终于弄到不可收拾的烂局。

    李十儿这些恶吏,无非只是想捞点钱。《水浒传》中的宋江,就不是要钱这么简单。他区区一个郓城小吏,不但家财万贯,出手豪阔,还名满天下,居然有觊觎天下之心。宋江只是区区一个郓城小吏,县政府的小科长,家里虽然有点田地,但与柴进比,根本不是一个重量级。然而,正是这位宋江,将“及时雨”的品牌发挥到了极致。作为天潢贵胄的柴进,能量居然不如一个县城小吏,这就是“贾政难题”造成的后果。

    俗世间的恶吏们爱财,佛祖手下的尊者也难以免俗。《西游记》第98回记载,唐僧师徒四人走了14年,终于到了西天,见了佛祖后,去阿傩、伽叶两位尊者那里领经书,结果如来同意他们领经书的批示也不管用,二位尊者问唐僧索要见面礼。唐僧他们不识趣,不信邪,结果只能领到无字的白本。直到他把紫金盂献上,才算取经成功。

    对于晚清的“老大”慈禧来说,李鸿章、恭亲王、庆亲王、翁同龢、左宗棠这些人,就是她的“吏”。北洋海军被看作李鸿章的私人势力范围,他的政敌为了防止其势力膨胀,阻挠北洋海军购买新的枪炮舰艇,把很多钱用在修颐和园上面,导致在军备上落后于日本海军,而在明知北洋海军外强中干的情况下,逼其仓促出战,间接造成了甲午战争中的惨败。可是,李鸿章的政敌们,也有他们的充分“正义”道理。当时光绪想要亲政,他的拥护者们为了让慈禧体面舒服地退居二线,修座园子给她安享晚年,也是无奈之举。让慈禧身边的宠臣们大发一笔“修园财”,以便交换到实际的政权,进行光绪的改革,似乎也理直气壮。然而,最终的结果是,这两派从自己的角度出发,都在做自己认为“正确”的事情,却导致了非常糟糕的结果。

    吏,可以将善政变成恶政。北宋王安石的变法措施在宁波推行试点时,大获成功。为什么同样的政策,推广到全国就失败了?历史学家众说纷纭,但“贾政难题”是其主因。当时宁波的范围毕竟小,王安石天纵英才,亲力亲为,把吏的负面作用降到最低。然而,全国变法开始后,王安石纵有三头六臂也无暇顾及,只能由吏去推行全国。一支由宋江、李十儿、阿傩伽叶们组成的吏员队伍,可以把任何善政变成恶政。

    解决“贾政难题”的五大药方

    吏手中真正的权力来自于两个地方。一是信息,比如当年“户书”半世袭地掌握的“当地谁有多少田、多少地,坐落何方,肥瘦如何”这些信息,没有这些信息,地方官和朝廷部委寸步难行;第二是处理信息的经验,就是作为“不传之秘”的公务诀窍、关键、要害。

    在现在的企业管理上,很多人在研究“关键员工的管理”,其实也是这个吏带来的“贾政难题”。关键员工带来的难题很多,比如高管投奔竞争对手之后的竞争、掌握核心技术的员工跟老板要挟、有能力的干部带亲信集体反水、创业元勋功高盖主、有野心的高管鸠占鹊巢反客为主。针对这些问题,其实药方不少,到书店一看,管理咨询的老师们会告诉你很多理论,比如学刘备摔孩子“情感留人”、针对绩效发奖金、按年资加薪、升职、期权、精神激励、把这个人兴趣爱好成为共同的东西、企业文化、保密协议,可是,这些药方基本上没有多大用处,治标不治本,最多顶个两三年的药效,到时候企业的费用成本上去了,病症又恢复了,甚至还更严重。

    第一药方:省吏主义,化吏为民

    扬汤止沸,不如釜底抽薪,既然问题出在吏上,索性将其省去,这是遇到“贾政难题”时的直觉本能反应,也是第一药方。

    唐朝晚期的“牛李党争”中,“李党”首领李德裕力图整顿朝政,有句话叫“省事不如省官,省官不如省吏”。这是一剂猛药,一般人不敢轻用,李德裕以一人之力,挑战整个官吏系统,最终仍难以力挽狂澜。

    在企业管理史上,最激进的“省吏主义者”是亨利·福特。福特创造的流水线,绝不仅仅是采用通用零件、标准化装配而已。流水线和标准件更大的意义在于,它们把企业中的一个庞大阶层——吏——变得无足轻重了。一切都是标准的,吏的自由裁量权被压到最小程度,讨价还价、上下其手的机会大大减少,吏的活动空间一小,内部的交易费用自然大减,成本下降,效率大大提高。所谓扁平化问题,其实也是省吏主义,化吏为民的一种体现。

    福特在他的自传中,津津乐道于对付企业里的吏。“在雇佣人们工作的过程中,最令人头痛的是,繁杂的组织及由此滋长的拖沓低效的办事程序。那种号称“组织天才”的人,才是生产力发展的最大阻碍。我的工厂和企业均无组织,也没给任何职务附加特殊的职责,没有权力的继承和特权阶层,没有官衔和会议。我们只有精干的办事人员,因此也就没有任何繁文缛节。由于没有头衔及权力限制,任何一名员工可以找任何一个人。”

    福特把企业的中间阶层视为天敌,而他管理工人的工具,除了标准化的流水线,就是他的亲信班奈特领导的队伍——由退伍军人、出狱囚犯、打手们组成。他们的谈判工具就是拳头、棍棒和高压水龙头。当然,福特日薪5美元的高薪,使他们愿意忍受这一切。

    可是,“贾政难题”并没有被消除,只是被延迟。由于对吏阶层的过度挤压,福特从目空一切的老大地位上滑落,直到被看似官僚当道、吏员充斥的通用超越。福特二世只能引进“蓝血十杰”,改弦更张。没多久,福特又成了吏的安乐窝,重新遭遇“贾政难题”,让后来的艾科卡等创新者受困不已。

    当年通用电气的杰克·韦尔奇,之所以得到“中子弹杰克”的“美名”,正是指其推行省吏主义,大量消灭企业中的冗吏。可惜,大部分企业都只会用原子弹,不会用中子弹。一旦推行省吏主义,往往连吏带企业一起炸垮了,省吏主义应该慎行。

    第二药方:重吏主义,化吏为官

    如果吏实在难以省掉,不如试着使他们变成官,让他们摆脱使坏的动机。吏为什么总是使坏?因为他们知道自己不是“官”,不是政权、企业的所有者。顾炎武也说过,“国家兴亡,肉食者谋之”。既然官看不起他们,他们就索性放手追求眼前的利益。

    化吏为官,让他们进入政权的统治阶层,变成企业的所有者,分享企业大局所能带来的好处,这就是现代企业激励机制的本质。互联网公司的员工最充分地分享了这一成果,比如GOOGLE的员工,GOOGLE股票上市以后,公司周围的豪宅价格大涨。为什么互联网公司喜欢用这招?因为互联网创业时的“本钱”太少,未来太不确定,对人才又太依赖。

    美国的投资银行业,在过年几百年的绝大多数时间里,都实行合伙制。为什么?投资银行业拼的就是人的关系、能力、信誉。再比如管理咨询业,麦肯锡的马文·鲍尔当年强行将自己的持股稀释,扩大麦肯锡的合伙人的“沾光”范围,这是麦肯锡后来辉煌的重要原因。蒙牛的牛根生,创业之初就吸取了伊利的教训,除了他本人外,其他人如邓九强、侯江斌、孙玉斌、邱连军、杨文俊、孙先红、卢俊、庞开泰、谢秋旭,他们都有股份。他们之所以肯放弃当时伊利的“高官厚禄”,来到前途未卜的蒙牛,除了关系、感情和“企业政治”这些软因素,股权的“硬因素”功不可没。

    不过,激励机制有个悖论。它的覆盖范围越广,摊到每个人头上的份额越少,激励的效果就越弱。激励机制的极致,就是当年国有企业的“全民所有”,人人都有份,结果成了“大锅饭、大家拿”。

    贾政当年就曾经为这个问题苦恼,荣国府、宁国府中的吏,全都沾着两府的光。一荣俱荣,一损俱损,他们的待遇其实并不低。可是,这个看起来不错的激励机制,无法解决“贾政难题”。连王熙凤、贾赦、贾琏、贾珍这些有大量股份的“高管”,都想着从公家拿到私囊,更不用说赖大、司棋、柳家嫂子这些吏了。

    第三药方:吏吏相克

    省吏主义的化吏为民,重吏主义的化吏为官,都只能在表面上给吏换件外套,无法改变它的内在。以毒攻毒,以吏克吏,或许是个办法。

    通用汽车的斯隆,面对“贾政难题”,祭出了“委员会”这把尚方宝剑。他的办法是,在部门上面设置委员会,在委员会上再设置委员会……可是,今天委员会这个词,已经快成为官僚主义的代名词,于是,又有了卡洛斯·戈恩的CFT(跨功能小组),其实,不管戈恩承认与否,CFT和斯隆的委员会是一回事,都是为了解决“贾政难题”,逼着吏把信息、资源拿出来共享的权宜之计。

    近几年最耀眼的企业明星卡洛斯·戈恩,因其拯救日产起死回生而扬名。他的拿手好戏就是CFT。所谓CFT(Cross Function Team),就是跨功能小组。戈恩回忆说:“组建CFT的想法在我的头脑中酝酿了很久,我曾和无数人反复讨论、协商过成立CFT的可行性和实际操作性。在讨论的过程中我渐渐明白,单凭部门内部有些问题是解决不了的,部门与部门之间,职务与职务之间隐藏着一种未知的力量,它总是会使问题搁浅或隐藏起来。”

    戈恩所说的“未知的力量”,其实是吏的利益、心态,就是“贾政难题”。不过,戈恩创建的CFT,从长期来看并不乐观。因为它本身也是一个官僚机构,也需要由无数的吏来操作,只是在戈恩的超人热情、能力之下,它的许多问题被掩盖、延迟了。但戈恩式的强人并不多见,可遇不可求,因此,CFT迟早也会沦为企业中被吏把玩的工具。到时候没准又要设置CFT的CFT。

    第四药方:电脑代替人脑,化吏于无形

    吏之所以麻烦,是因为他们的头脑太复杂。有没有一个办法,让他们变得头脑简单?很多企业进行思想教育,搞企业文化,狠斗私字一闪念,但是往往口水标语费了不少,见效不彰。只有一个技术手段,就是用电脑代替人脑。

    原来是用人脑,现在改成用电脑,是一种大大的倒退,电脑处理信息的能力,比人脑差得很远。那为什么大家还要花那么多的钱、费那么大的力,实施ERP、CRM这些管理软件?原因很简单,电脑软件虽然性能不如人脑,但是,电脑不会因为占有了信息而变成可恶的吏,软件没有自己的利益可以追求,不知道胁事权以自重。弃人脑而转电脑,是一种“必要的代价”,是一种“为了进步的倒退”。

    电脑的应用,实际上是把个人头脑中的经验、智慧、信息,变成“企业头脑(电脑)”中的公共经验、智慧、信息。比如戴尔,它的整个业务链很少受到吏的“人脑”干扰,阿梅里奥跑到联想当CEO了,它没有什么大的震动。哪怕走一个比阿梅里奥更大的官,也不会伤筋动骨。

    然而,“贾政问题”并没有因此根治。原因有两个:一是电脑处理信息的能力毕竟有限,企业经营、经济管理是混沌现象,一只蝴蝶扇动翅膀,会引起席卷大地的风暴,一个士兵感冒,会输掉一场战争毁掉一个帝国。现在最强大的电脑,也无法应付这种混沌。

    正是由于这种混沌,使得这场针对“贾政难题”的革命很不彻底,留下了太多的后门。依然是电脑由吏操纵、程序由吏设计、信息由吏输入、处理方式由吏选择,吏的地位并没有真正下降,甚至在某些企业还得到了加强。纵使贾政今日复生,面对用上电脑的李十儿们,估计还是无可奈何。

    应急之方:先做吏,再当官

    以上四条,都是从制度上想办法,重新盖房子,伤筋动骨。对于眼前的培养高级干部、培养年轻接班人来说,还有一个应急的法子,先做吏,再当官。要想当官,就得比吏还懂得吏。这个方面,可以参考一下古代的官制。中国历史上最好的官制,是汉朝。我们不妨来看看汉朝的官,是如何产生的,为何汉朝的官比较能够“治吏”。

    汉朝的国立大学叫“太学”,进了太学的,都是未来大汉集团公司的干部。这个干部储备学校,学生毕业时分成两等,甲等为郎,毕业后先在皇帝跟前当侍卫,等外面的官位有空缺时再派出去,按现在的说法,“留京”、进大单位;乙等的学生是吏,大学毕业后,分配回家乡去做吏,等到在地方上表现好了,仍然有机会被推荐到中央,成为郎,再择机派出去当官。这个人先读太学、后来做吏,再到中央做郎,经过一番培训考察再派出去当官,这时候已经地方、中央的行政经验都极为丰富,一般的吏根本糊弄不了他了。汉朝的时候,有很多有名的吏,很多大官甚至宰相,都从吏升上去。这样的官,自然制得住手下的吏。

    清朝的皇帝,公正地讲,综合素质比明朝高出太多。原因之一,是这些皇帝在年轻时,就被派出去“办差”,到地方上去办事,这比明朝“生于深宫之中,长于妇人之手”的朱家子孙强多了。

    每一个官,在做官之前,都必须做吏。在几何学上,两点之间,直线最近;但在管理学上,两点之间,往往直线最远。在企业里,想当官,必先做吏;想做好官,必须先做好吏。尤其是那些第一代的民营企业家们,自己年轻时多半有极为丰富的磨难和历练,所以对付这些吏能够得心应手。可是,他们如果想培养自己的儿子做第二代,接过自己的班,必须让接班人做吏,而且最好是在别人的企业做吏,否则接班之旅多半失败,清朝的皇帝,往往在登基之前派到地方上“办差”,也是这个道理。民营企业“第二代”想解答“贾政难题”,首先就得先放下贾政的架子,去体验“李十儿”们的生活。

    《汤》绝对值得收藏,还记得当年那场大雪吗?有妻如是,夫复何求?!

    《汤》绝对值得收藏,还记得当年那场大雪吗?有妻如是,夫复何求?!

    在单位,我可能是最令大家羡慕的男士了:大学毕业后顺利考取公务员,最后进入航空公司办事处,刚刚三十出头就晋升为办公室主任。达到婚龄时,又适时识了刚从空姐岗位退下来被外资公司高薪聘请为人力资源部经理的妻子。结婚后,在单位的利补贴下,在东三环南段的潘家园拥有一套150平方米的住房。婚后一年,增添了活泼可爱的儿子,随后又以一次性付款的方式,开回了一辆桑塔纳。
      房子、车子、妻子、儿子、票子我全部都拥有了。
      妻子温柔又美丽,可是我却开始越来越觉得自己对妻子没有激情了。成为车一族后,下班免不了会有同事坐我的顺风车,坐得最多的就是刚进公司不久的小秘书。她住在国贸桥附近,和我顺路。小秘书刚大学毕业,正是花样年华。进入收入丰厚的航空公司,拿着大把的钞票自然是不遗余力地打扮自己,从化妆品到新款时装,让我每天看得眼花缭乱。我的心便开始花了,尽管还没什么实质性的进展,但我知道跨出那一步只是迟早的事情。回到家,看着甜蜜地喂儿子吃饭的妻子,心里多少也会有一点愧疚。但是,心仍然开始不可避免的背离,我甚至开始憧憬那一天地早日到来。
      就这样到了12月7日,从下午2点开始雪开始飘飘洒洒地落了下来,到下午下班时地上已经有了薄薄的一层,我走出办公室没有丝毫犹豫地把车开了出来。副驾驶位上坐着的当然还是小秘书,车上了机场高速,情况不妙了,平时道路车速可以跑到100码以上的路面突兀地拥挤了许多,勉强以在长安街上晨跑的速度一点一点地往前蹭。根据以往的经验,只要四环一闹"肠梗阻"三环绝对会"便秘",可是车在高速上半点不由人。8点半,终于在三元桥绕上了三环,车刚上三环主道,满眼黑压压的车顿时让我倒抽了一口冷气,不幸遭遇新世纪最严重地大堵车了!手机在这时候响起了,是妻子打来的。她说她已经步行回家了,孩子也已经接了。她问我估计什么时候能到家,我随口道:"12点以前能到家就不错了,你早点休息吧,"便挂了电话。小秘书终于对着镜子补好了唇膏,嘴唇在chanel梦幻滟唇的滋润下如水晶般充满诱惑,又借口暖气太热而脱掉了大衣,一件天蓝的珠光紧身毛衫将身体的曲线勾勒得淋漓尽致,难道在这个滑车的雪夜会发生那人让我憧憬的故事吗?
      刚准备对小秘书有所暗示,电话铃又响了,是一个朋友,他也被堵在了半路,估计我和他的糟遇一样,便打来电话和我一起诉苦打发时间,不知不觉时间已经到了10点,车在打电话的功夫一直在慢慢地向前蠕动着,整整一个半小时大约只前进了不到2公里。在农馆附近终于蠕动累了,便又集体趴了下来。再一次鼓起勇气准备开口,妻子的电话又来了,问我到了哪儿,我很不耐烦地告诉她还在农展馆。轻轻将右手搭在小秘书的肩膀上,她肩膀一动,我的手滑了下来。我不知道她这是婉拒还是半推半就,不敢贸然行事。我只好终止冒失的行为,开始有一搭没一搭地和她找话题闲扯,一个小时又过去了。阿拉从车里播放的席琳狄翁的CD谈到曾火爆的《泰坦尼克号》再委婉地转移到爱情这一主题,终于绕到了正题,再剩下的就只需要我的一点点暗示和小秘书的反应了。
      就在这关键时刻,电话又来了,还是妻子的。还是问我现在到哪里了,我强忍火气告诉她我已经到了京广桥,妻子很开心地告诉我:"累死我了,终于快找到你了。我现在已经走到光华桥了,我怕你肚子饿,煲好了汤盛在保温瓶里就出来了,又怕坐车找你和你错过了,只好顺着三环走过来找你。对了,我就在*你这边的马路牙子上往前走的,你要是看见我了就叫我一声,我一路上使劲瞅车牌,眼睛都花了,可别把你漏过去了。"
      妻子挂了电话,我开始发呆:妻子在满心期盼地为我煲汤,从潘家园步行到光华桥给我送来,可我却在车里计划着如何吸引另外一个女孩,我还是人吗?看我一脸沉重,小秘书问我:你刚才不是说要告诉我你心目中的罗丝是谁吗?说啊。我凝视着她的双眼,一字一顿道:"是我妻子,是马上给我送汤来的我的妻子。"
      远远地看见了妻子的身影,我使劲地摁着喇叭,又一个劲地变更远近光灯,妻子兴奋地朝我挥手,我冲出去一把将她揽进了怀里。回到车时,小秘书已经悄悄地坐到了后排坐椅上。我向妻子介绍她是我的同事,妻子很热情地邀请她赶快趁热喝一碗汤,那天的汤香浓无比,肌肠辘辘的我和小秘书将一保温瓶汤一扫而光。吃饱以后,我问妻子:孩子呢?妻子笑笑说:"我做好饭喂他吃完了让他在家好好地呆着我就出来了,他现在可能还在家等着我们呢。”
      “你没吃饭?”我一愣
      “本想过来陪你一块在车上吃的,你有朋友在,你们就先吃吧,我呆会儿回家再吃。”
      车到国贸桥小秘书下了车,10分钟后我的手机收到了一条短信息,是小秘书发的:你有一个多么好的妻子啊,幸亏我没有做出对不起她的事情,我喝了属于她的汤绝不能再夺走属于她的男人,我承认我失败了,不是败给了人,是败给了一碗汤,一个如此用心煲汤的女人是值得每个男人为之珍惜一辈子的......
      妻子问我是谁的信息我一笑:“是小秘书的,她在夸你的汤很好喝,夸我有眼力,找了一个优秀的妻子。”妻子甜蜜地笑了,轻轻将头靠在了我的肩膀上,我顺势吻了下去。这一吻,这雪夜拥挤的三环上的一吻将让我铭记终身......
      这种女人是值得每个男人为之珍惜一辈子的......
      每个女人都是是一个天使,当她爱上一个人时,她就会折断翅膀来到人间,所以男人不要伤害身边深爱自己的女人,因为她已经没有翅膀再飞回天堂。

    判别专家真伪的唯一标准ZT

         94年春,总局原党委成员莫顾问从中央党校学习回来,传言将升迁,各路人马喜忧不一。后,总局派莫顾问至培训中心不挂职考察三月。培训中心各路人马各显其能,时,培训中心办公室主任沈公公人气低迷,朝不保夕,沈公公者,良禽也,须择木而栖,趁着周末,将自己的办公室改换成“总局顾问室”牌子,将自己的办公室搬到对面房间,这样一来,就能和莫顾问面对面,战略上就是“地利”,可惜,对面的房间设施太差,沈公公命施工队连夜奋战,用了三包水泥、三箩筐黄沙,工程才告结束。周一,上班后,才发现,原先的“办公室”改称“总局顾问室”,原先“办公室”对面的“女厕所”改称“办公室”,培训中心操场边的沙坑里的黄沙都不见了。

         木已成舟,别人也就没有办法了,失去“地利”,还有“人和”,这可是关键。

         莫顾问,吾与其不识,不做评判,他到之日,我正赴西安途中。我与沈公公,皆是君子,君子之交淡如水,不过,一个是河水,一个是井水,而已。

         五日后,沈公公来电,异常热情,再三再四的寒暄\问候\慰劳,烦,知其必有所求,沈公公啰嗦半日,方言归正传,问“你从安阳带回的宝贝可否转让?”。告知“赝品,青铜器,我买不起,西安古玩多”。沈公公大喜,压低声音“能否代买一件?”。我答“可以,看你态度尚可,先汇款再说,我忙。”沈公公千恩万谢,三日后收汇款二万。

        当时各科室都有小金库,且数目不菲,据我观察,北京人的钱是挂在嘴上的,广州人的钱是吃在嘴上的,上海人的钱是藏在口袋里的,这就叫精明,单位各科室,想尽办法捞些钱,藏在那里,有些时候就可以少化自己的钱了。我轻狂兼浪荡,一般不留隔夜钱,于是,毫不客气,用了再说。

         次日,有同事来电,聊起单位情况,称沈公公与莫顾问关系甚密,莫顾问好古玩,且是什么什么文物协会的理事,现沈公公拜他为师。

         一周内,沈公公数度来电询问,我不急,告知正在寻觅,须小心不可上当,沈公公喜,二周后,沈公公急电,求我速速办理,,万不可懈怠,办妥之后,立即飞回上海,机票由西安管理局办理。我知事有变,半日后,电告“购得一神器”,当晚,西安管理局送来机票一张,次日早晨,送我上飞机。国家机关,办事效率极高。

         当日下午,抵沪,机场已有轿车等候,不作停留,送到单位,沈公公喜。

         当时,莫顾问荣升副局长,欢送会刚结束。沈公公关门,拉上窗帘,室内四人。莫副局长醉意朦胧,端坐沙发上,。

         我从行李中取出一锦盒,古意盎然,沈公公喜,内有黄缎包裹,缎绣龙凤,沈公公大喜,命女秘书刘淇平小心取出,揭开黄缎,送到莫副局长面前,沈公公在侧旁仔细端详,忽然失声叫道“啊,这是夜壶” 。

        刘淇平闻声失手,壶落地上,顿成碎片。

        我由惊转怒“无知,汉陶也,非夜壶”,将陶片数枚举至莫副局长面前,莫副局长带上老花镜,端视良久,摇头叹息“好东西,垢厚,汉陶,果真是汉陶,可惜可惜”,沈公公无措。

        当晚,朋友聚,笑谈此事,皆说沈公公无知,不识汉陶。我道“莫顾问,平常人也,非专家,只知汉陶而已。沈公公非常人也,目光如炬,不可小觑,一眼就能看出是夜壶”。

        可惜,现在的有些专家,不识汉陶也就罢了,竟然不识夜壶。不认识夜壶也就罢了,还常把夜壶当作茶壶,自酌自饮,自得其乐。

    November 13

    女人其实嫁谁都后悔

    嫁给有钱的男人
    食有鱼,出有车,豪华别墅,锦衣丽服,暗香弥漫,这种日子应该很不错的吧?可是,男人挣钱需要时间和精力,有钱的男人不是锱铢必较的商人,就是忙于应酬的权贵。商人的脑子里充满利益,每天算计投入和产出,缺乏温馨。许多年前的那个江州司马早已看透了这种男人的本质——重利轻别离。
    权贵男人的脑子里充满关系,每天衡量着该和谁近,该和谁远,缺乏柔情。有钱的男人往往没时间,会将女人冷落一边。嫁给这种男人的女人,等于嫁给电视机,嫁给美容院,要忍受长久的精神上的空虚,空有一份表面上的华丽,内心的苦涩有谁知道?嫁给帅哥
    显然是自取灭亡。帅哥就算有心一生只爱你一人,也顶不住别的女人不管不顾的爱心奉献。帅哥长的帅,艳遇来的快,快的叫你斩不尽杀不绝,春风吹又生,然后你的婚姻就成了一场你方唱罢我登场的闹剧。
    嫁给有闲的男人
    每天都有人陪伴,他事情很少,记性好,你的生日,你们的结婚纪念日,他都会记得一清二楚。他每天按时回家,还做得一手好菜,愿意陪你逛商场,很会教育孩子。你每天生活在他的包围之中,应该了无遗憾了吧?不,这种男人往往能力有限,没有很多的钱,你必须千辛万苦和他一起打拼,才能获得一份温饱生活。看到别的女人养尊处优,年过四十依然面容姣美,十指纤纤,而你年纪轻轻,已经皮肤粗糙,玉手变形,就会不甘心——别人怎么能嫁个“钻石男人”,自己怎么嫁了个破铜烂铁?
    嫁给会说甜言蜜语的男人
    你的心情会格外舒畅,这种男人聪明心细,善于发现女人的美。你换了一个发型,换了一件衣服,甚至换了一种牌子的口红,他都会及时发现,并马上赞美。他会别出心裁地夸奖你透明的耳垂,夸奖你浑圆的脚踝,你会在这种被人欣赏的感觉中陶醉——因为有些美你自己都未发现。可是,你应该清醒一下,这种男人也很善于发现除了你之外的其他女人的美。他会把甜言蜜语说给很多女人听,你甚至都不知道你是第几个听到他甜言蜜语的人。这种男人很危险,一不小心就会在外面竖起几面“彩旗”,在情感上与别人“分一杯羹”,你会内心充满痛苦和耻辱的。
    嫁给朴实的男人
    你尽管可以放心,他对你忠心耿耿,毫无二心,对身边擦肩而过的美女绝对可以目不斜视。可是,这种男人往往迟钝得可怕,你换了一双新款的鞋子一周了,他都没有发现;你问他涂粉色指甲油好还是浅紫色指甲油好,他通常会一脸茫然。嫁给这种缺乏情趣的男人,你会觉得自己的女性之美形同虚设。
    嫁给才子
    这事怎么说呢?先把才子分为出人头地怀才不遇两种。前者的各种翘楚有徐志摩、郁达夫,他们的爱情婚姻都轰动一时,可是结果不甚美妙。才子佳人的组合太旖旎,就会折福。怀才不遇的才子最好别嫁,嫁了也是陪他一起谴责上苍无眼、小人当道、时运不济。怀才不遇者都有股怨气,怨的久了、深了,人也就阴暗了。
    嫁给专业人士
    好象不错,比如律师医生,婚后遇到什么事情都有人护航。这类人较有素质,一般不会发生秀才遇见兵有理说不清的悲剧。可他们通常都很忙,半夜要出诊,假期不见人,而且可能不浪漫,有一种严谨的职业病,把你一个人困在婚姻里哀嚎。
    嫁给教师
    他们很难有升迁机会,不大会给你惊喜。其工作方式就是从低年级向高年级爬,然后直线下跌,周而复始,乐此不疲。他们的优点是每年会有三个月可以做家庭妇男,并且免费为子女做家庭教师。
    你也许会说,嫁给既有钱又有闲,既有情趣又有忠贞不渝的男人,肯定不会后悔。是这样的,但是,世间没有这么完美的男人。即使有,我们也配不上——因为我们自身不够完美。因此,嫁给谁都后悔,我们只能守着一份凡俗的婚姻,谁都不能幸免——因为我们都是有缺点的人。这很无奈,但这就是生活。也许谁都不嫁不后悔。但前提是你受得了形影相吊。
    1、辅犀骨之男
    辅犀骨是最易辨识的一类骨相,所在的位置是:靠近眉身的眉骨上方,向上延伸至发际处,此处隆起者就是生有辅犀骨的奇人,有些生得明显的,不但此处隆起,更在靠太阳穴的边缘,浅浅的有一道延伸的隆起线,这样的骨相,可谓贵不可言。要找到这样的好男,就快抓住不放吧!
    2、双耳贴脑之男
    双耳贴脑的人,拥有最佳耳相,通常成就颇高。五官相法喻耳是采听官,耳型美者听善言,自然有善心,所以一般而言,耳相好者心肠都不会太差,非常值得情人信赖。不过,也许是聪明过人的缘故,多半很有主见,有时难免固执一些,有时就当个小女人吧!因为结婚后,家中的主人通常是他不是你。
    3、悬胆鼻之男
    鼻头区域圆大饱满,不仅仅是肉丰而已,而是指鼻内部的骨头结构相当结实。从医理来分析,一个人的聪明才智、身体健康状况,都能从面相读出来,根源于面相能反应生理机能的良否。生有悬胆鼻,必然内脏构造优良、头脑发达,是以性格积极有为,必有所成。对于婚姻和爱情相当有责任感,虽然嘴巴不言爱,但却是很疼女朋友或老婆。
    4、地阁丰腴之男
    地阁是人一生晚运之所在,即在脸颊、下巴周围之处,丰腴、有肉的脸颊,代表好的人际关系,本身也比较随和、宽厚。特别在近左右腮骨处各有直的深纹一、两条,俗称成功纹,一方面表示此人积极努力的踏实个性,也表示人气聚集,定能时来运转,晚运大发!女性同胞们,这可是典型的绩优股,抱上了可别脱手!
    5、双眼澄澈深邃之男
    眼神深遂、眼波内双者,是个相当有幽默感的情人,也是个很聪明的读书人,企图心强,到了社会,眼神会越来越偏向锐利,而从事研究教学的人,眼神益发偏向深遂,却不显锐利,但两者的同一特色倒是都很疼爱自己的女朋友或老婆,因为他们很重视感情生活的经营。
    6、八字眉之男
    八字眉的特征是眉身特别上扬,到眉尾部份又陡然下降,长有这类眉的人,由于深具艺术细胞,与他相处会如沐春风,总觉得时光飞逝极快!身旁若有一个八字眉相格,女性同胞们,会觉得每天真的都是美好的日子。
    7、发际内凹之男
    如果你希望有一个善解人意的情人或老公,那么一定不能错过这样的男人,发际内凹,发际不是尖出来生长,反而向内凹进去,形成额正中少一撮头发的模样,拥有这种少见的相,无论外表如何,却多是“心”美的人。相当的温和有礼,心性十分柔软,特别是善解人意,极富有爱心,许多女性心中的偶像男星梁朝伟,额中的头发相当稀薄,就是有此相特征。
    8、鼻高势强之男
    鼻高隆,山根(两眼间)高,鼻子在脸的比例上稍稍偏大,准头丰圆,鉴台、廷尉(左右鼻翼)分明,而且完全不露孔。这种鼻的人,个性倾向朴实、实事求是,意志力和决断力都很强,会为了心所爱的人与家庭,冲锋陷阵,他们很重视亲人的想法,而且也有很好的沟通能力。
    9、唇肉饱满之男
    上下唇不但饱满而且富弹性,感觉上绷得嘴型格外清晰,嘴角相当长。喜欢说理式的表达,表情与肢体显出充满理性的智能,算是一类闷骚型的魅力人物,而这种知性、冷静的形象,会使人们在倾倒之余,还增加对他们的信服度,是典型的魅力老公!
    10、肌骨混合型之男
    天庭饱满,腮骨突出,加上一个明显而略尖的下巴。脸上的肉不能说是丰腴,但显得很结实,且不露骨,所以说是肌骨混合型。这种人的精力旺盛、活动力、幽默感皆很强,掌握重点的能力特别好,性格偏向快速有效率,最重要的是,具有值得信赖的特质,责任心重,重视情人的想法,也非常愿意倾听,是个幽默好男人。

    宝马的代价,她就为了仅仅20分钟的快感?

        一时尚女子驾一辆宝马735路过一个自行车修理摊,刮倒了一辆待修的自行车。女子急停后下车,要求修车师傅赔偿其损失,并对修车师傅百般辱骂。说是自行车刮了她的宝马.

        刚开始,修车师傅据理力争,说明是对方驾车撞倒自己区域内的东西,对方应承担主要责任。时尚女子哪肯罢休,于是上前推搡修车师傅。修车师傅挥手阻拦,碰巧把时尚女子衣服弄脏。出现此等变故,时尚女子更是不依不饶。便放言,车子的事情暂且不算,必须先拿3000元出来赔自己衣服。

        事情发展到这时,有很多人围观,也曾有过路者出面调解。修车师傅也忍气吞声的向时尚女子道歉,并且表示愿意为她清洗衣服。可时尚女子并不领情,继续辱骂修车师傅和上前调解的过路者,同时掏出了她的手机开始求援。此时此刻,她所做的是一个足以让她悔恨终身的错位决定。因为她的生命仅仅剩下不足一小时。

        时尚女子求援的对象正是她的父母,她们一家三口就住在对面的贵族社区。她的父来到现场后,并没有对事情原委做任何的了解,便直接抄起了地上的自行车打气筒朝修车师傅头部猛砸数下。顿时,修车师傅头部血如泉涌。部分实在看不下去的围观者开始指责其父行为,并有几个想上前劝架。她的父亲竟扬言,如果有谁敢靠近就打谁。此时,其父继续猛踢被他用打气筒砸倒的修车师傅腹部,其母则站在一旁破口大骂那些为修车师傅说话的路人和围观者。时尚女子则一直坐在开着空调的宝马车里,得意洋洋的看着这场闹剧的上演。

        几分钟过后,时尚女子父母打累了,骂累了。其父对修车师傅说:“一刻钟之内,老子要是看不到3000块钱,以后你他妈的就别在这里混了,你这条溅命值几个钱,做了你,省得老子看了你堵心。。。。。。”。修车师傅挣扎着从地上爬起来,吐了几口血唾沫,艰难的说:“你等一下,我这就去拿”。然后步履蹒跚地向贵族社区对面的贫民区走去。此时此刻,四名当事者的心境迥乎不同,但是都已经走上了一条不归路。

        约十来分钟,修车师傅返回了事发现场,来到时尚女子父亲面前。其父冷笑一声,便伸手跨步上前。就在此时,修车师傅猛地抽出怀中的右手,手里拿的并非是一沓钞票,而是一把雪亮的西瓜刀,他以迅雷不及掩耳之势刺向了对方的心脏,然后在同一部位又补了两刀,其父没有发出任何声响便栽倒在地。紧接着,修车师傅两三步跨到其母跟前,转瞬之间连捅三刀。杀红了眼的修车师傅并没有放过宝马车里早已目瞪口呆的时尚女子,象拎小鸡般地将她提出车外,连捅数刀后,扔于路边。

        几分钟后,警方和救护车均已赶到现场。警方不费吹灰之力便将凶手逮捕。而刚刚还活生生的三条人命,连急救的程序都没有进行便撒手人寰。

        四条人命,仅仅起因于一次微不足道的事情。是凶手残忍过度,还是逝者罪有应得,目击者众说纷纭。

        记得有一个好友曾经跟我说过:“现在的中国,遍地的戾气”。诚然,这遍地的戾气也不知道是何时开始悄然而生的,而且一直在加剧。这起案件是一个惨剧,更是一个深刻的社会问题!!!

        有钱人,我悄悄告诉你:要是身边没有10个以上保镖常随左右,就不要混充H社会老大,耍嘴皮子容易,一个修车师傅照样轻轻松松送你去见马克思。

        打人骂人是很痛快的,不要象故事里一样,为了20分钟快感,失去了宝贵的生命。

    坚持下去,成功迟早会光顾你

    一位著名的推销大师,即将告别他的推销生涯,应行业协会和社会各界的邀请,他将在该城中最大的体育馆,做告别职业生涯的演说。

    那天,会场座无虚席,人们在热切地、焦急地等待着那位当代最伟大的推销员作精彩的演讲。当大幕徐徐拉开,舞台的正中央吊着一个巨大的铁球。为了这个铁球,台上搭起了高大的铁架。

    一位老者在人们热烈的掌声中走了出来,站在铁架的一边。他穿着一件红色的运动服,脚下是一双白色胶鞋。

    人们惊奇地望着他,不知道他要做出什么举动。

    这时两位工作人员,抬着一个大铁锤,放在老者的面前。主持人这时对观众讲:请两位身体强壮的人,到台上来。好多年轻人站起来,转眼间已有两名动作快的跑到了台上。

    老人告诉他们游戏规则,请他们用这个大铁锤,去敲打那个吊着的铁球,直到把它荡起来。一个年轻人抢着拿起铁锤,拉开架势,抡起大锤,全力向那吊着的铁球砸去,一声震耳的响声,吊球动也没动。他接着用大铁锤接二连三地砸向吊球,很快他就气喘吁吁。另一个人也不示弱,接过大铁锤把吊球打得叮当响,可是铁球仍旧一动不动。台下逐渐没了呐喊声,观众好像认定那是没用的,就等着老人做出解释。

    会场恢复了平静,老人从上衣口袋里掏出一个小铁锤,然后认真地面对着那个巨大的铁球敲打起来。

    他用小锤对着铁球“咚”敲一下,然后停顿一下,再一次用小锤“咚”地敲一下。人们奇怪地看着,老人就那样“咚”敲一下,然后停顿一下,就这样持续地做。

    10分钟过去了,20分钟过去了,会场早已开始骚动,有的人干脆叫骂起来,人们用各种声音和动作发泄着他们的不满。老人仍然敲一小锤停一下地工作着,他好像根本没有听见人们在喊叫什么。人们开始忿然离去,会场上出现了大片大片的空缺。留下来的人们好像也喊累了,会场渐渐地安静下来。

    大概在老人敲打了40分钟的时候,坐在前面的一个妇女突然尖叫一声:“球动了!”刹那间会场鸦雀无声,人们聚精会神地看着那个铁球。那球以很小的幅度动了起来,不仔细看很难察觉。老人仍旧一小锤一小锤地敲着,吊球在老人一锤一锤的敲打中越荡越高,它拉动着那个铁架子“哐哐”作响,它的巨大威力强烈地震撼着在场的每一个人。终于场上爆发出一阵阵热烈的掌声,在掌声中老人转过身来,慢慢地把那把小锤揣进兜里。

    老人开口讲话了,他只说了一句话:“在成功的道路上,你如果没有耐心去等待成功的到来,那么,你只好用一生的耐心去面对失败。”

    人生箴言:你可以不思成功,但你的生活并不会因此而轻松。每个人都应耐心追逐成功,你会因此而品尝到成功的果实。成功就是简单的事情重复做,只在持之以恒地坚持下去,成功迟早会光顾你。

    男人恋爱不做的19件事

    两个人在一起真的是很需要缘份,既然你们选择了在一起,就用点智慧好好的经营你们的爱情吧。
      第一:不要问女人以前的事,毕竟过去的事了,说的详细你又受不了,说的简单你就心里老是打问号。

      第二:同样,你也不要和她说太多以前的事,特别是你以前如何如何的深情,如何如何的不要自尊去爱另一个女人。

      第三:不要有处女情结,虽然现在这社会,有处女情结的人不会很多,但终究是男人,多多少少会介意,记得摆正自己的心态。

      第四:不要太大男人主义,现在的新时代女性,再也不是以前的那些唯命是从的小女子了,过于大男人主义,会让人受不了。

      第五:不要把工作情绪带给她,你可以向她倾诉,但不要因为工作的问题 向她发脾气。

      第六:不要当面去夸别人的女人漂亮,女人嘛,永远都觉得自己是最美的,你可以夸别的女人另一些,比如她的内在美,这样令她觉 得自己的不足之余,又懂得努力去改正自己。

      第七:不要拿你以前的女友与她相比,说以前那个如何如何的好,那是不公平的,不同的人如何去比较呢。

      第八:不要在朋友面前,不拉她的手,或不抱抱她,那样她会很伤心,觉得你并不在乎她,也令她没面子,适当的在别人面前表现恩 爱是必要的,(特别不能在朋友面前对她呼呼喝喝)。

      第九:不要在大街上小眼不停盯着某一个女人,或者牵着她手的时候,不停的望身边的经过的女人,那是对她最大的屈辱。(你可以 在她不在的时候瞧瞧无所谓)

      第十:不要坦白自己的xxx,无论是之前的还是现在的,都不要让她知道,女人的死穴,永远不接受男人的身体出轨。
    第十一:不要不懂得说情话,甜言密语是爱情的润滑剂,但过多,就显得虚假。

      第十二:不要轻易去怀疑另一半,过度的不信任让人觉得你没自信之余,又心胸狭窄。

      第十三:不要试图去绑住一个女人,要坚信你温暖的怀抱是她一生的依靠,过多的举动则会吓跑对方。

      第十四:不要不懂得体贴另一半,累了发个短信打个电话安慰一下,那比买任何礼物来得贴心

      第十五:不要对不懂的事装懂,现在的女人可不是草包,很容易一眼就看穿你的肤浅,不懂就说出来,有什么大不了。

      第十六:不要在气跑女朋友之后也不追,甚至一个短信也不发,那样很容易让女人心灰意冷。

      第十七:不要在谈恋爱的时候,就把以后的事说的太现实化,那样会吓得她不敢和你走进婚姻的礼堂(结婚需要冲动,经营婚姻需要 智慧,离婚需要勇气)

      第十八:不要在开始的谈恋爱的时候,就急着说性,那样会让人觉得你只用下半身和她谈恋爱。

      第十九:不要睡在她身边的时候喊的是别人的名字,切记切记切……

      最后,祝大家爱情甜蜜~~

    如何去掉MSN中的图释

    现在,使用MSN的人越来越多了,在其中使用自定义的图释的也越来越多了。而,你不想看到图释该咋办呢?其实很简单,在自己的机器上,如下图所示打开工具=》选项,在“消息”一栏中有一个“显示图释”去掉前面的钩就好了!