Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky

Domáce Hardware Siete Programovanie Softvér Otázka Systémy

Ako poslať e - mail pomocou G - mailu v aplikácii Visual Basic 6

Visual Basic 6 ( VB6 ) , je vziať Microsoft na klasické základné počítačový programovací jazyk . VB6 verzia jazyka a programu IDE používa na vytvorenie softvér bol poslednej verzie vydanej spoločnosťou Microsoft pred NET verziu .. Vývojári softvéru pomocou jazyka Visual Basic 6 vytvoriť širokú škálu desktopových aplikácií pre platformu Windows . Vývojári môžu pridať aj funkciu na odosielanie e - mailu prostredníctvom účtu Google Gmail . Pokyny dovolená 1

Otvorte Visual Basic 6. VB6 je dodávaný ako samostatná aplikácia alebo súčasť Visual Studio 6. Ak máte samostatnú verziu , môžete poklepaním na ikonu VB6 na ploche alebo kliknite na tlačidlo " Štart " , " Všetky programy " , " Microsoft Visual Basic 6 " a potom " Visual Basic 6 " pre otvorenie programu . Pre Studio , kliknite na ikonu otvoríte program Visual Studio 6. Kliknite na kartu " Visual Basic " na úvodnej obrazovke a potom vyberte otvoriť existujúci projekt jazyka Visual Basic alebo začať novú .
2

Kliknite na " Zobraziť " a potom " kód " sa spínačom pre zobrazenie kódu . Pridajte postup , ktorý pošle e - mail prostredníctvom účtu Gmail :

" Sub SendGmail ( )

Set emailMsg = CreateObject ( " CDO.Message " )

Set config = CreateObject ( " CDO.Configuration " )

Set emailFields = config.Fields

sch = " http://schemas.Microsoft.com/cdo/configuration/"

emailFields.Item ( sch & " SendUsing " ) = 2

emailFields.Item ( sch & " SMTPServer " ) = " smtp.gmail.com "

emailFields.Item ( sch & " SMTPServerPort " ) = 465

emailFields.Item ( sch & " SMTPAuthenticate " ) = 1

" zmeňte nasledujúci riadok do súboru gmail e - mailovú adresu

emailFields.Item ( sch & " sendusername " ) = myemailaddress@gmail.com

' použiť heslo , ktoré používate pre prihlásenie do svojho e - mailového konta gmail klipart

emailFields.Item ( SCH & " sendpassword " ) = mojeheslo klipart

emailFields.Item ( sch & " SMTPUseSSL " ) = 1

emailsFields.Update

S emailMsg

. To = Pre ' zmeniť na príjemcu ( ov ) na e - mailu

. Od = myemailaddress@gmail.com " zmeniť na vašu e - mailovú adresu

. Subject = " Odoslanie e - mailu s Gmail a VB6 " " zmena vášho predmetu

. HTMLBody = " Toto je test . " " zmeniť na tele e - mailu

Set . Configuration = config

. Poslať

Koniec S

" zúčtovanie všetko von pre ďalšie e - mail

Nastavte emailMsg = Nothing

Nastaviť config = Nothing

Nastaviť emailFields = Nothing

end Sub "
3

zmeniť časť kódu , ktorá požiada o vaše špecifiká , ako je napríklad Gmail e - mailovej adresy a hesla . Položky , ktoré je potrebné zmeniť v poznámkach , čo znamená , že začína s apostrofom ( ' )
4

Kliknite na ikonu " Uložiť " v paneli nástrojov uložiť zmeny do VB6 projektu < .. br >

Najnovšie články

Copyright © počítačové znalosti Všetky práva vyhradené