implant


  Aktif KonularAktif Konular  Forum Üyelerini GösterÜye Listesi  Forumu AraArama  YardımYardım
  Kayıt OlKayıt Ol  GirişGiriş
ASP
 ASPTurkiye.com Forum : ASP
Konu Konu: mail boş gidiyor ad soyad fln geliyo Yanıt YazYeni Konu Gönder
Yazanlarda
Mesaj << Önceki Konu | Sonraki Konu >>
yok_06
Yeni Üye
Yeni Üye


Kayıt Tarihi: 15-Kasım-2007
Gönderilenler: 1
Gönderen: 15-Kasım-2007 Saat 23:16 | Kayıtlı IP Alıntı yok_06

<%
If Request.querystring("Send") <> "" Then
 msg_txt = "<font face=""Tahoma"" size=""2""><b>Yeni İletişim Formu</b>"
 msg_txt = msg_txt & "<br><br><b>İsim:</b>" & Request.form("your_name") 
 msg_txt = msg_txt & "<br><b>Email:</b> " & Request.form("your_email")
 msg_txt = msg_txt & "<br><br><b>Mesajınız:</b><br> " & Request.form("message")
 msg_txt = msg_txt & "</font>"
 
 Set Mail = Server.CreateObject("Persits.MailSender")
 Mail.Host = "mail.adres.net"
 Mail.Username = "info@adres.net"
    Mail.Password = "şifre"
 Mail.From = Request.form("your_email")
 Mail.FromName = Request.form("your_name")
 Mail.FromName = Request.form("message")
 Mail.AddAddress "info@adres.net"
 Mail.Subject = "İletişim Formu"
 Mail.IsHTML = True
 Mail.Body = msg_txt

 On Error Resume Next
 Mail.Send
 If Err Then
  msg = "Mesajınız Gönderilemedi.<br>" & Err.Description
 else
  msg = "Mesajınız Alınmıştır."
 End If
End If
%>
<%=your_name%>
<html>
<head>
 <meta http-equiv="Content-Language" content="tr">
 <meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
 <title>İletişim</title>
 <style type="text/css">
 td{
  font-family: Tahoma;
  font-size: 11px;
  font-weight: bold;
  padding: 2 5 2 0
 }
 input,textarea{
  font-family: Tahoma;
  font-size: 11px;
  width: 150px;
 }
 </style>
</head>
<%If Request.querystring("Send") <> "" Then%>
 <tr><td colspan="2" align="center"><%=msg%></td></tr>
  <tr><td colspan="2" align="center"><%=your_name%></td></tr>
 <tr><td colspan="2" align="center"><%=your_email%></td></tr> ;
    <tr><td colspan="2" align="center"><%=message%></td></tr>
<%End If%>
</html>

 

Yukarı Dön Göster yok_06's Özellikler Diğer Mesajlarını Ara: yok_06
 

Eğer Bu Konuya Cevap Yazmak İstiyorsanız İlk Önce Giriş
Eğer Kayıtlı Bir Kullanıcı Değilseniz İlk Önce Kayıt Olmalısınız

  Yanıt YazYeni Konu Gönder
Yazıcı Sürümü Yazıcı Sürümü

Forum Atla
Kapalı Foruma Yeni Konu Gönderme
Kapalı Forumdaki Konulara Cevap Yazma
Kapalı Forumda Cevapları Silme
Kapalı Forumdaki Cevapları Düzenleme
Kapalı Forumda Anket Açma
Açık Forumda Anketlerde Oy Kullanma

Powered by Web Wiz Forums version 7.91
Copyright ©2001-2004 Web Wiz Guide

Bu Sayfa 0,0947 Saniyede Yüklendi.