Arsip: [ASK] error saat coba send email dengan Indy SMTP

more 14 years ago
shindo
kk sekalian,
mohon bantuannya ...
berikut potongan program sy
procedure TForm1.Button1Click(Sender: TObject);
begin
SMTP.Host := Edit1.Text;
SMTP.Port := strtoint(Edit2.Text);
MailMessage.From.Name := Edit3.Text;
MailMessage.From.Address := Edit4.Text;
MailMessage.Recipients.EMailAddresses := Edit5.Text;
MailMessage.Subject := Edit6.Text;
MailMessage.Body.Text := Edit7.Text;
if FileExists(Edit8.Text) then
TIdAttachment.Create(MailMessage.MessageParts, Edit8.Text);
try
try
SMTP.Connect;
SMTP.Send(MailMessage);
except
ShowMessage('Ada Yang Salah');
end;
finally if SMTP.Connected then
begin
ShowMessage('E-Mail Telah Tekirim');
SMTP.Disconnect;
end;
end;
end;
sy lg mencoba send email dengan IdSMTP
alamat email yg sy pakai di gmail.com
tujuan juga sama
smtp sy isi smtp.gmail.com
trus port sy isi 125
atau ada yg salah dengan isian sy ?
mohon bantuan kk sekalian
thx a lot sebelumnya
more 14 years ago
ImanD
files ssleay32.dll dan libeay32.dll dah di copy-in ke System atw satu folder dengan aplikasi belom?

more 14 years ago
shindo
wah belum mas ...
baru tau ini, btw 2 file itu buat apa ya ?
tapi baru sy coba ini kok tetep error juga ya ... stl 2 file itu dicopykan ke folder/direktori yg sama ?

more 14 years ago
shindo
btw ini sy coba pake port 465 program nya jadi not responding ya ...
atau ada perubahan lain yg harus dilakukan pada coding nya ?
tadi nyoba di kantor pake telkomnet ... ada beda atau ngga ya ?
maap masih nubie soalnya buat pemrograman internet ama email kaya gini ...
td sy sempet nyari2 source contoh program ... dapet pake componene TNmNNTP
tapi komponen nya yg ga ketemu .... contoh yg sama sy dapetin di delphindo sini ... email2.zip kalo ga salah namanya ... itu juga ga dapet komponen nya ...
ada yg bisa bantu komponen itu bagian dari komponen apa ya ?
thx a lot sebelumnya

more 14 years ago
Hadoitz
Gw juga pernah bermasala kyk gini, dan udah nyerah gw sekarang, error mulu' seeh :(
more ...
- Pages:
- 1
reply |
Report Obsolete
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 2 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 3 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 10 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 10 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 10 years ago
Random Topic
- Tipikal Lowongan Kerja, Lamaran & CV bidang IT di Indone
by deLogic in OOT more 17 years ago - Bagaimana cara menghapus informasi window dari memory ?
by stoopid in Tip n Trik Pemrograman more 16 years ago - catastrophic failur
by danish in Lain-lain more 17 years ago - Masalah DbXpress dan QuickReport
by sepoix in Reporting more 14 years ago - Program serial komunikasi dengan mikrokontroler
by firdaus_sh in Enginering more 15 years ago - [Help] Cara meletakn tabel di form
by pai_chan in Tip n Trik Pemrograman more 13 years ago - reset code program??
by akudana in Hal umum tentang Pascal Indonesia more 13 years ago - Menginput nilai numeric(real) dengan SQL
by umarbakri in Hal umum tentang Pascal Indonesia more 16 years ago - BDS2006 Update 2 dah keluar
by deLogic in Hal umum tentang Pascal Indonesia more 16 years ago - Baca Bandwidth
by ivan in Network, Files, I/O & System more 16 years ago