阅微堂 http://yueweitang.org/blog zhiqiang's personal blog Sun, 22 Nov 2009 05:26:41 +0000 http://wordpress.org/?v=2.9-rare en hourly 1 nozhiqiang's personal bloghttp://zhiqiang.org/bloghttp://zhiqiang.org/favicon.ico???zhiqianghttp://feedburner.google.com Outlook中实现Gmail中的存档功能 http://yueweitang.org/blog/posts/archive-email-in-outlook.html http://yueweitang.org/blog/posts/archive-email-in-outlook.html#comments Sun, 22 Nov 2009 05:26:41 +0000 zhiqiang http://yueweitang.org/blog/?p=953 时间管理中有重要的一条，保持你的收件箱整洁、干净。Gmail一个重要的创新就是Archive（存档），选中邮件后点下“archive”按钮或者按一下快捷键y，邮件就被移出收件箱，但又跟删除邮件不一样，这些邮件还可以继续被搜索。这里讲最近写的如何在Outlook里实现这个功能。

效果：按快捷键ALT+Y或者点击工具栏上的“存档”按钮，选中的邮件自动转移到事先设定好的存档文件夹内。

image

实现方法：

1. 在收件箱下建立存档文件夹，文件夹名为“存档”。

2. 核心工具是macro(宏)，具体讲是一段vba代码。按ALT+F11，打开VBA编辑器，展开左侧的Project1，输入下列代码：

Sub ArchiveEmail()
    Dim destFolder As Outlook.folder
    Dim sel As Outlook.Selection, item As Outlook.MailItem
    Set destFolder = Outlook.Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Folders("存档")
    Set sel = Application.ActiveExplorer.Selection

    For Each item In sel
        item.Move destFolder
    Next item
End Sub

3. 接下来我们要做的两个事情，设置快捷键和在工具栏上放置按钮。不同于Excel中可以给自定义宏设置快捷键，Outlook无法直接给自定义宏设置快捷键，只有通过将宏放在工具栏上来间接实现。

  • Outlook主界面的工具栏上点右键 –> 自定义 –> 重排命令，选择常用工具栏
  • 点击添加，选中“宏”中的Project1-ThisOutlookSession-ArchiveEmail后确定。
  • 将刚才添加的宏上移或者下移到喜欢的位置，我把它放在“删除(D)”的下面。
  • 点右侧的更改所选内容，将其命名改为“存档(&Y)”，还可以给按钮选一个比较好看的按钮图像，我选的是笑脸符号。

 

以上在Office 2007+Win XP上试验通过。

© zhiqiang for 阅微堂, 2009. | 链接 | 0条评论

]]> http://yueweitang.org/blog/posts/archive-email-in-outlook.html/feed 0 VBA中的Date类型的匹配问题 http://yueweitang.org/blog/posts/match-date-in-vba.html http://yueweitang.org/blog/posts/match-date-in-vba.html#comments Sat, 21 Nov 2009 15:25:16 +0000 zhiqiang http://yueweitang.org/blog/?p=954 VBA的Date类型比较奇怪。

测试：

1. 新建一个空白的Excel文档，在A1单元格输入2009-11-12。

2. 打开VBA编辑器，插入模块，增加下面这个宏

