[mamas1]

السلام عليكم و رحمة الله و بركاته

لقد وجدت أثناء بحثي أداة جميلة و متقدمة لإرسال إمايل

الأداة مع السيريال و شرح من الموقع الرسمي تجدها في المرفقات و أي سؤال أنا حاضر

في كل فورم تم إستعمال الأداة فيه يجب وضع الكود

إقتباس :Private Sub Form_Load()

'Init the control:
'Must be call before using any
'functionality of the control.
'sKey = Your registration key.
'On trial mode use the "Trial Mode."
cEmail1.Init "zsdkfjskl-fd6g74dsf98-a65d4a-gh9j84f98s74"


End Sub

طبعا أنا جبت لكم السيريال ما تحتاجون ل Trial Mode.

و

إقتباس :
Private Sub Form_Unload(Cancel As Integer)

'Release the control
'from the memory:
cEmail1.DeInit

End Sub

الثمن : دعوة في ظهر الغيب .... و لا بأس بالضغط على زر شكرا أو أعجبني أو تقيم :p