ايران ويج

نسخه‌ي كامل: ارسال ایمیل با ویژوال بیسیک
شما هم اكنون متن قالب بندي نشده را مي‌بينيد.مشاهده‌ي نسخه‌ي اصلي
صفحات: 1 2 3 4
سلام
چطوری میشه با استفاده از vb یک ایمیل (همراه فایل) ارسال کرد Heart
من دیروز یه برنامه از اینترنت گرفتم یکی دو بار ایمیل فرستاد اما امروز هر کاری می کنم نمی شه که نمی شه.
این برنامه ازSMTP برای ارسال ایمیل استفاده می کنه چند بار هم سرور شو عوض کردم اما نشد
کسی سایتی مثل تجریش دات کام سراغ نداره یا toxic-ware.com
بچه ها با این سایت می شه http://www.emailha.com
چرا کسی جواب نمی ده یعنی هیچ راهی نیست
سلام.
من از این کد برای ارسال ایمیل تو برنامه هام استفاده میکنم. ولی تا حالا نیاز نشد از اتچ توش استفاده کنم ولی فکر کنم اتچ هم راحت می فرسته.
این کد از SMTP گوگل استفاده می کنه که هیچ وقت هم بسته نمی شه.Biggrin
کد:
Dim iMsg, iConf, Flds, schema, SendEmailGmail
    Set iMsg = CreateObject("CDO.Message")
    Set iConf = CreateObject("CDO.Configuration")
    Set Flds = iConf.Fields

    ' send one copy with Google SMTP server (with autentication)
    schema = "http://schemas.microsoft.com/cdo/configuration/"
    Flds.item(schema & "sendusing") = 2
    Flds.item(schema & "smtpserver") = "smtp.gmail.com"
    Flds.item(schema & "smtpserverport") = 465
    Flds.item(schema & "smtpauthenticate") = 1
    Flds.item(schema & "sendusername") = "myName@gmail.com"
    Flds.item(schema & "sendpassword") = "myPassword"
    Flds.item(schema & "smtpusessl") = 1
    Flds.Update

    With iMsg
        .To = "Reciever"
        .From = "Sender"
        .Subject = "Subject"
        .HTMLBody = "Text"
        .Sender = "Sender"
        Set .Configuration = iConf
        SendEmailGmail = .Send
    End With

    Set iMsg = Nothing
    Set iConf = Nothing
    Set Flds = Nothing
سلام mbza11 من میخوام فایل بفرسته
این کد ارور میده این خط SendEmailGmail = .Send
سلام.
من دارم ازش استفاده می کنم و ارور نمیده.
راستی مقادیر myName@gmail.com و myPassword رو با آدرس و رمز ایمیلت عوض کردی. برای استفاده از این کد باید حتما تو گوگل یه میل داشته باشی.
mbza11 نوشته :سلام.
من دارم ازش استفاده می کنم و ارور نمیده.
راستی مقادیر myName@gmail.com و myPassword رو با آدرس و رمز ایمیلت عوض کردی. برای استفاده از این کد باید حتما تو گوگل یه میل داشته باشی.
نه من ایمیل از گوگل ندارم شاید به خاطر اون بوده Whistle
حالا چطوری میشه باهاش فایل ارسال کرد؟
نقل قول :من از این کد برای ارسال ایمیل تو برنامه هام استفاده میکنم. ولی تا حالا نیاز نشد از اتچ توش استفاده کنم ولی فکر کنم اتچ هم راحت می فرسته.
این کد از SMTP گوگل استفاده می کنه که هیچ وقت هم بسته نمی شه.
روش جالبیه . آقا و یا خانوم دمت گرم Wink
کسی می دونه چطوری میشه باهاش فایل ارسال کرد؟
صفحات: 1 2 3 4
آدرس اصلي