！百分相送！邮箱语法错误！如何解决！(WinSock编程)24小时在线！

[yxgsb]

我用WinSock编程如下:
'--------------------------------------------------------------------
Winsock1.LocalPort = 0 '设置本地使用的端口
Winsock1.Protocol = sckTCPProtocol '设置Winsock控件使用的协议TCP或UDP。
Winsock1.RemoteHost = "smtp.21cn.com" '设置发送Email的服务器
Winsock1.RemotePort = 25 '设置要连接的远程端口号
Winsock1.Connect '返回与远程计算机的连接。

Private Sub Winsock1_Connect() '当一个 Connect 操作完成时发生

Winsock1.SendData ("HELO webmail.21cn.com" + vbCrLf) '开始发送
Winsock1.SendData ("MAIL FROM:" & "<[e-mail]>" & vbCrLf)
Winsock1.SendData ("rcpt to:" & "<[e-mail]>" & vbCrLf)

Winsock1.SendData ("DATA" & vbCrLf)
Winsock1.SendData ("Send Mail" & vbCrLf & "text OK !" & vbCrLf & "." & vbCrLf)
Winsock1.SendData ("quit" + vbCrLf)
End Sub

当程序执行到 Winsock1.SendData ("rcpt to:" & "<[e-mail]>" & vbCrLf)
时，服务器返回 553（邮箱语法错误）
请问何故？如何解决？分不够再加！