[VB6] Invio E-mail: relaying not allowed

[startac130]

Ciao,
ho realizzato un programmino che invia e-mail a 1 o + destinatari utilizzando winsock..
Server -> "mail.libero.it" Porta ->25

Se invio a "xxxx@azienda.it" tutto ok ma se invece il destinatario è "xxxxx@libero.it" oppure "xxxxx@yahoo.it"... il server mi risponde "relaying not allowed".

E' necessaria l'autenticazione sul server SMTP???

Come fare per poter spedire a tutti? Qualcuno mi aiuta?
Grazie, ciao.
M@tteo.

[junx]

E' necessaria l'autenticazione sul server SMTP???

il server della posta in uscita SMTP che necessariamente deve essere quello del provider con il quale ti stai collegando

[startac130]

Ok, grazie... provo ma... un'altra domanda (se posso):
Io sono collegato con telekom ADSL Smart, credo che sia necessaria l'Autenticazione sul Server SMTP...come si fa???
Grazie ancora, sei gentilissimo!
Se avessi bisogno... conta pure su di me!
Ciao.

[junx]

posta il codice che usi per inviare la posta.

[startac130]

Eccolo quì:

Private Sub InviaMail(Oggi As Date, Destinatario As String)
    Dim Rimozione, ID As String
    ID = Oggi & Rnd(4) & "@libero.it"
    Rimozione = "In caso non vogliate più ricevere le nostre E-mail preghiamo richiedere la rimozione dalla mailing list, Grazie."
    WS.Connect
    Do Until WS.State = sckConnected
        DoEvents
    Loop
    WS.SendData ("HELO " & "mail.libero.it" & vbCrLf)
    RisposteServer
    WS.SendData ("MAIL FROM: " & "rentram@iol.it" & vbCrLf & "RCPT TO: " & Destinatario & vbCrLf)
    RisposteServer
    WS.SendData ("DATA" & vbCrLf)
    RisposteServer
    WS.SendData ("Message-ID: " & ID & vbCrLf & "Date: " & Oggi & vbCrLf)
    WS.SendData ("From: " & txtNome.Text & vbCrLf & txtCont.Text & vbCrLf & Rimozione & vbCrLf)
    WS.SendData ("Oggetto: " & txtSub.Text & vbCrLf)
    WS.SendData ("." & vbCrLf)
    RisposteServer
    WS.SendData ("QUIT" & vbCrLf)
    RisposteServer
    WS.Close
End Sub

Ciao.

[startac130]

Ah dimenticavo:

1) Protocollo TCP
2) non mi compare l'oggetto (mail aperta con outlook office xp)

[junx]

yahoo usa ESMTP. Ti invio un link col collegamento ad un progetto VB che usa una DLL scrutta in C, la quale consente di autenticarsi su ESMTP.

http://www.visual-basic.it/scarica.asp?ID=685

Ciao!

[Dardino]

Mandare una e-mail con winsok equivale a mandarla con Telnet
per poter inviare e-mail con un aspetto decente devi scrivere tutte le info necessarie nel corpo del testo del messaggio codificandolo in modo opportuno.
hai mai visto cosa diventa una e-mail scritta con outlook in termini di pacchetti trasmessi tramite winsock?
non è semplice... ma puoi studiarti il source delle e-mail provando a leggerle con telnet per vedere dove sbagli cioè:
Componi un messaggio il più complicato possibile con Outlook inserendo anche un'allegato.
lo invii al tuo indirizzo internet (deve risiedere su un server dove puoi accedere con un client di posta e non dal sito intertnet) e poi con telnet accedi al server di posta in entrata sulla porta 110 leggi il messaggio e ti apparirà il contenuto dell'email in formato testo con tutti i codici di formattazione possibili e immaginabili. quelli devi riprodurre. bye

P.S. aumenta il buffer del Monitor Telnet a tipo 500 righe altrimenti vedi solo la fine del messaggio

[goku370]

Originariamente inviato da junx
il server della posta in uscita SMTP che necessariamente deve essere quello del provider con il quale ti stai collegando

Mi aggancio a questa discussione...
junx mi puoi spiegare meglio quello che hai detto sopra? :master:
mettimao che io mi colleghi ad internet con un account tipo xxx@tin.it, usando telnet posso inviare e-mail a tutti?
E mi devo collegare al server in uscita mail.tin.it o può andare bene anche un alro come mail.libero.it???