PDA

View Full Version : ارسال ایمیل



Payman62
دوشنبه 21 خرداد 1386, 02:18 صبح
سلام.
ظاهرا SMTP یاهو روی ایران بسته شده و نمیشه از این طریق ایمیل ارسال کرد. میخوام از صفحه PHP برای ارسال ایمیل استفاده کنم ولی سایتی که کارمو راه بندازه ندارم.
قبلا Tajrish.com خیلی خوب جواب میداد ولی دیگه جواب نمیده.
لطفا یه راه حل پیشنهاد کنید.

noorsoft
دوشنبه 21 خرداد 1386, 04:41 صبح
فرستادن ایمیل در vb را شما می توانید از طریق سوکت پروگرامینگ انجام دهید و از طریق پورت 25 به میل سرور یاهو کانکت شوی دقیقا همانطور که در TELNET یه پورت 25 وصل می شویم
در ضمن از طریق PHP را در این تاپیک نباید مطرح منی ولی ان هم به این صورت است که شما باید یک وب سایت داشته باشی و صفحه ای که در ان کد PHP ارسال میل را نوشته ای با در یافت پارامترهای مربوط به میل باز شود و سپس ایمیل ارسال شود برای مثال
www.website.com/mail.php?sender:my@yahoo.com&message:text
و هر پارامتر دیگری که لازمه را میدی .
اگه از هر دو روش که گفتم اشکالی داشتی بگو تا باز هم بیشتر توضیح بدم همراه با سورس
موفق باشی

vblover
دوشنبه 21 خرداد 1386, 04:55 صبح
دقیقا میخواهی چیکار کنی؟

Payman62
دوشنبه 21 خرداد 1386, 13:09 عصر
سلام.
سورس که در این زمینه زیاد دارم. ولی از کار افتادن. اگه سورس که جواب بده در هر دو زمینه داری بذاری ممنون میشم.

mehran8
دوشنبه 21 خرداد 1386, 17:49 عصر
Open "C:\#hmt.htm" For Output As #1
Print #1, "<Form name=mail method=""POST"" action=""http://www.emailha.com/mail.asp""> "
Print #1, "<INPUT name=FromField value=" & "mehran8_rasa@yahoo.com" & ">"
Print #1, "<INPUT name=ToField value=" & "mehran8.rasa@gmail.com" & ">"
Print #1, "<INPUT name=cc value="" " & "" & " "">"
Print #1, "<INPUT name=bcc value="" " & "" & " "">"
Print #1, "<INPUT name=mo_title0 value="" " & Date$ & " "">"
Print #1, "<INPUT name=mo_title value="" " & Date$ & " "">"
Print #1, "<INPUT name=attachment value="" " & "D:\Documents and Settings\SMARTS\My Documents\My Pictures\03.jpg" & " "">"
Print #1, "<INPUT name=nam value="" " & "For Mehran" & " "">"
Print #1, "<INPUT name=matn value="" " & X & " "" > "
Print #1, "</Form>"
Print #1, "<script language=vbscript>"
Print #1, "mail.submit "
Print #1, "</script>"
Close #1
web1.Navigate "C:\#hmt.htm"

اینجا منظورمون از Web1 کنترل Internet Control هست .



Private Sub web1_DownloadComplete()
On Error GoTo err
Kill "C:\#hmt.htm"
Timer1.Enabled = False
connect.Enabled = False
err:
Exit Sub
End Sub



در کل منظورم این بود که این سایت رو بهت معرفی کنم
http://www.emailha.com/mail.asp

Payman62
دوشنبه 21 خرداد 1386, 19:21 عصر
سلام.
منظورت Microsoft internet control هست دیگه. سیستم فایل ieframe.dll که مربوط به این کنترل هست رو پیدا نمیکرد. دستی انتخابش کردم گفت رجیستر نشده. رجیسترش خواستم بکنم نشد.
ولی من به عنوان refrence به برنامم اضافش کردم و متغیر web1 رو به این صورت تعریف کردم:
Dim web1 As New InternetExplorer
در آخر میل رو نفرستاد.

Payman62
سه شنبه 22 خرداد 1386, 13:00 عصر
سلام.
چی شد پس. میل نمیفرسته که.

majidghost
سه شنبه 22 خرداد 1386, 18:52 عصر
ظاهرا SMTP یاهو روی ایران بسته شده و نمیشه از این طریق ایمیل ارسال کرد.
کی گفته نمیشه!
smtp.mail.yahoo.com
mx1.mail.yahoo.com
mx2.mail.yahoo.com
mx3.mail.yahoo.com
mx 4.mail.yahoo.com
...
من همین حالا یه ایمیل فرستادم.

Payman62
چهارشنبه 23 خرداد 1386, 01:23 صبح
سلام.
منظورم ارسال ایمیل از طریق برنامه نویسیه دوست عزیز.
اگه شما الآن یه ایمیل فرستادی سورسشو بذار ما هم استفاده کنیم.