Sub test()
    MsgBox #11/12/2009# = Range("A1").Value ' true
    MsgBox VarType(#11/12/2009#) = VarType(Range("A1").Value) ' true
    MsgBox Application.WorksheetFunction.Match(#11/12/2009#, Range("A1"), 0) ' error
End Sub

3. 按F5运行test宏，可以看到Range("A1")的类型和值都和#11/12/2009#一致（通过对range("A1")的监视也可以看出这一点），都是Date类型，但是如果用match去匹配的话，却出现错误。

解决方法，在匹配中将要匹配的Date类型的数据强制转换成Long类型去匹配。

MsgBox Application.WorksheetFunction.Match(CLng(#11/12/2009#), Range("A1"), 0)

对其原理还是不清楚，不知道有没有看到的高手来做一下解释。

© zhiqiang for 阅微堂, 2009. | 链接 | 2 条评论

]]> http://yueweitang.org/blog/posts/match-date-in-vba.html/feed 2 Oracle：存取器不是参数存取器 http://yueweitang.org/blog/posts/accessor-is-not-a-parameter-accessor-error.html http://yueweitang.org/blog/posts/accessor-is-not-a-parameter-accessor-error.html#comments Sat, 21 Nov 2009 12:57:27 +0000 zhiqiang http://yueweitang.org/blog/?p=952 最近写一个vba程序的时候不间歇的出现 “存取器不是参数存取器 ”的错误。后来发现对于我等不专业人士，遇到这样的错误还挺e的。下面是综合各种资料了解到的一些东西。

问题多出现在有乘法或者除法或者其它产生高精度小数的时候，这类错误应该是Oracle和vba里的数据精度不一致导致的，Oracle里的数据精度为38位，而微软VB ADO系统的精度最高只能支持28位的精度，导致对接出了问题。具体可见http://support.microsoft.com/?scid=kb;en-us;327557&x=16&y=11

目前两个解决方案：

1.  不要用Oracle客户端自带的 Ole驱动，用微软的 Old驱动。

Provider=MSDAORA

这个应该是微软提供的驱动解决了数据连接的问题。这个方法基本上解决了大部分问题，但麻烦在于微软自带的驱动不支持Oracle一些功能，比如调用某些存储过程。

2. 直接改查询语句，利用trunc和round函数，将所有可能产生高精度数值的结果主动截断。

select trunc(1.11231234122312, 3) from dual

这个方法是有效的，但是我觉得很奇怪，上面的截断是用十进制位数，但保存的时候应该是二进制的，十进制的截断代表什么意思呢？

© zhiqiang for 阅微堂, 2009. | 链接 | 0条评论

]]> http://yueweitang.org/blog/posts/accessor-is-not-a-parameter-accessor-error.html/feed 0 关于民科 http://yueweitang.org/blog/posts/about-non-governmental-scientists.html http://yueweitang.org/blog/posts/about-non-governmental-scientists.html#comments Thu, 19 Nov 2009 13:05:53 +0000 zhiqiang http://yueweitang.org/blog/?p=951 志强，你好：

我是(XX)的编辑(XXX)，在北大读本科的时候就一直看你的阅微堂。知道你曾在北大数院待过。最近我们要做一个民间科学家话题，其中有一个是哥德巴赫猜想证明，想请一位数学人士对此进行一下点评，不知道能否说两句。可以不针对哥德巴赫猜想本身，只是针对民间科学家对这些世界难题的热心发表几句看法就行。

期待你的答复：）

我的回复：

如果一个民科去搞些科技和发明啥东西，我坚决支持，毕竟人的想象力是无穷的。但是对于那些动辄申明攻克了哥德巴赫猜想等世界难题的民科，我认为他们的精神都是有问题的。

我接触过两个民科，其中一次是本科大二的时候吧。一个民科给我写信，申称自己解决了哥德巴赫猜想，并给我寄了一份他的答案。他的证明只有三页纸，就是些简单的加减乘除，从最开始的几行就错了。但是跟他指出之后，他可不认为那是错误，还给我打电话，骚扰了我好久。

第二次是后来念研究生的时候，一个民科打电话到实验室，声称给出了3SAT问题的算法，从而得出了NP等于P。这个民科比上面这位靠谱些，毕竟还知道3SAT问题和会一些编程。我一听就问了一下怎么做的，这位民科扭捏了半天，说这个是机密，要跟我导师谈。跟我导师谈这事儿我可做不了主。但他最后透露了一个信息，就是他的程序可以输出问题的所有有效解。这时候问题就出来了，他的算法不可能是多项式的，因为3SAT问题的解空间都可能是指数量级。但是最后他还是坚信他的程序是正确的，而且他还相信他的程序很值钱，绝对不能公开。

这两位民科都是这样，拿着一个明显错误的答案当宝，拒不承认自己的错误。这也是很多民科的共性，多数民科的解答都很简单，按道理非常容易被证实和证伪，但是他们的固执让人难以想象。当然还有另外一类民科，完全从哲学或者文字上证明难题的，就更是有精神病了。

© zhiqiang for 阅微堂, 2009. | 链接 | 7 条评论

]]> http://yueweitang.org/blog/posts/about-non-governmental-scientists.html/feed 7 刘涛的《中国世纪》系列文章 http://yueweitang.org/blog/posts/liu-tao-century-of-china.html http://yueweitang.org/blog/posts/liu-tao-century-of-china.html#comments Fri, 16 Oct 2009 00:20:38 +0000 zhiqiang http://yueweitang.org/blog/?p=950 刘涛先生已经建立了自己的博客，继《中国崛起策》之后，发表了新作《中国世纪》的9篇文章，下面还要发21篇 谈中国国内改革的文章，欢迎大家到刘涛先生的博客上参与讨论。

地址：

凤凰网博客 http://blog.ifeng.com/2512125.html
新浪网博客 http://blog.sina.com.cn/liutdeboke

© zhiqiang for 阅微堂, 2009. | 链接 | 7 条评论

]]> http://yueweitang.org/blog/posts/liu-tao-century-of-china.html/feed 7 nonadult