ارسال ایمیل انبوه

[pedram_ns]

با سلام
من سرورم یکسری محدودیت برای ارسال ایمیل انبوه داره:


1: یک ایمیل تنها می تواند 30 مخاطب ( در هر ارسال ) داشته باشد.


2: در هر 10 دقیقه تنها امکان ارسال 50 ایمیل می باشد.


3 : در هر روز تنها امکان ارسال 1000 ایمیل می باشد.


با این اوصاف من میخوام یکسری ایمیل رو از دیتابیسم بخونم و ارسال کنم بطوری که با این محدودیت ها مشکلی نداشته باشه. کدش رو نوشتم و در مورد ارسال انبوه برای تعداد کم کار میکنه(کدم ایراد نداره)


ولی در ارسال 200 عدد مشکل داره. کدم رو گذاشتم ایا این کد من می تونه این محدودیت ها رو دور بزنه. البته تست کردم و مشکل داره و هیچ ایمیلی رو ارسال نمیکنه.



Dim successful As Int32 = 0
Dim Unsuccessful As Int32 = 0
For Each Item As String In emails
Try
Mailmsg.Bcc.Add(New MailAddress(Item))
successful = successful + 1
Catch ex As Exception
Unsuccessful = Unsuccessful + 1
End Try
If successful Mod 30 = 0 Then
System.Threading.Thread.Sleep(720000)
End If
Next

obj.Send(Mailmsg)

[fakhravari]

باید با هاست مشورت کنی ببینی چنتا ایمیل میتونی در دقیقه ارسال کنی
http://barnamenevis.org/showthread.php?334127-%D8%A7%D8%B1%D8%B3%D8%A7%D9%84-%D8%AC%D8%AF%DB%8C%D8%AF-%D8%AA%D8%B1%DB%8C%D9%86-%D9%BE%D8%B3%D8%AA-%D9%87%D8%A7-%D8%A8%D9%87-%D8%A7%DB%8C%D9%85%DB%8C%D9%84-%DA%A9%D8%A7%D8%B1%D8%A8%D8%B1%D8%A7%D9%86/page2

[pedram_ns]

خوب هاستم میگه در هر ده دقیقه 50 تا و از اونجا که در هر ارسال 30 تا میشه فرستاد. من سعی کردم بعد از ارسال 30 ایمیل 12 دقیقه تاخیر بدم و این کد رو نوشتم.
آیا کدی که نوشتم این کار رو میکنه؟

[fakhravari]

شما میتوانید از سمپل من استفاده کنید.
اما باید دقت کنید ایمیل ها اسپم نشه.
http://barnamenevis.org/showthread.php?334127-%D8%A7%D8%B1%D8%B3%D8%A7%D9%84-%D8%AC%D8%AF%DB%8C%D8%AF-%D8%AA%D8%B1%DB%8C%D9%86-%D9%BE%D8%B3%D8%AA-%D9%87%D8%A7-%D8%A8%D9%87-%D8%A7%DB%8C%D9%85%DB%8C%D9%84-%DA%A9%D8%A7%D8%B1%D8%A8%D8%B1%D8%A7%D9%86&p=1475439&viewfull=1#post1475439