hallo,

was wäre die einfachste Möglichkeit per Shell-Skript Mails zu versenden? Ja, ich könnte YAM starten, und das ganze per ARexx machen, aber ich möchte gerne ein Programm ohne GUI verwenden. Weiss jemand Rat?
--
Join us @ Sarkasmus-pur


Talking about music is like dancing about architecture

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

code:

---

/* rexx */

server = 'mailto.t-online.de'
port   = 25

fromname = 'Thomas Rapp'
frommail = 'thomas-rapp@t-online.de'

toname = 'Thomas Rapp'
tomail = 'thomas-rapp@web.de'

subject = 'Test-Mail'

text.1 = 'Hallo !'
text.2 = ''
text.3 = 'Dies ist ein Test.'
text.4 = ''
text.5 = 'Viele Gruesse !'
textlines = 5

if Open(tcp,'tcp:'server'/'port,write) then do
    say ReadLn(tcp)
    call WriteLn(tcp,'HELO smtp')
    say ReadLn(tcp)
    call WriteLn(tcp,'RCPT To:<'tomail'>')
    say ReadLn(tcp)
    call WriteLn(tcp,'DATA')
    say ReadLn(tcp)
    call WriteLn(tcp,'From: "'fromname'" <'frommail'>')
    call WriteLn(tcp,'To: "'toname'" <'tomail'>')
    call WriteLn(tcp,'Subject:' subject)
    call WriteLn(tcp,'')
    do i = 1 to textlines
     call WriteLn(tcp,text.i)
    end
    call WriteLn(tcp,'')
    call WriteLn(tcp,'.')
    say ReadLn(tcp)
    call WriteLn(tcp,'QUIT')
    say ReadLn(tcp)
    call Close(tcp)
end
else
    say 'cannot connect to server'

---

[ - Antworten - Zitieren - Direktlink - ]

danke Thomas, ich werd es mal ausprobieren
--
Join us @ Sarkasmus-pur


Talking about music is like dancing about architecture

[ - Antworten - Zitieren - Direktlink - ]