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 ."
%>
< Bu mesaj bu kişi tarafından değiştirildi PaRaZ!T -- 4 Temmuz 2006; 12:51:28 >