Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
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 >