Sirket ici intranet te mail gnderimi nasil yapilir?Sistem : windows server 2003 IIS kuruluSMTP Kurulu Cdont dlll yüklü Südün Bozuksa Senin Üc Gram Uckura Satilmissa Ruhun! Yanasma Gk Girsin Kizil Ciksin!!!

Alttakılere gore bı form hazırlayp bunla bı gondermeyı dene bakalım. <%'-- Dimension and Create Objects -- Dim objMessage, objConfig Set objMessage = Server. CreateObject Set objConfig = Server. CreateObject '-- Create configuration -- With objConfig. Fields. Item = 2. Item = "localhost" . Item = 10. Update End With '-- Send Email MyBody = Request. Form("D1") With objMessage. configuration = objConfig. From = "email@siten.com" . To = "email@siten.com" . Subject = "Web İletişim Formu / " . HTMLBody = MyBody. Send End With Set objMessage = Nothing Set objConfig = Nothing %>

mail. asp icerigini versen daha mantikli olur. Cunku bu formda hatanin sebebini anlayamazsin

mail. asp kodu ve hata mesajı aşağıdaki gibidir.<% DIM strName, strUserEmail, strReason, strComments'request the required information from the form and place them in the variablesstrName = request. form strUserEmail =request. form strReason =request. form strComments =request. form DIM objNewMail'Define the email typeSet objNewMail = Server. CreateObject 'Enter a title for the formobjNewMail. From = "Your Title"'Enter your email address, this is the address which will appear in the form componet of the emailobjNewMail. To= "meraldemirbas@hotmail.com"'objNewMail. ReplyTo = "strUserEmail"'Enter your domain name, ie: neonred. co. uk'objNewMail. RemoteHost = "mail. sifatip.com.tr"'Enter your name and email address'objNewMail. AddRecipient "Your Name", "you@yourdomain.com"'Enter a subject for the email messageobjNewMail. Subject = "Enter a subject here"'Build the body of the email using the data stired in the variableobjNewMail. Body = "This is an email generated by your online form."& vbCrLf & vbCrLf & _"Name: " & strName & vbCrLf & _"Email Address: " & strUserEmail & vbCrLf & _"Reason For Contacting: " & strReason & vbCrLf & _"Comments: " & strCommentsobjNewMail. SendIF objNewMail. body then'If the message was sent correctly tell the user THENResponse. Write strName & ",<br>"Response. Write "Mailiniz gonderildi..."ELSE'If the message wasnt sent correctly tell the userResponse. Write "An error occure while trying to send your email: " & objNewMail. ResponseEND IF%> HATA MESAJI Microsoft VBScript çaly?ma hatasy hata '800a01b6' Nesne bu zellik veya yntemi desteklemiyor: 'Body' /oneri/mail. asp, satr 34 Südün Bozuksa Senin Üc Gram Uckura Satilmissa Ruhun! Yanasma Gk Girsin Kizil Ciksin!!!

