Groups > it.comp.lang.visual-basic > #19208

Re: Invio mail

From	Paperino <non_te@lo.dico.invalid>
Newsgroups	it.comp.lang.visual-basic
Subject	Re: Invio mail
Date	2017-10-20 17:21 +0200
Organization	nntp.aioe.org
Message-ID	<osd463$1gnk$1@gioia.aioe.org> (permalink)
References	<osb1ao$49u$1@solani.org> <osb78i$9ia$1@gioia.aioe.org> <oscns7$4k7$1@solani.org>

Show all headers | View raw

Greg ha scritto:
> Paperino ha scritto:
>> Usa l'automazione. Crea un nuovo progetto VB, imposta un riferimento
>> a "Microsoft Outlook XX.0 Object Library" (XX dipende da che Outlook
>> hai, ma non preoccuparti: il riferimento è comunque alla MSOUTL.OLB)
>> poi in un pulsante incolla questo codice:
>>
>> '**********************
>> Private Sub Command1_Click()
>>   Dim objOutlook As Outlook.Application
>>   Set objOutlook = New Outlook.Application
>>
>>    Dim objMailItem As Outlook.MailItem
>>    With objOutlook
>>     Set objMailItem = .CreateItem(olMailItem)
>>      With objMailItem
>>       .Subject = "Soggettone"
>>       .Body = "Corpo della mail. Puoi andare a capo con '& vbNewLine'"
>>       .Recipients.Add "indirizzo@serverposta.it"
>>       .Save
>>      End With
>>    End With
>> End Sub
>> '**********************
>>
>> Il .Save salva la mail in bozza senza inviarla, e l'utente
>> può scegliere cosa fare.
> Grazie Paperino,
> sto provando questa soluzione ma otengo un "errore definito dall'applciazione" sulla riga .Recipients.Add 
> "prova@tin.it"

Altri indizi? Un codice di errore, qualcosa...?
Se provi a immettere gli stessi dati direttamente da Outlook
che succede?

Capirai che debuggare da qua a naso non è esattamente semplice :-/

Bye, G.

Back to it.comp.lang.visual-basic | Previous | Next — Previous in thread | Next in thread | Find similar

Thread

Invio mail Greg <greg@alicie.com> - 2017-10-19 22:18 +0200
  Re: Invio mail Luca D <antaniserse@yahoo.it> - 2017-10-19 14:12 -0700
  Re: Invio mail Paperino <non_te@lo.dico.invalid> - 2017-10-19 23:59 +0200
    Re: Invio mail Greg <greg@alicie.com> - 2017-10-20 13:49 +0200
      Re: Invio mail Paperino <non_te@lo.dico.invalid> - 2017-10-20 17:21 +0200
        Re: Invio mail Greg <greg@alicie.com> - 2017-10-20 17:36 +0200
          Re: Invio mail Paperino <non_te@lo.dico.invalid> - 2017-10-20 22:38 +0200
            Re: Invio mail Paperino <non_te@lo.dico.invalid> - 2017-10-20 23:31 +0200
            Re: Invio mail Greg <greg@alicie.com> - 2017-10-23 11:13 +0200
              Re: Invio mail Paperino <non_te@lo.dico.invalid> - 2017-10-23 11:49 +0200
                Re: Invio mail Greg <greg@alicie.com> - 2017-10-23 15:29 +0200
  Re: Invio mail Franz_aRTiglio <franzgol@N0SPAMtin.it> - 2017-10-20 01:25 +0200

csiph-web