تسجيل الدخول

مشاهدة النسخة كاملة : الى خبراء الفيجوال ارجو المساعدة


abed_11
17-07-2005, 02:00 AM
بدي اسأل مين يعرف كود برنامج يرسل ايميل من الفي بي مجهول و يكون مجرب ونافع و اخيرا بدي سيرفر الهوتميل والياهو
وشكرا
abed_11
18-07-2005, 12:14 AM
حدا يرد ضروري و الي يرسل لازم يكون مجهول
Argonaut
18-07-2005, 12:44 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
اذكر اني ارفقت مثل هذا الطلب اصبر
وشكرا
Argonaut
18-07-2005, 01:00 AM
جرب هذا
http://www.montada.com/showthread.php?t=345128
وشكرا
abed_11
18-07-2005, 01:45 AM
مشكوررررررررررررررر
abed_11
18-07-2005, 01:47 AM
طيب تعرف كيف نستخدم cdo في الايميل
abed_11
18-07-2005, 01:49 AM
اخر سؤال شو سيرفر الهوتميل والياهو
Argonaut
18-07-2005, 01:59 AM
اخر سؤال شو سيرفر الهوتميل والياهو
وضح اكثر


طيب تعرف كيف نستخدم cdo في الايميل

وضح اكثر
abed_11
18-07-2005, 02:54 AM
انت الطريقة الي اعطيتني اياها بدها winsock صح انا بدي طريقة ثانية ما يسألك شو السيرفر والله لو جبتها بتكون على راسي
Argonaut
18-07-2005, 11:18 PM
انت تخجلني ............. انتظر
Argonaut
18-07-2005, 11:28 PM
انا كنت اورد تقديمها كهدية للاعضاء بس النسخة تتجريبة
افتح الملف على هيئة دفتر ملاحظات واحفظه بهيئة htm
وشكرا
abed_11
19-07-2005, 12:27 AM
ان شاء الله
abed_11
19-07-2005, 12:28 AM
ما تعرف كود في بي
Argonaut
19-07-2005, 12:43 AM
اكثر الطرق شيوعا في vb هي تلك التي قدمتها لك في الاول
abed_11
19-07-2005, 03:31 AM
مشكور اخي ولكن هل بطول لما يرسل الايميل عشان لما افتح الايميل ما القيه و صل
Argonaut
19-07-2005, 03:52 PM
كل الذي اقدر اقول لك ان شاء الله تجد غيري يفيدك .............. وبلنسبة للفرق الاخير صحيح كلامك انا ابحث في تطويره
وشكرا
abed_11
20-07-2005, 01:47 AM
ولو يا اخي انت استاذنا
abed_11
20-07-2005, 02:51 AM
مشكور على كل حال
Argonaut
21-07-2005, 10:10 PM
السلام عليك ورحمة الله وبركاته

لا يا اخي العزيز لاتحزني ارجوك لازم اجد لك حل
بصراحة لم ارد ان ارجعك خائبا لذا
قم باضافة
Microsoft MAPI Controls 6.0
وجرب هذه الاكواد
Private Sub Command1_Click()
On Error Resume Next
With MAPIMessages1
.MsgIndex = -1
.RecipDisplayName = txtSendTo.Text
.MsgSubject = txtSubject.Text
.MsgNoteText = txtMessage.Text
.SessionID = MAPISession1.SessionID
.Send
End With
MsgBox "Message sent successfully!", vbOKOnly, "Mail Sent"
End Sub
Private Sub Form_Load()
MAPISession1.SignOn
End Sub
Private Sub Form_Unload(Cancel As Integer)
MAPISession1.SignOff
End Sub
وان شاء الله تعمل
وشكرا
abed_11
22-07-2005, 01:00 AM
هذه ما تحتاج للاوت لوك
abed_11
22-07-2005, 01:02 AM
و مشكورررررررررررررررررررررررر
Argonaut
22-07-2005, 01:27 AM
هذه المرة تحتاج اليه بس ان شاء الله يعمل
اشكرني بعد ان ينجح
وشكرا