asp ile mail adresine form
menderes11.09.2004 - 12:19:31
Herkese kolay gelsin. Benim sorunum asp ile hazırladığım sipariş formunu bir türlü mail adresine gönderememem. Bu konuda bana lütfen acil yardım. Yazdığım kod şu;
email="yenihaber@yenihabernet.com"
adsoyad=isim & " " & soyisim
addresstoemail= email
addressto=isim & " " & soyisim

konu= "Siparis Formu"
emailbody= Body
Dim mail
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.yenihabernet.com"
Mail.From = email
Mail.FromName = adsoyad
Mail.AddAddress addresstoemail, addressto
Mail.AddReplyTo email
Mail.Subject = konu
Mail.Body = emailbody

On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Hata Var: " & Err.Description
Else
Response.Write "Siparişiniz Başarıyla Gönderilmiştir."
End If

ALDIĞIM CEVAP İSE ŞU;
Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/nokshop/yolla.asp, line 91

Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at: http://www.microsoft.com/contentredirect.asp.

Şimdiden herkese teşekkür ederim.

*****Kodlarınızı yazarken kod bloklarınızı kullanınız. HUSONET
 
vkamadan11.09.2004 - 12:25:20
Merhaba ,
Kullandığın nesneyi server ın desteklemiyor büyük ihtimalle,
ben mail göndermede "CDO" nesnesini kullanırım ;http://www.asp101.com/samples/viewasp.asp?file=email_html.asp
Başarılar.
 
menderes11.09.2004 - 13:15:26
ilgine teşekkür ederim yalnız
Bir şeyler yaptım ama şu mesaj karşıma çıktı ve
aşağıdaki mesajın anlamını alamadım
Message ARE NO LONGER BEING SENT because of all the abuse the system was receiving! mesajı aldım. Eksik birşeyler yaptım herhalde
 
husonet11.09.2004 - 14:13:03
Sunucu ASPMAIL ı destekliyorsa
Mail.Host kısmına local ip adresini vermek yeterli olacaktır.

Mail.Host = "127.0.0.1"


Kolay Gelsin...
 
menderes17.09.2004 - 13:47:21
Herkese kolay gelsin sunucum CDONTS destekli imiş
ona göre aşağıdaki kodu düzenledim, "Siparişiniz Başarıyla Gönderilmiştir." yazısı geliyor. Ancak e-mail adrese gitmiyor.
Lütfen bana bu konuda bir yardım edin. Teşekkür ederim

Kullanılan kod:

email="adnanyildiz81@hotmail.com"
adsoyad=isim & " " & soyisim
addresstoemail= email
addressto=isim & " " & soyisim

konu= "Siparis Formu"
emailbody= Body
Dim mail
Set Mail = Server.CreateObject("CDONTS.Newmail")

Mail.From=adsoyad
Mail.To=email
Mail.MailFormat=0
Mail.Importance=1
Mail.BodyFormat=1
Mail.Subject = konu
Mail.Body = emailbody

On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Hata Var: " & Err.Description
Else
Response.Write "Siparişiniz Başarıyla Gönderilmiştir."
End If
 
husonet17.09.2004 - 14:35:36
Mail.Host = "127.0.0.1" Bu satırıda ekle


Kolay gelsin....
 
menderes17.09.2004 - 16:45:33
ilginize teşekkür ederim
dediğiniz satırı ekledim ancak şöyle bir hata çıktı bu sefer

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'Host'

/nokshop/yolla.asp, line 102
 
husonet17.09.2004 - 22:18:33

Set mailmsg = Server.CreateObject("CDONTS.NewMail")
mailmsg.From = "admin@husonet.com" 'mail'da gözükecek adres
mailmsg.To = Email
mailmsg.Bcc = "admin@husonet.com" 'bana gönder
mailmsg.Subject = "HUSONET BİLİŞİM HİZMETLERİ"
mailmsg.Charset = "windows-1254"
mailmsg.Body = "Sayın " & request("Name_First") & "," & chr(13) & chr(10)
mailmsg.Body = mailmsg.Body & "Mail listemize üye olduğunuz tespit edilmiştir. " & chr(13) & chr(10)
mailmsg.Body = mailmsg.Body & "Üyeliğiniz boyunca yaptığımız çalışmalardan haberdar olacaksınız." & chr(13) & chr(10)
mailmsg.Body = mailmsg.Body & "İlginize teşekkür ederiz." & chr(13) & chr(10)
mailmsg.Body = mailmsg.Body & chr(13) & chr(10)
mailmsg.Body = mailmsg.Body & chr(13) & chr(10)
mailmsg.Body = mailmsg.Body & chr(13) & chr(10)
mailmsg.Body = mailmsg.Body & "HUSONET BİLİŞİM HİZMETLERİ" & chr(13) & chr(10)
mailmsg.Host = "mail.husonet.com"
mailmsg.Send


Yukarıda Yazdığım Scripti kendi Sitemde kullanıyorum.

Kolay Gelsin...
 
mania02.10.2004 - 14:27:05
CDONTS'un Host şeklinde bir parametresi yok. Default olarak IIS in SMTP server ını kullanıyor. Ancak ASP de mail gönderimi konusunda en sorunlu bileşen bana göre CDONTS. Bir çok sorun çıkarabilir. Listedeki herkese gönderememe veya gönderdiği mesajını verip mesajların ulaşmaması geç ulaşması gibi. Bu sebep ile en iyisi ASP Mail bileşeninin yüklenmesini sağlamak. Ancak buda olmuyor ise IIS ile beraber gelen CDO ile mail göndermek.
 
NOT : Bu sayfa google'un siteyi indekslemesi içindir. www.delphiturkiye.com/forum/ adresini kullanınız!
1998-2006 www.delphiturkiye.com