<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% 'işlem başlangıç SID=request.QueryString("SID") if SID<>session.SessionID then session("uyari")="Oturum disi islem yapmaya çalistiniz." response.Redirect("web_sayfa_ekle.asp") end if baslik_visible=cint(request.Form("baslik_visible")) kod_obekleri=cint(request.Form("kod_obekleri")) yayinda=cint(request.Form("yayinda")) genel_menu=cint(request.Form("genel_menu")) alt_menu=cint(request.Form("alt_menu")) sol_menu=cint(request.Form("sol_menu")) genel_menu_visible=cint(request.Form("genel_menu_visible")) alt_menu_visible=cint(request.Form("alt_menu_visible")) sol_menu_visible=cint(request.Form("sol_menu_visible")) ic_arkaplan_rengi=request.Form("ic_renk") arkaplan_rengi=request.Form("renk") sayac=cint(request.Form("sayac")) haber=cint(request.Form("haber")) hava_durumu=cint(request.Form("hava")) devlet=cint(request.Form("devlet")) doviz=cint(request.Form("doviz")) muzik=request.Form("muzik") onay_dogrula=0 if request.Form("sayfatum")=1 then sql="update sayfalar set baslik_visible="&baslik_visible&",kod_obekleri="&kod_obekleri&",yayinda="&yayinda&",genel_menu="&genel_menu&",alt_menu="&alt_menu&",sol_menu="&sol_menu&",genel_menu_visible="&genel_menu_visible&",alt_menu_visible="&alt_menu_visible&",sol_menu_visible="&sol_menu_visible&",ic_arkaplan_rengi='"&ic_arkaplan_rengi&"',arkaplan_rengi='"&arkaplan_rengi&"',sayac="&sayac&",haber="&cint(request.Form("haber"))&",hava_durumu="&cint(request.Form("hava"))&",devlet="&devlet&",doviz="&doviz&",muzik="&muzik&" ;" set veriler=mysql_baglanti.execute(sql) response.Redirect("sayfalar.asp") else sql2="select * from sayfalar order by id;" set veriler2=mysql_baglanti.execute(sql2) if not veriler2.eof then veriler2.movefirst do while not veriler2.eof if request.Form("sayfa"&veriler2("id")) = 1 then onay_dogrula=onay_dogrula+1 sql="update sayfalar set baslik_visible="&baslik_visible&",kod_obekleri="&kod_obekleri&",yayinda="&yayinda&",genel_menu="&genel_menu&",alt_menu="&alt_menu&",sol_menu="&sol_menu&",genel_menu_visible="&genel_menu_visible&",alt_menu_visible="&alt_menu_visible&",sol_menu_visible="&sol_menu_visible&",ic_arkaplan_rengi='"&ic_arkaplan_rengi&"',arkaplan_rengi='"&arkaplan_rengi&"',sayac="&sayac&",haber="&cint(request.Form("haber"))&",hava_durumu="&cint(request.Form("hava"))&",devlet="&devlet&",doviz="&doviz&",muzik="&muzik&" where id="&veriler2("id")&";" set veriler=mysql_baglanti.execute(sql) end if veriler2.movenext loop end if response.Redirect("sayfalar.asp") end if if onay_dogrula=0 then session("uyari")="Global ayarlar için herhangi bir sayfa seçmediniz." response.Redirect("sayfalar_global_ayarlar.asp") end if 'işlem bitiş %>