用了这么久的Foxmail还是觉得它比较好用的,但是不知何故Foxmail没有如Outlook一样,打开就可以自动连接收信。我又不想给每个信箱加上定时自动收信功能,因为它解决不了开机后即可收信的问题,也比较讨厌,不断的自动收信,没有什么意义。
如此不爽久矣,我最近干脆动手自己写了的一个自己用的工具(编程语言VB2003),如图:
可以解决:
1、开机启动但不能自动收取所有信箱的信件。
2、可以在随时打开本工具启动Foxmail并自动收取信件。
其实实现的原理很简单:
Foxmail中菜单告诉我们,打开Foxmail后点击F4键就可以自动收取所有邮箱的信件。在.net中有一个sendkeys.sendwait方法,可以模拟发送按键消息。
如上面的代码,还需要一个timer,控制程序在目标程序启动后自动关闭。
关于sendkeys为什么用sendwait方法,由于开机时有很多程序自动启动,为避免窗体焦点丢失(请看:http://vckbase.com/document/viewdoc/?id=1360),导致消息不知所终,不知道VS2005有没有解决这个问题。而且就我在做这个工具的试验中也是如此,用SendKeys.Send也确有不能成功自动收信的情况,改为sendkeys.sendwait后到现在还没有看到不能自动收信的情况。
最后把exe文件的快捷方式发送到桌面,至于自动启动增添键值到HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run就可以了。
单击工具窗体就可以使timer停止,双击继续。两个文本框中上一个是程序路径,下面的是动作。为什么这么做?只是方便启动其它程序,可以不是Foxmail。
下载源程序:/Files/brinksman/foxmailbp.rar
如此不爽久矣,我最近干脆动手自己写了的一个自己用的工具(编程语言VB2003),如图:
可以解决:
1、开机启动但不能自动收取所有信箱的信件。
2、可以在随时打开本工具启动Foxmail并自动收取信件。
其实实现的原理很简单:
Foxmail中菜单告诉我们,打开Foxmail后点击F4键就可以自动收取所有邮箱的信件。在.net中有一个sendkeys.sendwait方法,可以模拟发送按键消息。
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
path = pathtxt.Text
act = actRbt.Text
ProcID = Shell(path, AppWinStyle.NormalFocus)
SendKeys.SendWait(act)
Me.Close()
End Sub
path = pathtxt.Text
act = actRbt.Text
ProcID = Shell(path, AppWinStyle.NormalFocus)
SendKeys.SendWait(act)
Me.Close()
End Sub
关于sendkeys为什么用sendwait方法,由于开机时有很多程序自动启动,为避免窗体焦点丢失(请看:http://vckbase.com/document/viewdoc/?id=1360),导致消息不知所终,不知道VS2005有没有解决这个问题。而且就我在做这个工具的试验中也是如此,用SendKeys.Send也确有不能成功自动收信的情况,改为sendkeys.sendwait后到现在还没有看到不能自动收信的情况。
最后把exe文件的快捷方式发送到桌面,至于自动启动增添键值到HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run就可以了。
单击工具窗体就可以使timer停止,双击继续。两个文本框中上一个是程序路径,下面的是动作。为什么这么做?只是方便启动其它程序,可以不是Foxmail。
下载源程序:/Files/brinksman/foxmailbp.rar