[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("/db/veritabanıadi.mdb")
  bag="DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & yol
  set baglanti=server.CreateObject ("adodb.connection")
  set kayitdizi=server.CreateObject ("adodb.recordset")
  baglanti.Open bag 
  komutmetni="SELECT * from defter"
  kayitdizi.Open komutmetni,baglanti,2,2
  sonuc=Request.querystring("islem")
  if sonuc=1 then
     satir="

"
     do while not kayitdizi.EOF
        Response.Write""&kayitdizi.Fields ("mail")&""
        Response.Write satir
        kayitdizi.MoveNext 
     loop
  end if
   
  if sonuc=2 then
     mail=Request.Form("mail")
     tarih=date()
     kayitdizi.AddNew
     kayitdizi.Fields ("mail")=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ı.