Merhaba arkadaslar elimde bir catering firmasına ait hazırladıgım bir aylık yemek menusu guncelleme sistemı var ben formu doldurup kaydet dedıgımde yenı verılerı eskıverılerle degıstırmesını istiyorum yanı önceki aya ait hiçbir bilgi bulunmasın istiyorum yanı yenı verılerı eskılerının uzerıne yazmak istiyorum ... yardımcı olursanız sevınırım saygılarımla... ÇÖZÜM :
yardımcı olursanız sevınırım saygılarımla...
ÇÖZÜM :
<%
set conn = server.createobject("adodb.connection")
conn.open("driver={microsoft access driver (*.mdb)}; dbq=" & server.mappath("yemek.mdb"))
set rs = server.createobject("adodb.recordset")
sql = "select * from liste "
rs.Open SQL, conn, 1, 3
%>
<%
rs("ay")=Request.Form("ay")
rs("tarih1")=Request.Form("tarih1")
rs("menu1")=Request.Form("menu1")
rs("tarih2")=Request.Form("tarih2")
rs("menu2")=Request.Form("menu2")
rs("tarih3")=Request.Form("tarih3")
rs("menu3")=Request.Form("menu3")
rs("tarih4")=Request.Form("tarih4")
rs("menu4")=Request.Form("menu4")
rs("tarih5")=Request.Form("tarih5")
rs("menu5")=Request.Form("menu5")
rs("tarih6")=Request.Form("tarih6")
rs("menu6")=Request.Form("menu6")
rs("tarih7")=Request.Form("tarih7")
rs("menu7")=Request.Form("menu7")
rs("tarih8")=Request.Form("tarih8")
rs("menu8")=Request.Form("menu8")
rs("tarih9")=Request.Form("tarih9")
rs("menu9")=Request.Form("menu9")
rs("tarih10")=Request.Form("tarih10")
rs("menu10")=Request.Form("menu10")
rs("tarih11")=Request.Form("tarih11")
rs("menu11")=Request.Form("menu11")
rs("tarih12")=Request.Form("tarih12")
rs("menu12")=Request.Form("menu12")
rs("tarih13")=Request.Form("tarih13")
rs("menu13")=Request.Form("menu13")
rs("tarih14")=Request.Form("tarih14")
rs("menu14")=Request.Form("menu14")
rs("tarih15")=Request.Form("tarih15")
rs("menu15")=Request.Form("menu15")
rs("tarih16")=Request.Form("tarih16")
rs("menu16")=Request.Form("menu16")
rs("tarih17")=Request.Form("tarih17")
rs("menu17")=Request.Form("menu17")
rs("tarih18")=Request.Form("tarih18")
rs("menu18")=Request.Form("menu18")
rs("tarih19")=Request.Form("tarih19")
rs("menu19")=Request.Form("menu19")
rs("tarih20")=Request.Form("tarih20")
rs("menu20")=Request.Form("menu20")
rs("tarih21")=Request.Form("tarih21")
rs("menu21")=Request.Form("menu21")
rs("tarih22")=Request.Form("tarih22")
rs("menu22")=Request.Form("menu22")
rs("tarih23")=Request.Form("tarih23")
rs("menu23")=Request.Form("menu23")
rs("tarih24")=Request.Form("tarih24")
rs("menu24")=Request.Form("menu24")
rs("tarih25")=Request.Form("tarih25")
rs("menu25")=Request.Form("menu25")
rs("tarih26")=Request.Form("tarih26")
rs("menu26")=Request.Form("menu26")
rs("tarih27")=Request.Form("tarih27")
rs("menu27")=Request.Form("menu27")
rs("tarih28")=Request.Form("tarih28")
rs("menu28")=Request.Form("menu28")
rs("tarih29")=Request.Form("tarih29")
rs("menu29")=Request.Form("menu29")
rs.Update
rs.close
Set rs=Nothing
Response.write "Kayit Basariyla Yapildi ."
%>
DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.
Üye Ol Şimdi DeğilÜye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.
< Bu mesaj bu kişi tarafından değiştirildi PaRaZ!T -- 4 Temmuz 2006; 12:51:28 >