<%'Çilem.Net © 2007'%> <% sira=request.form("katid") baslik=Request.Form("baslik") kisahaber=trim(request("kisahaber")) haber=request.form("haber") admin_kod=request.form("admin_kod") resimsiz=request.form("resimsiz") resimurl=request.form("resimurl") resimsec=request.form("resimsec") kaynakadresi=request.form("kaynakadresi") kaynakadi=trim(request("kaynakadi")) kaynakadi=guvenlik(kaynakadi) editor=request.form("editor") resim=Request.Form("resim") uyemail=trim(request("uyemail")) uyemail=guvenlik(uyemail) haberonay=trim(request("haberonay")) haberonay=guvenlik(haberonay) isimsoyad=trim(request("isimsoyad")) isimsoyad=guvenlik(isimsoyad) kategoriadi=trim(request("kategoriadi")) kategoriadi=guvenlik(kategoriadi) katid=trim(request("katid")) katid=guvenlik(katid) sondakika= request.form("sondakika") mansethaber= request.form("mansethaber") tarih= Now() if baslik= "" Then response.redirect "yonetimhaber_ekle.asp?hata=" end if if kisahaber= "" Then response.redirect "yonetimhaber_ekle.asp?hata=" end if if haber= "" Then response.redirect "yonetimhaber_ekle.asp?hata=" end if if kaynakadi= "" Then response.redirect "yonetimhaber_ekle.asp?hata=" end if if kaynakadresi= "" Then response.redirect "yonetimhaber_ekle.asp?hata=" end if set rs=server.createobject("adodb.recordset") rs.open "haber",cilem,1,3 rs.addnew rs("kaynakadresi") = kaynakadresi rs("kaynakadi") = kaynakadi rs("sira") = sira rs("admin_kod") = admin_kod rs("resimsiz") = resimsiz rs("resimurl") = resimurl rs("resimsec") = resimsec rs("isimsoyad") = isimsoyad rs("kategoriadi") = kategoriadi rs("katid") = katid rs("baslik") = baslik rs("haber") = haber rs("editor") = editor rs("resim") = resim rs("uyemail") = uyemail rs("kisahaber") = kisahaber rs("tarih") = tarih rs("haberonay") = haberonay if Request.Form("mansethaber")<>"" then rs("mansethaber")=true else rs("mansethaber")=False end if if Request.Form("sondakika")<>"" then rs("sondakika")=true else rs("sondakika")=False end if rs.update response.redirect "yonetim.asp" %>