Asp ile mail gondermeye çalışıyorum. Fakat "alıcı mail adresi hatalı" mesajını veriyor adresler doğru olduğu halde. Kodu aşağıya yazıyorum bu konuda yardımcı olabilirseniz sevinirim. Şimdiden teşekkürler.(Serverde IIS ve SMTP kurulu. <html><head><title>Mail Gnder v1.0 - Translated by TvisKy</title><meta http-equiv="content-type" content="text/html;charset=ISO-8859-9"><meta http-equiv="content-type" content="text/html;charset=windows-1254"><style type="text/css">a:link a:visited a:active a:hover . text . fmtext . button input textarea select </style><script language="Javascript1.2"><!-- // load htmlarea_editor_url = "htmlarea/"; // URL to htmlarea filesvar win_ie_ver = parseFloat(navigator. appVersion. split );if (navigator. userAgent. indexOf >= 0) if (navigator. userAgent. indexOf >= 0) if (navigator. userAgent. indexOf >= 0) if (win_ie_ver >= 5.5) else { document. write('<scr'+'ipt>function editor_generate </scr'+'ipt>'); }// --></script></head><body bgcolor="#FFFFFF" text="#000000"><table width="50%" border="0" align="center" cellpadding="0" cellspacing="5" class="text"> <tr> <td> </td> </tr> <tr> <td><%If Request. Querystring = "True" ThenfmTo = Trim(Request. Form fmFrom = Trim(Request. Form fmFromname = Trim(Request. Form fmCC = Trim(Request. Form fmSubject = Trim(Request. Form fmBody = Trim(Request. Form fmAttach = Request. Form Call SendMail ElseResponse. Write End If %></td> </tr> <tr> <td><hr></td> </tr> <tr> <td bgcolor="#EEEEEE"> <table width="100%" border="0" cellspacing="5" cellpadding="0" class="fmtext"> <col align="right" width="40%"><col align="left" width="60%"> <form name="sendmail" method="post" action="mail. asp?send=True"> <tr> <td>Alıcı Email</td> <td><input type="text" name="fmTo" value="<%=fmTo%>" size="43"></td> </tr> <tr> <td>Gnderen'in Email</td> <td><input type="text" name="fmFrom" value="<%=fmFrom%>" size="43"></td> </tr> <tr> <td>Gnderen'in İsim</td> <td><input type="text" name="fmFromName" value="<%=fmFromName%>" size="43"></td> </tr> <tr> <td>CC</td> <td><input type="text" name="fmCC" value="<%=fmCC%>" size="43"></td> </tr> <tr> <td>Konu</td> <td><input type="text" name="fmSubject" value="<%=fmSubject%>" size="43"></td> </tr> <tr> <td colspan="2" align="center"> <textarea name="fmBody" style="width:100%; height:200px;"> <%=fmBody%> </textarea><br> <script language="javascript1.2"> var config = new Object ; // create new config object config. width = "100%"; config. height = "200px"; config. bodyStyle = 'background-color: white; font-family: "Verdana"; font-size: x-small;'; config. debug = 0; config. toolbar = [ , , , , , , , , ]; config. fontnames = ; config. fontsizes = ; editor_generate ; </script> </td> </tr> <tr> <td>Dosya Ekle</td> <td><input type="file" name="fmAttach" value="<%=fmAttach%>" size="43"></td> </tr> <tr> <td><input type="reset" name="fmReset" value="Temizle" class="button"></td> <td><input type="submit" name="fmSubmit" value="Gnder " class="button"></td> </tr> </form> </table> </td> </tr> <tr> <td> </td> </tr></table></body></html><%'Mail gndermeye başlayalımSub SendMail On Error Resume Next 'Scriptte hata varsastrErr = "" 'Hatalara bakalımIf EmailCheck = False ThenstrErr =smTo& strErr & "<li>Alıcı Email adresi hatalı!</li>"End IfIf EmailCheck = False ThenstrErr = strErr & "<li>Gnderen'in Email adresi hatalı!</li>"End IfIf Len > 0 ThensmFromage = smFromName & "<" & smFrom & ">"End IfIf strErr = "" Then 'Formda hata yoksaSet iMsg = CreateObject With iMsg. To = smTo. From = smFromage If Len > 0 Then. CC = smCC End If. Subject = smSubject. HTMLBody = smBody If Len > 0 Then Set iBp = . AddAttachment End If. SendEnd With'TemizLendiSet iMsg = NothingIf Len > 0 ThenSet iBp = NothingEnd IfIf Err > 0 Then 'Eğer bir problem varsaResponse. Write Response. Write Else 'Başarılar! Mail GnderildiResponse. Write("<b>Mail Gnderildi!</b><br>Kime: <i>" & smTo & "</i> Gün: " & FormatDateTime & " Saat: " & FormatDateTime smTo = ""smFrom = ""smFromName = ""smCC = ""smSubject = ""smBody = ""smAttach = ""End IfElse 'Eğer gnderilemediyse neden gnderilemediğini yazalım ki gnderen hatasını düzeltsinResponse. Write Response. Write End IfEnd Sub%> Südün Bozuksa Senin Üc Gram Uckura Satilmissa Ruhun! Yanasma Gk Girsin Kizil Ciksin!!!

arkadaslar kac zamandir bekliyorum bu konuda yardim edebilecek bir arkadas varmi? Südün Bozuksa Senin Üc Gram Uckura Satilmissa Ruhun! Yanasma Gk Girsin Kizil Ciksin!!!

: YukarıdaHocam, hatayı grmek için orada bi yerde on error resume next var onu iptal etmen lazım... kaldırdığındaEmailCheck haatsı veriyoronu iptal ettiğinde send using hatası veriyor, aspnin fonksiyonları ve mailin konfigurasyonaları yok ortada, ya başka bir sayfası daha olması lazım bunun, yada başka bir sayfadan include edilerek çalışıyordu yoksa bu tek başına calışamaz... Renegadealien?<form name="sendmail" method="post" action="mail. asp?send=True"> yoksa bundan sonrasi mi mai. asp? <%'Mail gndermeye başlayalımSub SendMail On Error Resume Next 'Scriptte hata varsa ki oyleyse strErr = "" 'Hatalara bakalımIf EmailCheck = False ThenstrErr =smTo& strErr & "<li>Alıcı Email adresi hatalı!</li>"End IfIf EmailCheck = False ThenstrErr = strErr & "<li>Gnderen'in Email adresi hatalı!</li>"End IfIf Len > 0 ThensmFromage = smFromName & "<" & smFrom & ">"End If yoksa hatalari cdont bileseni kendisimi kontrol ediyor?

cdosysde le bi fonksiyon olduğunu sanmıyorum... eğer yle ise ve onu desteklemiyorsa, direk orayı kaldırıpda deneyebilir... If strErr = "" Then 'Formda hata yoksa satırınıIf strErr <> "" Then 'Formda hata yoksayapıp bi denesin, şu anda makinada bileşen yüklü deil, emin değilim... Sanıyorum kendi ataszümü yaptım, kaynak belirterek kullanabilirsiniz. 10.05.2013 tarihli google arama sonucu : Aradığınız - "herşeyin hayırlısı rampanın bayırlısı" - ile ilgili hiçbir arama sonucu mevcut değil. Not : Syleyeni belli olduğu için ataszü değil, zlüsz oluyormuş, dolayısı ile kendi zlüszümü yapmış oldum :)

