ایمیل کردن یک فایل از داخل VB

[m_zi]

سلام خسته نباشید
میشه بگید چه جوری می تونم یک فایلی را از داخل برنامه نوشته شده بزبان ویژوال بیسیک به آدرس خاصی ایمیل کنم . خیلی فوری است اگه لطف کنید سریعتر جواب بدید .
ممنون

[amirsadeghi]

این فایلت فقط متنه یا اینکه باید یه فایل Attach بشه؟

[m_zi]

سلام می خوام از داخل وی بی وقتی دکمه ای را فشردم سیستم بره از جای خاصی فایلی را به آدرس خاصی ایمیل کنه .

ممنون می شم اگه زودتر جواب بدید خیلی فوریه.

[m_zi]

هیچ کسی نیست جواب بده . خیلی ضروری و فوریه

[Hossein Bazyan]

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

[m_zi]

اگه میشه کد برنامه را برام بذارید
مرسی

[alirudsar]

salam to vb Az MAPI misheh estefadeh kard va az OLE estefadeh nakard vase in kar albateh rahhaye digary ham hast mesl frestadam ya form be ye SMPT Server mesl Email yahoo

[Hossein Bazyan]

سلام

تعریف تابع ShellExecute را در قسمت General تعریف کن


Public Declare Sub ShellExecute _
Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long)


سپس کد زیر را در قسمت کلیک کلید مورد نظر قرار بده


Private sub Command1_Click()

Call ShellExecute(hwnd:=Me.hwnd, _
lpOperation:=vbNullString, _
lpFile:="mailto:Bazyan1350@yahoo.com (Bazyan1350@yahoo.com)", _
lpParameters:=vbNullString, _
lpDirectory:=vbNullString, _
nShowCmd:=1)
End sub


برای مقدار hwnd از hwnd فرم استفاده شده است Me.Hwnd و در قسمت lpFile آدرس ایمیل مورد نظر را بنویس .

حال با کیلیک روی Command1 از طریق Outlook ایمیل ارسال میشود . البته باید موضوع ایمیل را تایپ کنید !!
در ضمن باید Outlokk قبلا تنظیم و پیکربندی شده باشد .

[m_zi]

اگر امکان داره سورس برنامه رو بذارین . ممنون خیلی نیاز دارم.
--------------------
ممنون. ولی من اینکار رو کردم بعد از اجرا Internet explorer باز شد و id , password‌را می خواهد در واقع صفحه مربوط به Mail yahoo‌باز می شود . لطفاٌ راهنماییم کنید .

[Hossein Bazyan]

در ضمن باید Outlokk قبلا تنظیم و پیکربندی شده باشد .

دوست عزیز مثل اینکه آخر عرایض بنده را نخواندید برای اینکه بتوانید ایمیل ارسال کنید یا باید Outlook یا Yahoo را تنظیم و پیکربندی نمائید .

[Hossein Bazyan]

برای تنظیم Outlook هم نگاهی به این دو لینک بینداز

http://www.parsbit.com/amoozesh/10.htm

http://www.parsbit.com/amoozesh/01.htm

[mortez maya]

سلام دوست عزیز من این برنامه رو دارم اگه هنوز به جواب نرسیدی بگو تا آپلود کنم./