Form mail kodu

[Toad]

Arkadaşlar asp de formmail kodu yazabilirmisiniz?

[ASPindir]

Merhaba;

www.aspindir.com

FormMail kategorisinde istediğiniz tarzda uygulamaları bulabilirsiniz.

[yemreyan]

<%
  dim bag
  dim baglanti
  dim kayitdizi
  dim komutmetni
  dim sonuc
  dim yol
  on error resume next
  yol = Server.MapPath&#40;"/db/veritabanıadi.mdb"&#41;
  bag="DRIVER=Microsoft Access Driver &#40;*.mdb&#41;;DBQ=" & yol
  set baglanti=server.CreateObject &#40;"adodb.connection"&#41;
  set kayitdizi=server.CreateObject &#40;"adodb.recordset"&#41;
  baglanti.Open bag 
  komutmetni="SELECT * from defter"
  kayitdizi.Open komutmetni,baglanti,2,2
  sonuc=Request.querystring&#40;"islem"&#41;
  if sonuc=1 then
     satir="

"
     do while not kayitdizi.EOF
        Response.Write""&kayitdizi.Fields &#40;"mail"&#41;&""
        Response.Write satir
        kayitdizi.MoveNext 
     loop
  end if
   
  if sonuc=2 then
     mail=Request.Form&#40;"mail"&#41;
     tarih=date&#40;&#41;
     kayitdizi.AddNew
     kayitdizi.Fields &#40;"mail"&#41;=mail
     kayitdizi.Update
     Response.Write "<center>Eklendi..
"
     
  End if
  kayitdizi.Close
  baglanti.Close 
  set kayitdizi=nothing
  set baglanti=nothing
%>

böyle bir kod işini görebilir sanırım

kolay gelsin

[ASPindir]

Merhaba;

Formmail derken mail gönderme kodu istiyorlardı.