Problema con VB: inviare mail con Outlook

[Dark Bard]

Ciao a tutti; io ho delle textbox conteneti dei valori, e vorrei, al click su 1 pulsante, inviare questi valori con Outlokk tramite e-mail...come faccio??

[ladyBlu]

Private Sub mioBottone_Click()
                    
    Dim miaMail As Outlook.MailItem, miaApplicazione As Outlook.Application
            
    Set miaApplicazione = New Outlook.Application

    Set miaMail = miaApplicazione.CreateItem(olMailItem)
            
    miaMail.To = Text1.Text
    miaMail.Subject = Text2.Text
    miaMail.Send
                    
End Sub

To = indirizzo del destinatario
Subject = titolo della mail
tutte le proprietà le trovi scrivendo miaMail. xchè ti si apre la finestra proprietà come quella degli oggetti di vb.

in questo modo, quando clikki sul bottone lui invia la mail senza chiedere conferme.

ricordati di inserire tra i riferimenti del progetto la libreria "Microsoft Outlook 9.0...", ok?

[Dark Bard]

Originariamente inviato da ladyBlu

Private Sub mioBottone_Click()
                    
    Dim miaMail As Outlook.MailItem, miaApplicazione As Outlook.Application
            
    Set miaApplicazione = New Outlook.Application

    Set miaMail = miaApplicazione.CreateItem(olMailItem)
            
    miaMail.To = Text1.Text
    miaMail.Subject = Text2.Text
    miaMail.Send
                    
End Sub

To = indirizzo del destinatario
Subject = titolo della mail
tutte le proprietà le trovi scrivendo miaMail. xchè ti si apre la finestra proprietà come quella degli oggetti di vb.

in questo modo, quando clikki sul bottone lui invia la mail senza chiedere conferme.

ricordati di inserire tra i riferimenti del progetto la libreria "Microsoft Outlook 9.0...", ok?

ok, ma come aggiungo un messaggio alla mail?? e come si fa ad aggiungere ai riferimenti del progetto la libreria di Outlook??

[ladyBlu]

per il riferimento segui le mie istruzioni:
1. clikka sul menu Progetto di vb
2. seleziona la voce Riferimenti
3. cerca e spunta la voce "Microsoft Outlook 9.0 Object Library"
4. clikka su ok.
così hai inserito la libreria e puoi lavorare con gli oggetti di outlook.

per la domanda sul testo della mail basta che scrivi:
miaMail.Body = testoMail

tutto chiaro?

[Dark Bard]

bella!
ti ringrazio...alla prossima!!

[ladyBlu]

di niente, figurati...