cszhz(丑小鸭)请进

Question

  SMTP.UserID := 'cszhz';
  SMTP.Password := '你的密码';
  SMTP.Host := 'smtp.263.net';
  SMTP.Port := 25;
  SMTP.Connect;下面这段我可以不要吗？不要会出现503错误吗？
  try
    rst := smtp.SendCmd('auth login',[]);
    if rst = 334 then
    begin
      rst := smtp.SendCmd('用base64加密的用户名',[]);
      if rst = 334 then
      begin
        rst := smtp.SendCmd('用base64加密的密码', []);
        if rst = 235 then
          showmessage('授权成功');
      end;
    end;

Answer 1

当然不可以！！！
要按照协议的规范来。说实话，是有一天在网上下了几个搜索email的工具，但是都是要注册马的
我挺气愤，就自己写了一个。当时我也曾有你同样的问题，但是如果你仔细看smtp协议的话，就会知道那是不可以的。因为大多的smtp服务器需要验证，就是在你connect之后，在你send之前，
当然你用SendCmd也可以发送邮件。你应该想想人家smtp服务器凭什么让你去找某个帐号存在不存在，只有根据协议：假装发送email，根据返回值判断。
^_^