# 帮帮忙!!!出现了...."传递资料给收件者时, 没有可使用的传输提供者。"

Posted by 若宓 on August 07, 1999 at 14:55:01:

在下在测mapi时,mail一直传不出去,
在Exchange Server - outlook98一直被退信,
出现了"传递资料给收件者时, 没有可使用的传输提供者。"

请问要怎么解决......
===================================================================
以下为在下写的发mail的物件类别模组:传回true,但是...会被退信...

Public Function SentMail(varRecipName As String, varRecipAddress As String, varSubject As String, varText As String) As Boolean

On Error GoTo Err1

MAPIForm.MAPISesn.UserName = "JOAN"
MAPIForm.MAPISesn.Password = "1128"
MAPIForm.MAPISesn.LogonUI = True
MAPIForm.MAPISesn.NewSession = True
MAPIForm.MAPISesn.DownLoadMail = False
MAPIForm.MAPISesn.Action = 1
MAPIForm.MAPIMsg.SessionID = MAPIForm.MAPISesn.SessionID
MAPIForm.MAPIMsg.Compose
MAPIForm.MAPIMsg.RecipDisplayName = varRecipName
MAPIForm.MAPIMsg.RecipAddress = varRecipAddress
MAPIForm.MAPIMsg.MsgSubject = varSubject
MAPIForm.MAPIMsg.MsgNoteText = varText
MAPIForm.MAPIMsg.Send
SentMail = True
MAPIForm.MAPISesn.SignOff
Exit Function
Err1:

SentMail = False
End Function

Follow Ups: