用以下代码发邮件时,老是跳出一个提示:该如何屏蔽?谢谢!
-------------------------------------------
Outlook Express
一程序正试图以你的名义发送下面的邮件:
到:
主题:
--------------------------------------------
   MAPISession1.DownLoadMail = False 
   MAPISession1.LogonUI = True 
   MAPISession1.SignOn 
    
   MAPIMessages1.SessionID = MAPISession1.SessionID
   MAPIMessages1.Compose 
   MAPIMessages1.RecipAddress = "[email protected]" '收信人地址
   MAPIMessages1.ResolveName
   MAPIMessages1.RecipDisplayName = "KENJI" '收信人姓名   MAPIMessages1.MsgSubject = "MAPI 邮件测试" '发信的主题
   MAPIMessages1.MsgNoteText = "测试邮件正文!" '发信的内容
   
   MAPIMessages1.Send 
   MAPISession1.SignOff

解决方案 »

  1.   

    验证收件人姓名
    收件人姓名在发送消息时,用 ResolveName 方法,参照电子邮件系统中注册的用户列表进行验证。本地工作组之外的收件人姓名的检查,由基本的消息系统用不同方法进行验证。下面的示例调用 ResolveName 方法验证了收件人的有效电子邮件名称,并将 AddressResolveUI 属性设置为 True。'验证收件人姓名
    mpmMessage.AddressResolveUI = True
    mpmMessage.ResolveName发送消息时,如果收件人地址有二义性或无效,可以通过将 AddressResolveUI 属性设置为 True 以显示对话框输入详细情况,或设置为 False 以产生错误。如果找到了较接近的地址,输入详细情况的对话框将提供一个替换的地址。消息主题和文本
    MsgSubject 属性指定了消息的主题行。包括 Null 字符在内,在主题中最多可以输入 64 个字符。该消息的消息体包含在 MsgNoteText 属性中。在入站 (inbound) 的消息中,每段消息由回车换行符 (vbCrLf) 结束。出站 (Outbound) 的消息中,每段消息可以由回车符 (vbCr)、换行符 (vbLf),或者回车换行符结束。'创建消息
    mpmMessage.MsgSubject = "Status Report"
    mpmMessage.MsgNoteText = "Build successful!"发送消息
    要发送消息,可使用 Send 方法。Send 方法在发送消息过程中允许与用户进行交互,或者不交互。将该值设置为 True,将显示基本的电子邮件系统(比如 Microsoft Exchange)的撰写消息对话框。将其设置为 False 则在发送消息过程中,不显示撰写消息对话框。在下面的示例中,当发送消息时,没有提示用户进行交互:'发送消息
    mpmMessage.Send = False处理文件附件
    用文件附件属性可在传出的消息中添加文件附件。在下表中列出了这些属性:属性 描述 
    AttachmentCount 返回与当前编号消息相关联的附件总数。 
    AttachmentIndex 设置当前编号的附件。 
    AttachmentName 指定当前编号文件附件的名称。 
    AttachmentPathName 指定当前编号文件附件的完整路径。 
    AttachmentPosition 指定在消息体中当前编号的附件位置。 
    AttachmentType 指定当前编号文件附件的类型。 
    要在传出的消息中添加附件,可以使用 AttachmentPathName 属性指定该文件的名称和路径。例如:'添加附件
    mpmMessage.AttachmentPathName = "c:\Status _ 
    Report.doc"如果路径名错误或空,将会产生错误。只需简单地指定 AttachmentPathName 属性即可与消息一同发送附件。这时,该附件的文件名将显示在消息体中,并将附件放置在消息的开头。AttachmentName 属性可用于为文件附件指定不同的名称。如果没有设置这个属性,在消息体中将显示该文件的真实名称。AttachmentPosition 属性被用来指定附件在消息体中的位置。按照缺省规定,该值是“0”,这时附件放置在消息体的开始位置。要将附件放置到消息的末尾,需要计算消息体中的字符数。例如,在长度为五个字符的消息体中,将该值设置为 4,即可将附件放到消息的末尾(消息体占据字符位置 0 到 4)。在同一消息中,两个附件不能放置在相同位置上。也不能将附件放置到消息体的结尾或结尾之后。可以在消息体的末尾加上一个多余的空格或 vbCrLf 字符,然后将 AttachmentPosition 属性设置为比 MsgNoteText 属性的长度少一的值。管理消息
    剩下的许多 MAPIMessages 控件的属性和方法,可用来管理消息,就象在功能完备的电子邮件应用程序中所做的那样。通过访问阅读缓冲区中的消息,可以对一个或一组消息进行排序、删除或转发操作。下表列出了可用于管理消息的属性:属性 描述 
    MsgConversationID 指定当前编号消息的对话线程标识符。 
    MsgCount 返回当前消息处理会话期间在消息集合中的消息总数。 
    MsgDateReceived 返回接收到当前编号消息的日期。 
    MsgID 返回当前编号消息的标识字符串。 
    MsgIndex 指定当前编号消息的编号。 
    MsgOrigAddress 返回当前编号消息的发出者的电子邮件地址。 
    MsgOrigDisplayName 返回当前编号消息的发出者的姓名。 
    MsgRead 返回指出该消息是否已被阅读过的 Boolean 表达式。 
    MsgReceiptRequested 指定当前编号的消息是否需要发回执。 
    MsgSent 指定当前编号的消息是否已被发送到电子邮件服务器进行分发。 
    MsgType 指定当前编号消息的类型。 
    使用地址簿
    电子邮件系统的地址簿中包含了在电子邮件系统注册的每个用户的地址信息。该地址簿是一个对话框,在该对话框中用户可以浏览和验证收件人的地址。地址簿属性可用于设置和修改地址簿的元素。Show 方法
    用 Show 方法可以显示电子邮件系统的地址簿。Show 方法可被设置为显示地址簿,或显示收件人详情对话框。按照缺省规定,该值被设置为 False,这时使用 Show 方法将显示地址簿对话框。要显示收件人详情对话框,可将该值设置为 True。在该对话框中显示多少信息要取决于所使用的电子邮件系统。至少收件人的姓名和地址会被显示出来。地址簿属性
    地址簿属性可用于设置和修改电子邮件系统的地址簿中的元素。下表列出了这些属性:属性 描述 
    AddressCaption 指定在地址簿顶部出现的标题。 
    AddressEditFieldCount 指定在地址簿中为用户显示哪些编辑控件。 
    AddressLabel 指定地址簿中“到”编辑控件的外观。 
    AddressModifiable 指定用户是否可以修改地址簿。 
    AddressResolveUI 指定在确定地址过程中,处理收件人姓名时,是否显示对话框。 
    所有的地址簿属性,在设计时都可通过 MAPIMessages 控件的“属性页”对话框进行设置。在设计时设置 MAPIMessages 的属性在设计时设置地址簿属性,可以指定地址簿对话框的显示和功能选项。例如,可用 AddressCaption 属性改变地址簿对话框的标题。
      

  2.   

    在outlook中,工具-选项-安全中有一项安全提示,不要选它就可以了
      

  3.   

    GOOD!!
    To  hurricane2003(嗨),快到我的帖子发一下这个同样的回答吧。
    我马上就给你分了,另外一个人像是做广告的,给分给他不甘心:p
    http://expert.csdn.net/Expert/topic/2429/2429180.xml?temp=.6779138To 楼主,要实现删除Outlook邮箱里的信,你可以使用Outlook Object来实现,详情请看:
    http://www.microsoft.com/china/msdn/library/dndotnetout2k2/html/odc_oldevsol.asp
      

  4.   

    奇怪,在VB中MAPI难道只有选择“部件”才能使用?
    而不能用“引用”??
    引用里好像只有“MAPIforVBX”,那这个并无MAPIMessage对象(只有这样一个属性)。怎么回事呀?
      

  5.   

    在VB里能可视地设置TAB顺序吗,就像VFP和VC一样。
    而不用在属性对话框里一个一个自己打数字:(