bu -kodlar işinize yara sanırım
<!--#include file="sifre.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; chablgekleet=windows-1254">
<title>Albüm Düzenle</title>
<link href="../style.css" rel="stylesheet" type="text/css" />
</head>
<!--#include file="db.asp"-->
<body background="images/arka.gif">
<%
if (Request.QueryString("kat"))="kaydet" then
id=request.querystring("id")
if not isnumeric(id)=false then
isim=request.form("isim")
aciklama=request.form("aciklama")
If isim="" or aciklama="" Then
Response.Write "<center><br><br><center>Bos Biraktigini Alan Var.<br> Geri Dönüp Doldurunuz.<br><a href=""javascript:history.back()""><<<GERI DÖn</a></center></center>"
Response.End
End if
set blgekle = Server.CreateObject("ADODB.RecordSet")
SQL = "select * from galeri_kat where id="&id&""
blgekle.Open SQL,data,1,3
if not blgekle.eof then
blgekle("isim")=isim
blgekle("aciklama")=aciklama
if request.form("goster")<>"" then
blgekle("goster")=1
else
blgekle("goster")=0
end if
blgekle.update
blgekle.Close
Set blgekle = Nothing
Response.Redirect("g_kategoriler.asp")
End if
end if
end if
if (Request.QueryString("kat"))="duzenle" then
id=request.querystring("id")
set blgekle = Server.CreateObject("ADODB.RecordSet")
SQL = "select * from galeri_kat where id="&id&""
blgekle.open SQL,data,1,3
%>
<table border="0" width="100%" id="table1" cellpadding="0" style="border-collapse: collapse">
<tr>
<td height="22" background="../tema/<%=sitetema%>/tablo_bg.jpg"><center>
<font class="Menu">Albüm Düzenle</font>
</center></td>
</tr>
</table><br>
<table width="99%" align="center" border="0" cellpadding="2" cellspacing="2" align="center" class="tablo">
<form method="post" action="?kat=kaydet&id=<%=id%>">
<tr>
<td width="30%">
<div align="right">
<font class="metinkalin">Isim :</font></div>
</td>
<td width="70%">
<input name="isim" type="text" size="48" class="alan" value="<%=blgekle("isim")%>"></td>
</tr>
<tr>
<td width="30%">
<div align="right">
<font class="metinkalin">Açiklama : </font></div>
</td>
<td width="70%">
<textarea name="aciklama" class="alan" rows="6" cols="58"><%=blgekle("aciklama")%></textarea>
<br></td>
</tr>
<tr>
<td width="30%">
<div align="right">
<font class="metinkalin">Göster : </font></div>
</td>
<td width="70%">
<input name="goster" id="goster" type="checkbox" <%if blgekle("goster")=1 then%> checked="checked" <%end if%> value="checkbox">
<input type="submit" value="Düzenle Kaydet" class="dugme">
<br></td>
</tr>
<tr>
<td width="30%"></td>
<td width="70%">
</td>
</tr>
</form>
</table>
<%
blgekle.Close
Set blgekle = Nothing
Response.End
End if
%>
</body>
</html>