أرسل الى أي بريد في العالم دون أستخدام أي ملقم بري

السلام عليكم

اولا قم بكتابة الكود التالي داخل المفكرة ومن ثم قم بحفظ هذا الملف باسم sendmail.php

<?php

$mail=$_GET[mail];

$subject=$_GET[subject];

$body=$_GET[body];

mail($mail,$subject,$body);

?>

والان قم بتحميل ذلك الملف الى موقع lycos

مثال

http://members.lycos.co.uk/hafar2000/sendmail.php

ليس شرط موقع lycos ولكن اي موقع يدعم ملفات php

والان قم بادراج ثلاثة عناصر تكست

ومن ثم أضغط على شريط الاداوت بزر اليمين ومن ثم أختار components ومن ثم أختار الاداة

microsoft internet controls

قم بوضعها على الفورم ومن ثم قم بأختصار name الى w

في التكست الاولى هو عنوان البريد الذي سوف يرسل اليه وافي التكست الثانية هو عنوان الرسالة وفي تكست الثالثة هي جسم الرسالة

والان قم بادراج زر واكتب فيه الكود التالي

Text2 = Replace(Text2, " ", "+", 1, -1)

Text3 = Replace(Text3, " ", "+", 1, -1)

w.Navigate "http://members.lycos.co.uk/hafar2000/sendmail.php?mail=" + Text1 + "&subject=" + Text2 + "&body=" + Text3

والان قم بكتابة في حدث DocumentComplete لاداة microsoft internetr controls

الكود التالي

MSGBOX "SEND MAIL COMPELETE"

انتهى البرنامج

ما رأيكم بهذه الطريقة ؟؟؟؟؟؟