站内搜索
分类列表
本类阅读排行
本类推荐文章
- 配置整合Win+Apache+PHP+MySQL+Tc...
- 动态网页制作PHP常用的正则表达式
- PHP实例:上传多个图片并校验的代...
- PHP5中新增加的日期(date)函数的常...
- PHP实例:实现给上传图片加水印图案
- PHP 开发中的中文编码问题
- 用PHP程序直接调用文本文件内容实...
- PHP初学者:配置Apache服务器并且...
- 详细学习PHP中对文件和目录的操作...
- 确保PHP安全,不能违反的四条安全...
- 怎样在PHP 中运用 SimpleXML 处理...
- PHP5.2+APACHE2.2+BugFree1.0的安...
- PHP正式进入IIS微软与Zend携手推动...
- PHP5中PDO的简单使用
- Web服务器IIS6的PHP最佳配置方法
广告
NT下基于邮件服务软件(IMAIL)的邮件发送程序--(网络版)
作者: 来源: 点击: 日期:2007-6-22 0:36:34
如果你无法在服务器上安装IMAIL,那只能通过socket来发送邮件。但是如果你幸运的话,也可以用163/sina的
smtp服务。
例程如下(原程序由马毅兄提供):
<HTML>
<HEAD>
<TITLE>Mail Form anywhere </TITLE>
</HEAD>
<BODY>
<?
if($sendit)
{
$smtpserver="202.110.200.242" ; //将此处设为IMAIL的IP
echo "<pre>" ;
$fp = fsockopen($smtpserver, 25, &$errno, &$errstr, 10) ; //连接smtp服务器,端口25
if(!$fp) die("wrong open smtp SERVER") ;
$hostreplay=fgets($fp,128);
//if (!strstr($hostreplay,"220")) die(" can n't receive the 220 answer ") ;
$smailname=strstr(ltrim($hostreplay),"220 ") ;
$smailname=substr($smailname,0,strpos($smailname,".")) ;
//echo "\nsmailname:$smailname\n" ;
fputs($fp,"$smailname \n") ;
$hostreplay=fgets($fp,128);
//if (!strstr($hostreplay,"250")) die(" can n't receive the 250 answer ") ;
fputs($fp,"MAIL FROM: \n") ;
$hostreplay=fgets($fp,128) ;
if (!strstr($hostreplay,"250")) {
fputs($fp,"MAIL FROM: root\n") ;
$hostreplay=fgets($fp,128) ;
if (!strstr($hostreplay,"250")) {
fputs($fp,"MAIL FROM: root@263.net\n") ;
echo($hostreplay=fgets($fp,128)) ;
if (!strstr($hostreplay,"250")) {
fputs($fp,"MAIL FROM: $from_address\n") ;
$hostreplay=fgets($fp,128) ;
if (!strstr($hostreplay,"250")) die(" can n't receive the 250 answer ") ;
};
};
};
fputs($fp,"RCPT TO: $to_address\n") ;
$hostreplay=fgets($fp,128);
if (!strstr($hostreplay,"250")) {
fputs($fp,"RCPT TO: $mailname\n") ;
$hostreplay=fgets($fp,128) ;
if (!strstr($hostreplay,"250")) echo(" can n't receive the 354 answer") ;
};
fputs($fp,"DATA\n") ;
$hostreplay=fgets($fp,128) ;
if (!strstr($hostreplay,"354")) die(" can n't receive the 250 answer ") ;
$tosend="From: $from_address\n";
$tosend.="To: $to_address\n";
$tosend.="Subject:".str_replace("\N"," ",$subject)."\n你好,这是yukuang发给您的一封测试信!!
NT下基于邮件服务软件(IMAIL)的邮件发送程序--(网络版) 评论
