Manuel olarak vatandaş geliyor teslim tarihi 1 alanına mesela 10/02/2010 yazıyor kaydı düzenle diyor
Düzeneleme sayfası kodlar
Alıntı
if request.querystring("do")="yaziduzenle" then
'// Gelen ID kontrol ediliyor..
ID=Trim(request.querystring("PostID"))
if (not isnumeric(ID)) or ID="" or Len(ID)<1 or ID<1 then
Response.Redirect "Yazilar.asp"
end if
'// Gelen ID ye ait yazıya bağlanılıyor..
Set Yazi = Conn.Execute("Select kimlik,adi,bina_kodu,sayac_marka,sayac_turu,okunma ,tarih,teslim_tarihi_1,daire_no,teslim_endeksi_bir ,firma_1,geri_alis_tarihi_1,geri_alis_endeksi_1,bi na_kodu_2,daire_no_2,teslim_tarihi_2,teslim_endeks i_2,firma_2,geri_alis_tarihi_2,geri_alis_endeksi_2 ,bina_kodu_3,daire_no_3,teslim_tarihi_3,teslim_end eksi_3,firma_3,geri_alis_tarihi_3,geri_alis_endeks i_3,bina_kodu_4,daire_no_4,teslim_tarihi_4,teslim_ endeksi_4,firma_4,geri_alis_tarihi_4,geri_alis_end eksi_4,bina_kodu_5,daire_no_5,teslim_tarihi_5,tesl im_endeksi_5,firma_5,geri_alis_tarihi_5,geri_alis_ endeksi_5,sayac_durum,il from dbo_sayac_teslim where kimlik="&ID&"")
%>
Sorgunun gönderilidği kodlar
Alıntı
'// Yazı güncelleniyor..
if request.querystring("do")="yaziguncelle" then
ID=request.querystring("PostID")
if (not isnumeric(ID)) or Len(ID)<1 or ID="" or ID=0 then
Response.Redirect "Yazilar.asp"
Response.End
End if
adi = Connect(trim(request.form("adi")))
bina_kodu = trim(request.form("bina_kodu"))
sayac_marka = trim(request.form("sayac_marka"))
daire_no = trim(request.form("daire_no"))
teslim_endeksi_bir = trim(request.form("teslim_endeksi_bir"))
sayac_turu = request.form("sayac_turu")
sayac_tipi=Request.form("sayac_tipi")
sayac_durum=Request.form("sayac_durum")
il=Request.form("il")
teslim_tarihi_1 = Connect(request.form("teslim_tarihi_1"))
firma_1 = Connect(request.form("firma_1"))
geri_alis_tarihi_1 = Connect(request.form("geri_alis_tarihi_1"))
geri_alis_endeksi_1 = Connect(request.form("geri_alis_endeksi_1"))
bina_kodu_2 = Connect(request.form("bina_kodu_2"))
daire_no_2 = Connect(request.form("daire_no_2"))
teslim_tarihi_2 = Connect(request.form("teslim_tarihi_2"))
teslim_endeksi_2 = Connect(request.form("teslim_endeksi_2"))
firma_2 = Connect(request.form("firma_2"))
geri_alis_tarihi_2 = Connect(request.form("geri_alis_tarihi_2"))
geri_alis_endeksi_2 = Connect(request.form("geri_alis_endeksi_2"))
bina_kodu_3 = Connect(request.form("bina_kodu_3"))
daire_no_3 = Connect(request.form("daire_no_3"))
teslim_tarihi_3 = Connect(request.form("teslim_tarihi_3"))
teslim_endeksi_3 = Connect(request.form("teslim_endeksi_3"))
firma_3 = Connect(request.form("firma_3"))
geri_alis_tarihi_3 = Connect(request.form("geri_alis_tarihi_3"))
geri_alis_endeksi_3 = Connect(request.form("geri_alis_endeksi_3"))
bina_kodu_4 = Connect(request.form("bina_kodu_4"))
daire_no_4 = Connect(request.form("daire_no_4"))
teslim_tarihi_4 = Connect(request.form("teslim_tarihi_4"))
teslim_endeksi_4 = Connect(request.form("teslim_endeksi_4"))
firma_4 = Connect(request.form("firma_4"))
geri_alis_tarihi_4 = Connect(request.form("geri_alis_tarihi_4"))
geri_alis_endeksi_4 = Connect(request.form("geri_alis_endeksi_4"))
bina_kodu_5 = Connect(request.form("bina_kodu_5"))
daire_no_5 = Connect(request.form("daire_no_5"))
teslim_tarihi_5 = Connect(request.form("teslim_tarihi_5"))
teslim_endeksi_5 = Connect(request.form("teslim_endeksi_5"))
firma_5 = Connect(request.form("firma_5"))
geri_alis_tarihi_5 = Connect(request.form("geri_alis_tarihi_5"))
geri_alis_endeksi_5 = Connect(request.form("geri_alis_endeksi_5"))
if Len(adi)<1 or Len(bina_kodu)<1 or Len(daire_no)<1 then
Response.Redirect "Yazilar.asp?do=yaziduzenle&PostID="&ID&"&Durum=BO S_ALAN_BIRAKMAYIN!"
Response.End
End if
if sayac_turu="" then
Set YaziUpdate = Conn.Execute("Update dbo_sayac_teslim set adi='"&adi&"',bina_kodu='"&bina_kodu&"',sayac_mark a='"&sayac_marka&"',daire_no='"&daire_no&"',teslim _endeksi_bir='"&teslim_endeksi_bir&"',firma_1='"&f irma_1&"',geri_alis_tarihi_1='"&geri_alis_tarihi_1 &"',geri_alis_endeksi_1='"&geri_alis_endeksi_1&"', bina_kodu_2='"&bina_kodu_2&"',daire_no_2='"&daire_ no_2&"',teslim_tarihi_2='"&teslim_tarihi_2&"',tesl im_endeksi_2='"&teslim_endeksi_2&"',firma_2='"&fir ma_2&"',geri_alis_tarihi_2='"&geri_alis_tarihi_2&" ',geri_alis_endeksi_2='"&geri_alis_endeksi_2&"',bi na_kodu_3='"&bina_kodu_3&"',daire_no_3='"&daire_no _3&"',teslim_tarihi_3='"&teslim_tarihi_3&"',teslim _endeksi_3='"&teslim_endeksi_3&"',firma_3='"&firma _3&"',geri_alis_tarihi_3='"&geri_alis_tarihi_3&"', geri_alis_endeksi_3='"&geri_alis_endeksi_3&"',bina _kodu_4='"&bina_kodu_4&"',daire_no_4='"&daire_no_4 &"',teslim_tarihi_4='"&teslim_tarihi_4&"',teslim_e ndeksi_4='"&teslim_endeksi_4&"',firma_4='"&firma_4 &"',geri_alis_tarihi_4='"&geri_alis_tarihi_4&"',ge ri_alis_endeksi_4='"&geri_alis_endeksi_4&"',bina_k odu_5='"&bina_kodu_5&"',daire_no_5='"&daire_no_5&" ',teslim_tarihi_5='"&teslim_tarihi_5&"',teslim_end eksi_5='"&teslim_endeksi_5&"',firma_5='"&firma_5&" ',geri_alis_tarihi_5='"&geri_alis_tarihi_5&"',geri _alis_endeksi_5='"&geri_alis_endeksi_5&"',teslim_t arihi_1='"&teslim_tarihi_1&"' where Kimlik="&ID&"")
Response.Redirect "Yazilar.asp"
Response.End
else
Set YaziUpdate = Conn.Execute("Update dbo_sayac_teslim set adi='"&adi&"',bina_kodu='"&bina_kodu&"',sayac_mark a='"&sayac_marka&"',daire_no='"&daire_no&"',teslim _endeksi_bir='"&teslim_endeksi_bir&"',firma_1='"&f irma_1&"',geri_alis_tarihi_1='"&geri_alis_tarihi_1 &"',geri_alis_endeksi_1='"&geri_alis_endeksi_1&"', bina_kodu_2='"&bina_kodu_2&"',daire_no_2='"&daire_ no_2&"',teslim_tarihi_2='"&teslim_tarihi_2&"',tesl im_endeksi_2='"&teslim_endeksi_2&"',firma_2='"&fir ma_2&"',geri_alis_tarihi_2='"&geri_alis_tarihi_2&" ',geri_alis_endeksi_2='"&geri_alis_endeksi_2&"',bi na_kodu_3='"&bina_kodu_3&"',daire_no_3='"&daire_no _3&"',teslim_tarihi_3='"&teslim_tarihi_3&"',teslim _endeksi_3='"&teslim_endeksi_3&"',firma_3='"&firma _3&"',geri_alis_tarihi_3='"&geri_alis_tarihi_3&"', geri_alis_endeksi_3='"&geri_alis_endeksi_3&"',bina _kodu_4='"&bina_kodu_4&"',daire_no_4='"&daire_no_4 &"',teslim_tarihi_4='"&teslim_tarihi_4&"',teslim_e ndeksi_4='"&teslim_endeksi_4&"',firma_4='"&firma_4 &"',geri_alis_tarihi_4='"&geri_alis_tarihi_4&"',ge ri_alis_endeksi_4='"&geri_alis_endeksi_4&"',bina_k odu_5='"&bina_kodu_5&"',daire_no_5='"&daire_no_5&" ',teslim_tarihi_5='"&teslim_tarihi_5&"',teslim_end eksi_5='"&teslim_endeksi_5&"',firma_5='"&firma_5&" ',geri_alis_tarihi_5='"&geri_alis_tarihi_5&"',geri _alis_endeksi_5='"&geri_alis_endeksi_5&"',sayac_tu ru='"&sayac_turu&"',sayac_tipi='"&sayac_tipi&"',sa yac_durum='"&sayac_durum&"',il='"&il&"',teslim_tar ihi_1='"&teslim_tarihi_1&"',duzenleme_tarih='"&dat e()&"' where Kimlik="&ID&"")
Response.Redirect "Yazilar.asp"
Response.End
end if
end if