امتیاز موضوع:
  • 34 رای - 2.88 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5
کمک در ارسال ایمیل در vb6
نویسنده پیام
__omid__ آفلاین
کاربر تازه وارد
*

ارسال‌ها: 17
تاریخ عضویت: Apr 2012
اعتبار: 0
.وضعیت من: هیچکدام
ارسال: #1
Heart  کمک در ارسال ایمیل در vb6
درود
نیاز به 1 سورس کد که هرچی در تکس باکس 1 و 2 تایپ کرده و رو کامنت کلیک میکنه بفرسته به جمیل خودم اون متن را.
با احترام
06-11-2012، 09:07 PM
ارسال‌ها پاسخ
Amin_Mansouri آفلاین
مدیر کل سایت
*

ارسال‌ها: 4,842
تاریخ عضویت: Apr 2011
اعتبار: 158
.وضعیت من: Artistic
ارسال: #2
RE: کمک در ارسال ایمیل در vb6
درود

خوش امدید به فروم

با سورس زیر یاد میگیرید که چگونه با از طریق جیمیل ایمیل بفرستید سورس زیر با زبان ویژوال بیسیک 6 نوشته شده است.

کد:
Public Function SendMail(msgBody As String)
Dim lobj_cdomsg As CDO.Message
Set lobj_cdomsg = New CDO.Message
lobj_cdomsg.Configuration.Fields(cdoSMTPServer) = "smtp.gmail.com"
lobj_cdomsg.Configuration.Fields(cdoSMTPServerPort) = 465
lobj_cdomsg.Configuration.Fields(cdoSMTPUseSSL) = True
lobj_cdomsg.Configuration.Fields(cdoSMTPAuthenticate) = 1
lobj_cdomsg.Configuration.Fields(cdoSendUsername) = "username@googlemail.com"
lobj_cdomsg.Configuration.Fields(cdoSendPassword) = "password"
lobj_cdomsg.Configuration.Fields(cdoSMTPConnectionTimeout) = 30
lobj_cdomsg.Configuration.Fields(cdoSendUsingMethod) = 2
lobj_cdomsg.Configuration.Fields.Update
lobj_cdomsg.To = "someone@somewhere.com"
lobj_cdomsg.From = "username@googlemail.com"
lobj_cdomsg.Subject = "subject"
lobj_cdomsg.TextBody = "body"
'lobj_cdomsg.AddAttachment ("filepath")
lobj_cdomsg.Send
Set lobj_cdomsg = Nothing
End Function
گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
06-11-2012، 09:16 PM
وب‌سایت ارسال‌ها پاسخ
Bug آفلاین
کاربر تازه وارد
*

ارسال‌ها: 1
تاریخ عضویت: Jul 2012
اعتبار: 0
.وضعیت من: هیچکدام
ارسال: #3
RE: کمک در ارسال ایمیل در vb6
ببخشید اگه پست قدیمی رو بلا می یارم
میشه بگید چطور از تابع بالا باید استفاده کرد؟

توی این خط ارور می ده
Dim lobj_cdomsg As CDO.Message
(آخرین تغییر در ارسال: 07-03-2012، 08:40 PM توسط Bug.)
07-03-2012، 08:37 PM
ارسال‌ها پاسخ
Amin_Mansouri آفلاین
مدیر کل سایت
*

ارسال‌ها: 4,842
تاریخ عضویت: Apr 2011
اعتبار: 158
.وضعیت من: Artistic
ارسال: #4
RE: کمک در ارسال ایمیل در vb6
درود

این چه حرفیه دوست عزیز راحت باش

وی بی 6 باز کن

از منو PROJECT

REFERENCE رو انتخاب کن و بعد تیک

MICROSOFT CDO FOR WINDOWS 2000 LIBRARY رو بزن
گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
07-03-2012، 08:47 PM
وب‌سایت ارسال‌ها پاسخ
kmkm آفلاین
کاربر تازه وارد
*

ارسال‌ها: 1
تاریخ عضویت: Jul 2012
اعتبار: 0
.وضعیت من: هیچکدام
ارسال: #5
RE: کمک در ارسال ایمیل در vb6
(06-11-2012، 09:16 PM)Amin_Mansouri نوشته: درود

خوش امدید به فروم

با سورس زیر یاد میگیرید که چگونه با از طریق جیمیل ایمیل بفرستید سورس زیر با زبان ویژوال بیسیک 6 نوشته شده است.

کد:
Public Function SendMail(msgBody As String)
Dim lobj_cdomsg As CDO.Message
Set lobj_cdomsg = New CDO.Message
lobj_cdomsg.Configuration.Fields(cdoSMTPServer) = "smtp.gmail.com"
lobj_cdomsg.Configuration.Fields(cdoSMTPServerPort) = 465
lobj_cdomsg.Configuration.Fields(cdoSMTPUseSSL) = True
lobj_cdomsg.Configuration.Fields(cdoSMTPAuthenticate) = 1
lobj_cdomsg.Configuration.Fields(cdoSendUsername) = "username@googlemail.com"
lobj_cdomsg.Configuration.Fields(cdoSendPassword) = "password"
lobj_cdomsg.Configuration.Fields(cdoSMTPConnectionTimeout) = 30
lobj_cdomsg.Configuration.Fields(cdoSendUsingMethod) = 2
lobj_cdomsg.Configuration.Fields.Update
lobj_cdomsg.To = "someone@somewhere.com"
lobj_cdomsg.From = "username@googlemail.com"
lobj_cdomsg.Subject = "subject"
lobj_cdomsg.TextBody = "body"
'lobj_cdomsg.AddAttachment ("filepath")
lobj_cdomsg.Send
Set lobj_cdomsg = Nothing
End Function
ببخشید ولی بازم کار نکرد.
07-27-2012، 12:53 PM
ارسال‌ها پاسخ
Amin_Mansouri آفلاین
مدیر کل سایت
*

