ASP访问Exchange Server问题
点击次数：29 次 发布日期：2008-11-21 23:10:40 作者：源代码网
|
Dim objSession,objMessage Dim bstrProfileInfo Set objSession=Server.CreateObject("MAPI.Session") bstrProfileInfo="SERVER2" & Chr(10) & "administrator" objSession.LOGOn "","",False,True,0,True,bstrProfileInfo Set ObjMessage=objSession.Outbox.Messages.Add "如果没有第一句(Response.Status=("401 Unauthorized")就出错,出错信息如 下 "******************************************************************* ******************************* "Collaboration Data Objects 错误 "00000505" "You do not have permission to log on. [Microsoft Exchange Server In formation Store - [MAPI_E_FAILONEPROVIDER(8004011D)]] "/email/sendmessage.ASP, 行14 "我的想法是: "Exchange需要验证administrator的口令,这可以理解,否则怎么能够往adminis trator的Outbox里面添加信息呢? "问题在于我不想它弹出一个身份验证的窗口 "另外,如果有第一句的身份验证,则要进行三次登录,并且把这个E-mail重复发送 ,why? "****************************************************************** ******************************* objMessage.Subject="TEST" objMessage.Text="TEST" Set objonerecip = objmessage.Recipients.Add objonerecip.Name = "hexh@gemway.com" objonerecip.Resolve objMessage.Send objSession.LOGOff %> 源代码网供稿. |
