Visual Basic 6 - Inviare Email

Forum - Visual Basic 6 - Inviare Email

Nevinyrral (Normal User)
Newbie

Messaggi: 13
Iscritto: 28/04/2011

Postato alle 14:55
Mercoledì, 14/12/2011

Salve a tutti e grazie per l'attenzione,
devo in una parte di un programma far si che invii una email ad un indirizzo di posta, ho provato in vari modi inserendo la CDO e scrivendo il codice per esso e utilizzando anche Chilkatmail e scrivendo anche il suo codice:

Codice sorgente - presumibilmente VB.NET

On Error Resume Next
 
 Dim mailnab As New ChilkatMailMan2
 Dim invio As String
 
mailman.UnlockComponent "UnlockCode"
mailman.SmtpHost = "smtp.comcast.net"
 
 Dim email As New ChilkatEmail2
 
    email.subject = "Rapporto di " & Data & " alle " & Time
    email.Body = Lblbody.Caption
    email.AddTo "pincopallino", "mail1@rocketmail.com"
    email.FromAddress = "mail2@rocketmail.com"
    email.fromName = "pincopallaino"
     invio = mailman.SendEmail(email)

e non funziona, qualcuno mi sa aiutare...

nessuno (Normal User)
Guru^2

Messaggi: 6402
Iscritto: 03/01/2010

Postato alle 15:14
Mercoledì, 14/12/2011

Che vuol dire "non funziona"?

Come darti un suggerimento se non si sa cosa ti succede ?

Messaggi di errore ?

Contesto ?

Ricorda che nessuno è obbligato a risponderti e che nessuno è perfetto ...
---
Il grande studioso italiano Bruno de Finetti ( uno dei padri fondatori del moderno Calcolo delle probabilità ) chiamava il gioco del Lotto Tassa sulla stupidità.

Nevinyrral (Normal User)
Newbie

Messaggi: 13
Iscritto: 28/04/2011

Postato alle 20:19
Mercoledì, 14/12/2011

Testo quotato

Postato originariamente da nessuno:

Che vuol dire "non funziona"?

Come darti un suggerimento se non si sa cosa ti succede ?

Messaggi di errore ?

Contesto ?

L'istruzione non funziona, se si vuole vedere gli errori togliendo :

Codice sorgente - presumibilmente VB.NET

On Error Resume Next

da errore sull'istrzione:

Codice sorgente - presumibilmente Plain Text

mailman.UnlockComponent "UnlockCode"

ma non è necessario che l'istrzione sia questa a me interessa inviare una email con visual basic 6 senza utilizzare programmi esterni (in vb.net basterebbe system.net.mail e ci riesce benissimo è con vb6 che ho necessita e non riesco) ma non trovo e non riesco a fare un codice che ci riesca anche se seguendo guide e codici pronti ho illustrati con CDO o altre dll esterne a Windows non riesco...

nessuno (Normal User)
Guru^2

Messaggi: 6402
Iscritto: 03/01/2010

Postato alle 20:28
Mercoledì, 14/12/2011

Testo quotato

Postato originariamente da Nevinyrral:
da errore sull'istrzione:

Codice sorgente - presumibilmente Plain Text

mailman.UnlockComponent "UnlockCode"

Non ci vuoi proprio dire quale errore ... è un segreto?

Testo quotato

... (in vb.net basterebbe system.net.mail e ci riesce benissimo ...

Ti ricordo che il .NET utilizza il Framework che è una "grande" libreria esterna senza la quale il programma neanche parte ... quindi è la stessa cosa ...

In VB6 puoi utilizzare la DLL

vbSendMail

scaricabile gratuitamente e con codice sorgente ed esempi.

Nevinyrral (Normal User)
Newbie

Messaggi: 13
Iscritto: 28/04/2011

Postato alle 12:56
Giovedì, 15/12/2011

Testo quotato

Postato originariamente da nessuno:

Testo quotato

Postato originariamente da Nevinyrral:
da errore sull'istrzione:

Codice sorgente - presumibilmente Plain Text

mailman.UnlockComponent "UnlockCode"

Non ci vuoi proprio dire quale errore ... è un segreto?

Testo quotato

... (in vb.net basterebbe system.net.mail e ci riesce benissimo ...

Grazie per l'aiuto anche se vbSendMail non sono ancora riuscito ad usarlo ma promette meglio degli altri, almeno adesso mi dice che non riesce ad inviare su mail di yahoo perchè è rifiutato, per il vecchio codice l'errore stava proprio sull'istruzione:

Codice sorgente - presumibilmente Plain Text

mailman.UnlockComponent "UnlockCode"

che nel debug dava errore ma senza di essa non funzionava niente, ma visto che non conoscevo a pieno le funzioni di quel istruzione preferisco dedicarmi a qualcosa che posso studiare, saltare nel vuoto funziona solo ogni tanto...

Ultima modifica effettuata da Nevinyrral il 15/12/2011 alle 13:26