[原创]在做Outlook VBA开发时如何禁止OUTLOOK的安全提示

sunya_0529 · 发表于 2009-12-4 18:10

很好用，在Office2007里还有个设置项，到2003里怎么就没有了，还好有这个方法，学习了，谢谢楼主以其他大虾！

synpo · 发表于 2009-12-30 16:50

原帖由 Long_III 于 2008-7-31 13:47 发表
未注册时在Excel里，直接引用一个osmax.ocx就可以了。后想在Outlook里测试，注册了这两个文件，并都引用了，居然还提示参数不正确。真是奇怪！

遇到和你同样的问题，请问你最后是怎么解决的

synpo · 发表于 2009-12-30 16:49

原帖由 ikolo 于 2006-11-15 15:14 发表
没问题了：）只是一个语法小错误~不过好像另一个DLL没有用到，是会被这个OCX引用吗？

注册了，引用了，还是报参数出错啊

yuanisme · 发表于 2010-1-9 14:58

《运行到connectto的时候总是报错参数不正确》解决方法如下：

Dim OUTLOOKAPP

去掉这一行：'Set OUTLOOKAPP = CreateObject("outlook.application")
DisablePrompt(OUTLOOKAPP)

Function DisablePrompt(byref object)
Dim tmp

添加这一行：Set object = CreateObject("outlook.application")
Set tmp = CreateObject("addinexpress.outlooksecuritymanager")
tmp.ConnectTo(object)
tmp.DisableOOMWarnings = True
tmp.DisableCDOWarnings = True
tmp.DisableSMAPIWarnings = True
End Function

sunya_0529 · 发表于 2010-1-12 19:23

原帖由 synpo 于 2009-12-30 16:50 发表

遇到和你同样的问题，请问你最后是怎么解决的

我现在的组合是卸载了Outlook 2003，单独安装了Outlook 2007，这个搭配挺和谐，用来发加密的电子工资条，效率真的不一般。

yuanisme · 发表于 2010-1-11 18:55

为何outlook不打用VBA的功能发的邮件会在outlook的发件箱中发不出去，打开outlook时过一会儿才发出去怎么回事呀，要是outlook开着的情况下立即就可以发出去

svw · 发表于 2010-1-26 11:15

试过了，单纯的dim为outlook.application的在office2003上可以，但如果dim withevents App as outlook.application的话是无效的。connect to会出错。

ji_richard · 发表于 2010-6-18 16:59

原帖由 csb2000cn 于 2008-12-17 17:39 发表
我采用Long_III前辈的代码，因为用regsvr32注册时失败，提示找不到指定的模块
结果也是运行到tmp.connectto object时，出现了如下框框：
C:\Documents and Settings\zhusu1\My Documents\error.jpg
图片上传不了, ...

你把两个控件都注册即可解决.

快乐懒人 · 发表于 2010-6-19 17:22

看不明白哦

yb010 · 发表于 2010-10-26 22:55

标记标记！回来

		自动登录	找回密码
密码			免费注册

[原创]在做Outlook VBA开发时如何禁止OUTLOOK的安全提示

回复 2楼 ikolo 的帖子

但似乎对于withevent方式定义的application无效