[VB6] Inviare E-mail (ERA:Ciao, mi presento e vi chiedo aiuto ;) )

[MbEnjoy]

Ciao ragazzi, sono nuovissimo qui' e dato che mi diletto un po' con il visual basic , spero di trovar un aiuto in voi..
Qualcosina so' già fare ( niente di particolare ) e volevo una mano per quanto riguarda lo scrivere su file Txt , parole inserite nei miei campi TEXT...
Sapete dirmi come posso fare ?

Vi spiego.
Dopo aver fatto le mie form e tutto la mia impaginazione vorrei che ( l'eventuale ) utente inserendo i suoi dati ( nome , cognome , nick ecc... ) clikkando su di un pulsante , faccia finitetutto automaticamente su di un file Txt , e poi ke questo file venga allegato ad una e-mail che mi deve arrivare..
E' un progetto troppo ambizioso o qualcuno gli và di aiutarmi ?
Vi rinmgrazio in anticipo , e se c'è qualcosa ke posso far x voi.. kiedete !

P.s. AUGURI A TUTTTTIIIIIII

[I'mtheleader]

Per salvare il contenuto di caselle di testo in file puoi fare benissimo così:

---------------------------------------------------
set b = CreateObject("Scripting.FileSystemObject")
set bb = b.CreateTextFile("C:\prova.txt",True)
bb.WriteLine(text1.text)
bb.Close
---------------------------------------------------

Verrà così creato un file di testo di nome prova.txt con il contenuto della casella di testo text1

Per allegare ad una mail per il momento non so.

Cerco e poi ti faccio sapere. ciao

[MbEnjoy]

grazie ciaooo

[I'mtheleader]

Allora per mandare mail con Visual Basic devi fare così:
Prima di tutto devi caricare il controllo Microsoft MAPI Control 6.0.
per fare ciò vai su Progetto->Componenti e selezioni la voce Microsoft
Control 6.0.

A questo punto sulla tua barra dei controlli ti devono essere comparsi altri due controlli:

-MAPISession

-MAPIMessages

Portali entrambi su form.

Dopodiche nel codice scrivi:

------------------------------------------------

MAPISession1.SignOn

MAPIMessages1.SessionID = MAPISession1.SessionID

MAPIMessages1.Compose

MAPIMessages1.RecipDisplayName = "Teorodeo"

MAPIMessages1.RecipAddress = "miamail@ciao.it"

MAPIMessages1.MsgSubject = "oggetto mail"

MAPIMessages.MsgNoteText = "Testo della mail"

MAPIMessages.AttachmentPathName = "C:\file.txt"

MAPIMessages.Send False

---------------------------------------------------------

Allora te lo spiego un po:

Uso prima di tutto due controlli perchè uno mi permette di aprire una sessione di posta e l'altro perchè mi crea il messaggio.

il SignOn apre una nuova sessione di posta. E' come se tu aprissi il tuo programma per mandare mail.

Il SessionId è un numero che viene dato alla sessione aperta.
La prima sessione aperta è per default 0.

Poi è stato scritto che la sessionid del MAPIMessages deve essere uguale a quella del MAPISession così fai riferimento alla stessa sessione.

Il compose l'ho usato per dire a Visual Basic che mi deve creare un nuovo messaggio di posta.


Attraverso il recipDisplayName io gli dico il nome dell ricevente del messaggio. Naturalmente può essere messo un nome a caso.

Il RecipAdress stabilisce l'inidirizzo mail del destinatario.

Il MsgSubject è l'oggetto del messaggio

Il MsgNoteText è il testo del messaggio

L'AttachmentPathName è il nome dell'allegato. Naturalmente è facoltativo: io infatti posso evitare di mettere un allegato.

Poi il send è per mandare il messaggio. Dopo send è stato scritto false per evitare che si visualizzasse la finestra di invio della mail.

Se si fosse messo true sarebbe apparsa una finestra di dialogo che mi mostrava l'invio della mail.

Ciao ciao :metallica

[MbEnjoy]

no.. nn mi funziona..
mi da alcuni errori.. bhof...

[yyzyyz]

cosi mi funziona meglio

MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.RecipDisplayName = "Teorodeo"
MAPIMessages1.RecipAddress = "mail@mail.it"
MAPIMessages1.MsgSubject = "oggetto mail"
MAPIMessages1.MsgNoteText = "Testo della mail"
MAPIMessages1.AttachmentPathName = "C:\file.txt"
MAPIMessages1.Send
MAPISession1.SignOff

ps. il MAPIMessages1.compose rallentava l'invio, mi controlla la posta in etrata prima dell'invio email, dimenticavo se il c:\file.txt nn esiste da errore ovviamente.

[MbEnjoy]

si certo.. ho messo il file ke ho creato io..
mi da errore nel

errore runtime , necessario oggetto e mi seleziona

MAPISession1.SignOn

ke posso' fà ?

[yyzyyz]

I'mtheleader ti ha già spiegato, devi mettere il controllo sul progetto altrimenti da quel tipo di errore (runtime).

ps. una volta selezionato il controllo , metti le 2 icone sul progetto in modo da ottenere una cosa del genere (vedi allegato).

[MbEnjoy]

ok, si giustissimo , saro scemo ( il kè è probabilissimo ) ma di icona me ne viene una sola.. asp ke vedo di spiegarmi melgio , forze nn faccio qualcosa io...

allora...

nn riesco a trovar i 2 conrrolli ke mi dite voi.. Posso scaricarli da qualke parte e caricarli in vb ? Almeno sono sicuro ke sono quelli giusti ?

[MbEnjoy]

skerzavo , trovati
mo' provo