vb发送邮件"连接服务器失败"怎么办？

工程－引用MicrosoftActiveXDataObjects2（选一个高版本的）Setconn=NewADODBConnectionconnStr="Driver={SQLServer};DataBase=test;Server=(local);UID=sa;PWD=123"connOpenconnStrSetrs=NewADODBRecordsetsql="selectfromask_info"rsOpensql,conn,1不难啊，搞这么复杂干嘛。如果不是本地，就写server=xxxxxxxx

原因：设置错误导致。解决方法：重新正确设置来解决此问题。

如下参考：

1首先，在openoutlook邮件中进行了自添加账户的 *** 作，如下图所示。

2 打开要链接的邮箱设置，确保选择了pop3服务，如下图所示。

3在outlook账户设置中，进入链接邮箱后，确保选择的账户类型为“pop3”。

4这样设置完成后，outlook的账户类型与链接邮箱保持一致，就可以完成收发邮件的管理，如下图所示。

---