ارسال‌ها: 4,842
تاریخ عضویت: Apr 2011
اعتبار: 158
.وضعیت من: Artistic
ارسال: #6
RE: کمک در ارسال ایمیل در vb6
تست شده جواب میده
چگونه تابع رو فراخونی میکنید؟
گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
07-27-2012، 01:37 PM
وب‌سایت ارسال‌ها پاسخ
mohammad-alone آفلاین
کاربر تازه وارد
*

ارسال‌ها: 27
تاریخ عضویت: Nov 2012
اعتبار: 0
.وضعیت من: هیچکدام
ارسال: #7
RE: کمک در ارسال ایمیل در vb6
دوست عزیز خیلی زیاد از کارتون خوشم اومد یعنی یه علمی رو به من اموختید که تا عمر دارم مدیون این محببت شما هستم
خیل زیاد دنبالش بودم ولی همه نمونه ها برنامه اتلوک رو باز میکردن
سپاسگزارم
بدترین شرایط زندگی من و تو آرزوی یکی دیگست



یه روز خوب میاد اینو میدونم
11-20-2012، 03:12 AM
ارسال‌ها پاسخ
mohseng آفلاین
کاربر تازه وارد
*

ارسال‌ها: 1
تاریخ عضویت: Feb 2013
اعتبار: 0
.وضعیت من: هیچکدام
ارسال: #8
Tongue  RE: کمک در ارسال ایمیل در vb6
درود دوست عزیز !!!!
من پدرم در اومده همه جور سورس دانلود کردم ،سورس شوما هم همینتور ولی همشون سره این خط ارور میدن

lobj_cdomsg.Send
یه خطا میگیره میگه سرور جواب نمیده و......
خلاصه مخم پوکید اگه میدونی مشکل از کجاست  لطف کن و بگو....
اصلا اگه برات زحمتی نیست خودت 1 باره دیگه چکش کن ببین کار میده؟؟؟
02-17-2013، 09:19 AM
ارسال‌ها پاسخ
Amin_Mansouri آفلاین
مدیر کل سایت
*

ارسال‌ها: 4,842
تاریخ عضویت: Apr 2011
اعتبار: 158
.وضعیت من: Artistic
ارسال: #9
RE: کمک در ارسال ایمیل در vb6
[font]mohseng[font] [/font][/font]
درود دوست عزیز
خوب هستین؟
خوش امدید
سورسی که نوشتی بزار تا چک کنم
گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
02-17-2013، 10:25 AM
وب‌سایت ارسال‌ها پاسخ
aghamali آفلاین
کاربر 1 ستاره
*

ارسال‌ها: 74
تاریخ عضویت: Nov 2013
اعتبار: 0
.وضعیت من: هیچکدام
ارسال: #10
RE: کمک در ارسال ایمیل در vb6
درود
من با انواع سورس کار کردم اما یکسری که جواب میدن فقط تو 7 جواب میدن و تو xp ارور Error in loding dll میده
خواهشا راهنمایی کنید
09-22-2014، 09:44 PM
ارسال‌ها پاسخ


موضوعات مشابه ...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  ارسال مطلب در بلاگفا aleas 0 1,652 11-17-2014، 09:51 PM
آخرین ارسال: aleas
  ارسال متن کامل به html aghamali 5 3,049 11-03-2014، 05:58 PM
آخرین ارسال: aghamali
Wink ارسال فایل باftp بر روی هاست sajad-kh 0 1,665 04-08-2014، 07:29 PM
آخرین ارسال: sajad-kh
Heart جمع آوری ایمیل a.adhami 4 3,882 07-24-2013، 08:08 AM
آخرین ارسال: reza13812
Question مشکل در ارسال جمیل gachboy 8 6,224 11-03-2012، 08:08 PM
آخرین ارسال: gachboy
Smile ارسال PM به یاهو با YMSGMod.OCX alakimalaki 3 5,243 08-26-2012، 07:50 PM
آخرین ارسال: Kei armin
Question سورس ارسال pm به یاهو alakimalaki 5 4,609 08-17-2012، 02:32 PM
آخرین ارسال: Kei armin
Question روش های ارسال ایمیل Ghoghnus 15 14,818 07-30-2012، 03:50 PM
آخرین ارسال: alakimalaki

پرش به انجمن:


کاربران در حال بازدید این موضوع: 1 مهمان

تماس با ما | ParsiCoders (Persian Team) For Programming ,Security,Cracking,Network,Pars Civilization,Medical,Science,Entertaining | بازگشت به بالا | | حالت آرشیو | پیوند سایتی RSS
This forum uses Lukasz Tkacz MyBB addons.