[VB6] MAPI ed emulazione pulsante da tastiera

[Estro]

Ecco il mio problema:

Ho creato un programma in vb6 con l' opportunita di inviare un email a un determinato destinatario. Tutto funziona perfettamente, ma Outlook interagisce al mio programma chiedendomi conferma all' invio della mail.

leggendo il forum sto inziando a pensare che per ovviare al problema c' è un solo modo. Emulare la pressione del tasto INVIO o "I" (di Invio) da tastiera(vedi allegato).
Ringrazio tutti anticipatamente!

[alka]

Le domande relative ai linguaggi Visual Basic, VB.NET, VBA (per Access, Excel, ...) e i linguaggi Microsoft per il .NET Framework vengono trattati nell'apposito forum: Visual Basic e .Net Framework.
In futuro, poni in quel forum le tue domande relative ai linguaggi citati.

Dai una sbircita anche al Regolamento, dato che sei nuovo.

Questa discussione la sposto io.

Ciao e buona prosecuzione!

[Estro]

Chiedo scusa, ma continuo a non vedere nessun forum relativo a vb, se non questo attuale!

[alka]

Originariamente inviato da Estro
Chiedo scusa, ma continuo a non vedere nessun forum relativo a vb, se non questo attuale!

Perchè sono stato io a spostare la discussione nel forum corretto (come peraltro ho scritto nel messaggio).

[Estro]

abbi pazienza... è dalle 5 che sono in piedi...

[MdE2005]

Si..in effetti puoi usare ad esempio la funzione di visual basic SendKeys oppure la funzione API keybd_event..

ciao

[Estro]

Ho provato con il sendkeys ma niente da fare. Forse sbaglio io il codice?

puoi scrivermi un esempio di codice sendkeys relativo a una finestra attiva? grazie!

[MdE2005]

Il SendKeys è facile da usare:
come argomento è necessaria la stringa che vuoi passare.

SendKeys "{TAB}"

in questo caso simula la pressione del Tab

Ciao

[Estro]

MAPISession1.DownLoadMail = False
MAPISession1.LogonUI = False 
MAPISession1.SignOn
With MAPIMessages1
.SessionID = MAPISession1.SessionID
.Compose
.RecipAddress = "destinatario@destinatario.it"
.RecipDisplayName = "nome destinatario"
.MsgSubject = "Oggetto"
.MsgNoteText = "corpo mail"
.Send (False)
End With
SendKeys "{ENTER}"
MAPISession1.SignOff

Se lo inserisco cosi non funziona! AIUTOOOOOOOOOOOOOOOO

[MdE2005]

Il comando sendkeys si riferisce all'elemento attivo..può darsi che nel tuo caso non lo sia..
Prova a guardare un pò di esempi in rete..

ciao