ارسال البريد بدون sendmail؟؟؟؟

[أبو طارق]

لا يدعم موقع Free.prohosting.com عملية إرسال البريد من الموقع عبر ملفات CGI .... فهل يمكنني إرسال البريد من غير استخدام برنامج sendmail الموجود على الموقع أي عن طريق أي STMP Server وإذا أمكن ذلك فكيف يتم؟؟؟

أرجو التفصيل من ذوي الخبرة

------------------

[خالد2000]

هذه المعلومات موجودة في
http://www.CGI-Resources.com
و اذا كنت تحتاج الـ subroutine الخاصة بها , أخبرني .....

[أبو طارق]

أخي : خالد 2000 شكرا
أرجو التوضيح أكثر
فقد ذهبت للموقع الذي ذكرته وضعت فيه

------------------

[خالد2000]

ضع ما بين الخطين في برنامج الـ CGI الخاص بك
<BLOCKQUOTE><font size="1" face=" Arial">code:</font><HR><pre>
####################################################################

sub send_mail{
my ($from, $to, $subject, $body) = @_;

use Net::SMTP;

# set to 1 to enable debug mode
my $debug = 0;

# get the recipients for smtp to identify
my $smtp_from = $from;
my $smtp_to = $to;

# build the mail message
my $mail_message = &lt;&lt;__END_OF_MAIL__;
To: $to
From: $from
Subject: $subject

$body

__END_OF_MAIL__

# Set this parameter if you don't have a valid Net/Config.pm entry for SMTP host
# and uncomment it in the Net::SMTP-&gt;new call
# my $smtp_server = 'my.mailhost.com';

# init the server
my $smtp = Net::SMTP-&gt;new(
# $smtp_server,
Timeout =&gt; 60,
Debug =&gt; $debug,
);

# I'm $smtp_from
$smtp-&gt;mail($smtp_from) or warn ("Failed to specify a sender [$smtp_from]\n");

# Please Send the email to $smtp_to
$smtp-&gt;to($smtp_to) or warn ("Failed to specify a recipient [$smtp_to]\n");

# Please send this data
$smtp-&gt;data([$mail_message]) or warn ("Failed to send a message\n");

# I'm over
$smtp-&gt;quit or warn ("Failed to quit\n");

} # end of sub send_mail

####################################################################
[/code]
ثم استدعي البرنامج هكذا
<BLOCKQUOTE><font size="1" face=" Arial">code:</font><HR><pre>
&send_mail($From,$To,$Subject,$Body);
$From هو متغير يحمل عنوان المُرسل
$To متغير يحمل عنوان المرسل اليه
$Subject متغير يحمل عنوان الرسالة
$Body متغير يحمل نص الرسالة
[/code]

[b]<small><small>[ تم تعديل الموضوع بواسطة &nbsp; خالد2000 &nbsp; يوم &nbsp; 28-01-2000]

[خالد2000]

ملحوظة
واضح جدا أن النصوص معكوسة من اليمين الى اليسار
لذا أرجو منك Copy & Paste

[عمر محمد]

الأخ خالد

السلام عليكم
ما المقصود بقولك ( ضع ما بين الخطين في برنامج الـ CGI الخاص بك
)
أي برنامج تقصد ؟؟

[أبو طارق]

جزاك الله كل الخير يا خالد 2000

------------------

[alladdin]

السلام عليكم
اخي الكريم خالد هل تتكرم وتخبرني اين يضاف هذا السكربت بالضبط؟
وكيف استبدل متغيراته بمتغيراتي؟ هل تتفضل وتعطيني مثالا لذلك واكون لك من الشاكرين.