|
Visual Basic 6 ( VB6 ) est Microsoft de prendre sur le langage de programmation de base en informatique classique. La version VB6 de la langue et le programme IDE utilisé pour créer des logiciels a été la dernière version publiée par Microsoft avant la version. NET . Les développeurs de logiciels utilisent Visual Basic 6 pour créer une grande variété d' applications de bureau pour la plate-forme Windows. Les développeurs peuvent même ajouter des fonctionnalités à envoyer des e-mails via un compte Google Gmail. Instructions
1 Ouvrez Visual Basic 6 . VB6 vient comme une application autonome ou partie de Visual Studio 6 . Si vous avez la version autonome , vous pouvez double-cliquer sur l'icône VB6 sur votre bureau ou cliquez sur " Démarrer", " Tous les programmes", " Microsoft Visual Basic 6 " puis " Visual Basic 6" pour ouvrir le programme . Pour le Studio, cliquez sur l'icône pour ouvrir le Visual Studio 6 . Cliquez sur l'onglet " Visual Basic " sur l'écran d'accueil , puis choisissez d'ouvrir un projet Visual Basic existant ou pour en commencer une nouvelle .
2 Cliquez sur "Affichage" puis "Code " pour passer à voir code . Ajouter une procédure qui va envoyer un e-mail via un compte Gmail :
" Sous 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
« changer la ligne suivante à votre adresse e-mail gmail
emailFields.Item (sch & " sendusername ") = myemailaddress@gmail.com
' utiliser le mot de passe que vous utilisez pour vous connecter à votre compte gmail email
emailFields.Item (sch & " sendpassword ") = mypassword
emailFields.Item (sch & " SMTPUseSSL ") = 1
emailsFields.Update
emailmsg
. pour = pour « changer pour le bénéficiaire (s ) de l'email
. From = myemailaddress@gmail.com «changer ceci à votre adresse e-mail
. Subject = " Envoi d'un email avec Gmail et VB6 » « changement de votre ligne de sujet
. HTMLBody = " Ceci est un test . « changer pour le corps de l'email
Set. Configuration config =
. Envoyer
Fin avec
' effacer tout dehors pour la prochaine email
Set emailmsg = Nothing Set
config = Nothing Set
emailFields = Nothing
End Sub "
3 modifier la partie du code qui vous demande vos spécificités , telles que votre adresse Gmail et votre mot de passe . Les articles que vous avez besoin de changer est commentée , ce qui signifie qu'il commence par une apostrophe (')
4 Cliquez sur l'icône "Sauvegarder" dans la barre d'outils pour enregistrer les modifications apportées au projet de VB6 < . . br>
|