Haci tirnak isaretlerini kaldir oraya ilgili bilgileri, smtp ni felan filan yaz.'Enter your domain name, ie: neonred. co. uk'objNewMail. RemoteHost = "mail. sifatip.com.tr"

YukarıdaHocam, hatayı grmek için orada bi yerde on error resume next var onu iptal etmen lazım... kaldırdığındaEmailCheck haatsı veriyoronu iptal ettiğinde send using hatası veriyor, aspnin fonksiyonları ve mailin konfigurasyonaları yok ortada, ya başka bir sayfası daha olması lazım bunun, yada başka bir sayfadan include edilerek çalışıyordu yoksa bu tek başına calışamaz... Sanıyorum kendi ataszümü yaptım, kaynak belirterek kullanabilirsiniz. 10.05.2013 tarihli google arama sonucu : Aradığınız - "herşeyin hayırlısı rampanın bayırlısı" - ile ilgili hiçbir arama sonucu mevcut değil. Not : Syleyeni belli olduğu için ataszü değil, zlüsz oluyormuş, dolayısı ile kendi zlüszümü yapmış oldum :)

valla asp den anlamam ama konuyu uplayayım belki bilen biri vardır :| Hanimabi Sen Neler Dedin Oyle :( http://www.youtube.com/watch?v=YRbUA9UuUqk