<%
baslik=Request.Form("baslik")
metin=Request.Form("konu")
aciklama=Request.Form("aciklama")
cins=Request.Form("cins")
If metin="" then
Response.write("Konu boş olmamalı")
Response.End
else
End if
set baglanti=server.createobject("adodb.connection")
baglanti.open Cumle
set rs=server.createobject("adodb.recordset")
SQL="Select * from icerik where id="&request.querystring("id")
rs.open SQL,baglanti,1,3
if not rs.eof then
Rs("aciklama")=aciklama
Rs("cins")=cins
Rs("baslik")=baslik
Rs("konu")=metin
end if
rs.update
Rs.Close
Set Rs=Nothing
Baglanti.Close
Set Baglanti=Nothing
%>
Kayıt İşlemi Bitti
Düzenleme
İşleminiz Tamamlanmıştır
Şimdi Ana Sayfaya Yönlendiriliyorsunuz!
Eğer Uzun Bi Süre Burada Kalırsanız Tıklayın...