Aşağıda bir sipariş formunun asp ile veritabanına yazmı kısmı yer almakta aynı zamanda bu bilgiyi benim mail adresime göndermesini istiyorum nasıl yapabilirim yardımcı olabilecek biri varmı ?
Kod:
<%
Set Baglanti = Server.CreateObject("ADODB.Connection")
Baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("veri_tabani.mdb")
siparis = Request.Form ("siparis")
odeme = Request.Form ("odeme")
isim = Request.Form ("isim")
telefon = Request.Form ("telefon")
posta = Request.Form ("posta")
sehir = Request.Form ("sehir")
ilce = Request.Form ("ilce")
adres = Request.Form ("adres")
Set Kayit = Server.CreateObject ("ADODB.RecordSet")
Sql_Komutu = "Select * from mesajlar"
Kayit.Open Sql_Komutu, Baglanti, 1, 3
if isim ="" or telefon ="" then
Response.Write "<font size=""+1""><b><font color=""#FF0000"">HATA!</font><br><br>Lütfen bütün alanları doldurunuz</b></font><br><br><br><br>"
Response.Write "<a href=""javascript:history.back()""><<Geri</a></b>"
else
Kayit.AddNew
Kayit("tarih")=date()
Kayit("saat")=time()
Kayit("durum")="Pasif" 'Pasif, mesajin yayinda olmamasi demektir ve her mesaj baslangiçta pasiftir
Kayit("siparis")=siparis
Kayit("odeme")=odeme
Kayit("isim")=isim
Kayit("telefon")=telefon
Kayit("posta")=posta
Kayit("sehir")=sehir
Kayit("ilce")=ilce
Kayit("adres")=adres
Kayit.Update
Response.Write "<font size=""+1""><b><font color=""#00FF00"">TEBRIKLER!</font><br><br>Siparisiniz basarili bir sekilde kaydedildi</b></font><br><br><br><br>"
end if
Kayit.close
Set Kayit = Nothing
%>