求助~ Net::SMTP 模块发邮件的疑惑

sumin_0527

UID: 26879
帖子: 2
积分: 4
在线时间: 10 分钟

1^# sumin_0527 发表于 2008-03-20 17:12

求助~ Net::SMTP 模块发邮件的疑惑

大家好啊~

我们公司用 Net::SMTP 发邮件的~公司内部的没什么问题的~可以正常发送的~最近想发给外部客户的~突然发现怎么外面的邮件地址收不到邮件呀??请大侠们帮下忙啊

use Net::SMTP;
my $smtp = new Net::SMTP 'SHMAIL-1';
$smtp -> mail('A@###.cn');
$smtp -> to('B@###.cn');
$smtp -> data();
$smtp -> datasend("From: A\n");
$smtp -> datasend("To: B\n");
$smtp -> datasend("Subject: TEST\n");
$smtp -> datasend("\n");
$smtp -> datasend('test');
$smtp ->dataend();
$smtp ->quit;

上面的代码中, $smtp -> to('') 中的邮件地址如果是公司内部的用户的话是可以发送成功的,但是改成其他的邮件地址,如我的163的邮箱的话就怎么也收不到邮件勒~~这个是为什么啊?

sumin_0527

UID: 26879
帖子: 2
积分: 4
在线时间: 10 分钟

2^# sumin_0527 发表于 2008-03-21 08:56

急啊~~高手帮忙啊~

sewenew

UID: 34648
帖子: 1
积分: 2
在线时间: 10 分钟

3^# sewenew 发表于 2008-03-21 10:04

把所有类似于$smtp -> datasend("From: A\n");中的\n改成\r\n试试
ps：你的邮件服务器不需要用户名密码认证么？

sumin_0527

UID: 26879
帖子: 2
积分: 4
在线时间: 10 分钟

4^# sumin_0527 发表于 2008-03-21 12:30

我用的是公司的 SMTP服务器的~~
没有用户名密码认证的~ 发公司内部的邮件帐号都可以的哦,发163的就收不到阿......

apile

UID: 42255
帖子: 66
积分: 151
在线时间: 6 小时

5^# apile 发表于 2008-03-21 22:32

問問管理郵件主機的人..應該有限制....寫程序沒辦法寄出去...
很多公司都這樣.設定.....這個我記得可以設定例外清單..

gogo407

UID: 8738
帖子: 9
积分: 20
在线时间: 10 分钟

6^# gogo407 发表于 2008-03-23 20:08

QUOTE:

原帖由 sumin_0527 于 2008-3-20 17:12 发表
大家好啊~

我们公司用 Net::SMTP 发邮件的~公司内部的没什么问题的~可以正常发送的~最近想发给外部客户的~突然发现怎么外面的邮件地址收不到邮件呀??请大侠们帮下忙啊

use Net::SMTP;
my $s ...

同一域下面的是不需要认证的
请确认不需要认证可以向外域发送邮件再说（用其他mail客户端)

sumin_0527

UID: 26879
帖子: 2
积分: 4
在线时间: 10 分钟

7^# sumin_0527 发表于 2008-03-24 08:47

如果向外域发送邮件需要认证的话应该怎么写呢???