16/09/05 16:05
Chevantonio19
salve a tutti qlk1 mi sa dare info su come mandare e-mail in vb 6.0?
link,code,insomma va bene tutto.
ciauzzz
link,code,insomma va bene tutto.
ciauzzz
aaa
Chevantonio19
17/09/05 15:19
Rand
Dunque in vb6, ? semplicissimo inviare un'email... basta sfruttare il controllo chiamato "MAPI", che sfrutta il funzionamento di Microsoft Outlook Express & Outlook (normale) x inviare le email 
...
With MAPSESS
.DownLoadMail = False
.UserName = "miaemail@miaemail.com"
.password = "lamiapassword"
.LogonUI = True
.SignOn
.NewSession = True
bNewSession = .NewSession
MAPMESS.SessionID = .SessionID
End With
MAPMESS.MsgIndex = -1
MAPMESS.Compose
MAPMESS.RecipDisplayName = "destinatario@server.com" 'destinatario email
MAPMESS.AttachmentIndex = 0
MAPMESS.AttachmentPathName = App.Path + "\ALLEGATO.TXT" 'allegato
'se si vogliono mettere + allegati, basta incrementare la propriet? "AttachmentIndex" e inserire il relativo path dell'allegato
MAPMESS.RecipAddress = "SMTP:" & "destinatario@server.com" 'destinatario
MAPMESS.MsgSubject = "prova email in vb6" 'oggetto
MAPMESS.MsgNoteText = "testo messaggio"
MAPMESS.Send False
...altrimenti potresti fare un programmino tipo telnet x spedire le email
...usando il controllo "winsock6"
ciauu
...
With MAPSESS
.DownLoadMail = False
.UserName = "miaemail@miaemail.com"
.password = "lamiapassword"
.LogonUI = True
.SignOn
.NewSession = True
bNewSession = .NewSession
MAPMESS.SessionID = .SessionID
End With
MAPMESS.MsgIndex = -1
MAPMESS.Compose
MAPMESS.RecipDisplayName = "destinatario@server.com" 'destinatario email
MAPMESS.AttachmentIndex = 0
MAPMESS.AttachmentPathName = App.Path + "\ALLEGATO.TXT" 'allegato
'se si vogliono mettere + allegati, basta incrementare la propriet? "AttachmentIndex" e inserire il relativo path dell'allegato
MAPMESS.RecipAddress = "SMTP:" & "destinatario@server.com" 'destinatario
MAPMESS.MsgSubject = "prova email in vb6" 'oggetto
MAPMESS.MsgNoteText = "testo messaggio"
MAPMESS.Send False
...altrimenti potresti fare un programmino tipo telnet x spedire le email
...usando il controllo "winsock6"
ciauu
Ultima modifica effettuata da Rand 17/09/05 15:20
aaa
18/09/05 21:25
Chevantonio19
ho trovato i components sotto microsoft mapi, grazie mille. ho mandato un e-mail poi ti faccio sapere....
grazie per la risposta
grazie per la risposta
Ultima modifica effettuata da Chevantonio19 19/09/05 12:51
aaa
19/09/05 13:08
Rand
Di nulla
...dovrebbe funzionare...
microsoft ha creato apposta questo ActiveX 
ciauu
...dovrebbe funzionare...
microsoft ha creato apposta questo ActiveX
ciauu
aaa
