Merhaba bir mail systemi yaptim listeliyor filan heseyi cok gusel ama tek sorunum mail atamiyorum su anda asp ile senranizasyon sekilde localhost/mailsender. asp uzerinden honderme yaptirtiyorum. IIS imin kendi smtp si ile gondermek istiyorum. TIdSMTP bileseni ile yapabileceğim soylediler ama duydugum kisi bilesenin nerde olsugunu bile bilmiyor :) acaba bu konuda bana yardim ede bilecek birisi waermi? <% if not hayat. eof then hayat. close %>

Hocam CDONTS ile asp uzerinden mail gonderiyorum zaten. Benim isteyim. Bu smtpyi Delphi de kullanmak. yazdiğim kodlari kullanaran denedim server adresi bolumune localhost yazdiğimda baglanamiyor. 127.0.0.1 yazdiğimda mail gitmis gibi gosteriyor ama mail gitmiyor. XP Pro SP2 kurulu // IIS 5.1 ve SMTP si yuklu // ASP ile hic sorun yasamiyorum mail gondermede. ASP de kullandiğim koduda yazayim. On Error Resume Next Private Function SheyTaNiMail Set objMail = Server. CreateObject objMail. From = strKimden objMail. To = strKime objMail. Subject = strKonu objMail. TextBody = strMesaj 'objMail. BodyFormat=0 'objMail. MailFormat=0 objMail. SEnd SheyTaNiMail = "<" & strKime & ">" Set objMail = Nothing End Functiondediğim gibi makinem mail atiyor ASP ile fakat Delphide Local SMTP yi kullanamadim bir turlu <% if not hayat. eof then hayat. close %>

güzel kardeşim onu kim dediyse siktrsin kendi sevrerın yoksa componenti nasıl kullanıcankisenin yapman gereken windows bileşeni kur a girip ordan iis altında SMTP sevrerı kurmak daha sonra microsoftun sitesinden cdonts. dll yi bulup sisteme register etcen (regsvr32 cdonts. dll) tabi permission ayarı falan aypılmış olcak daha sonra iis içinden smtp serverı çalıştırıcan daha sonra CDONTS u kullanabilirsin local smtp kullanan çok daşaklı bir mail componentdir zaten microsoft bi piyasaya girdiyse alternatif pek yokdur

windows2003 kullanıyorsan exchange server kur :) Mühendis kahveyi projeye dnüştüren bir insan evladıdır.

ASP ile zaten mail gonderiyorum. Delphi ile sadece denediğimde beceremedim. uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, IdMessage, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdMessageClient, IdSMTP, StdCtrls, XPMan;procedure TForm1. Button1Click ; begin if checkbox2. Checked=true then idsmtp1. Host:=combobox1. Text else idsmtp1. Host:=edit1. text; idsmtp1. username:=edit2. text; idsmtp1. password:=edit3. text; if checkbox1. checked then Idsmtp1. AuthenticationType:=atlogin else Idsmtp1. AuthenticationType:=atnone; idmessage1. From. Address:=edit4. text; idmessage1. Recipients. EMailAddresses:=edit5. text; idmessage1. Subject:=edit6. text; idmessage1. Body. Assign(memo1. lines); try idsmtp1. connect; except showmessage ; end; try idsmtp1. Send(idmessage1); showmessage ; finally idsmtp1. Disconnect; end; end; Buna smtp olarak localhost yazdiğimda olmadi diye cewap veriyor. 127.0.0.1 yazdiğimda oldu diyor ama mail gitmiyor. <% if not hayat. eof then hayat. close %>