merhaba bu hatanın sebebi ne acaba yardımcı olursanız sevinirim
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access Driver] Cannot update. Database or object is read-only.
/3/admin.asp, line 59
admin.asp.
<!--#include file="parola.asp"-->
<!--#include file="ustmenu.asp"-->
<table width="100%">
<tr>
<!--#include file="database.asp"-->
<% Response.Buffer = true %>
<% gitbakem = request.querystring("gitbakem") %>
<td valign="top" width="18%">
<table border="0" cellpadding="0" width="100%" bordercolordark="#ffffff"><tr><td>
<table style="border:1 <%=kenarlik%> solid;" cellpadding="0" cellspacing="1" width="100%" bgcolor="<%=altrenk%>">
<tr><td background="images/bg_image.gif" align="center"><font face="verdana" color="<%=basyazi%>">Admin Bölümü</font></td></tr>
<tr><td><img src="images/ok.gif"><a href="admin.asp?gitbakem=mpe"><font color="<%=yaziiki%>"><b> Mp3 Ekle</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="indexadmin.asp"><font color="<%=yaziiki%>"><b> Mp3 Düzenle</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="admin.asp?gitbakem=kate"><font color="<%=yaziiki%>"><b> Kategori Ekle</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="admin.asp?gitbakem=ds"><font color="<%=yaziiki%>"><b> Kategori Düzenle</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="admin.asp?gitbakem=istek"><font color="<%=yaziiki%>"><b> Ýstekler</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="default.asp"><font color="<%=yaziiki%>"><b> Çýkýþ</b></font></A></td></tr>
</table></td></tr></table>
</td>
<td valign="top">
<table border="0" cellpadding="0" width="100%" bordercolordark="#ffffff"><tr><td>
<table style="border:1 <%=kenarlik%> solid;" cellpadding="0" cellspacing="1" width="100%" bgcolor="<%=altrenk%>">
<tr><td background="images/bg_image.gif" align="center"><font face="verdana" color="<%=basyazi%>"><b><u>MP3</u></b></font></td></tr>
<tr><td align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" align="center" >
<tr>
<td align="right" width="95%" ><br>
<form action="arama.asp" method="get" name="form">
<input name="aranan" type="text" size="20" value="MP3 Ara" onFocus="this.value=''">
<input name="tur" type="hidden" value="1" >
<input type="submit" name="submit" value="ARA"></form>
</td>
</tr>
</table></td></tr>
<tr><td align="center">
<!------------------------------------------------------------------------------------------->
<% if gitbakem = "1" then %>
<font><b>Hoþgeldin Sahip</b></font><br><br><br>
<a href="indexadmin.asp"><img src="artwork/bgitbakem_calis.gif" border="1"></a><br><br><br>
<!--Beklet-->
<% elseif gitbakem = "onaylama" then %>
<%
id =request.querystring("id")
onay =request.querystring("onay")
set mp = server.createobject("adodb.recordset")
sql = "select * from mp3 where id="&id
mp.open sql, conn, 1, 3
mp("onay") = onay
mp.update
response.redirect request.servervariables("http_referer")
%>
<!--Beklet_Sonu-->
<!--Sýfýrla-->
<% elseif gitbakem = "sifir" then %>
<%
set mp = server.createobject("adodb.recordset")
sql = "select * from mp3"
mp.open sql, conn, 1, 3
i=1
do while not mp.eof
mp("hit") = 0
mp.update burası 59'cu satır
mp.movenext
loop
response.write ("sýfýrlandý")
%>
<!--Sýfýrla_Sonu-->
<!--Kategori_Ekleme-->
<% elseif gitbakem = "kate" then %>
<font><b>Kategori Ekle</b></font>
<form action="admin.asp?gitbakem=kate2" method="post">
<table border="0">
<tr>
<td align="right"><font><b>Kategori Adý </b></font></td>
<td><input type="text" size="30" name="kategori_adi"></td>
</tr>
<tr>
<td align="right"> </td>
<td><input type="submit" value="Ekle Bakim" name="submit"></td>
</tr>
</table>
</form>
<!--Kategori_Ekleme_Sonu-->
<!--Kategori_Ekleme_MDB-->
<% elseif gitbakem = "kate2" then %>
<%
kategori_adi = request.form("kategori_adi")
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat"
kt.open sql, conn, 1, 3
if kategori_adi = "" then
response.write ""& ust &""
response.write "<font><b>Lütfen Kategori Adýný Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
end if
kt.addnew
kt("kategori_adi") = kategori_adi
kt.update
response.write "<font><b>"& kategori_adi &" Kategorisi Eklendi</b></font><br>"
%>
<!--Kategori_Ekleme_MDB_Sonu-->
<!--Kategori_Duzenle_Sil-->
<% elseif gitbakem = "ds" then %>
<font><b>Kategori Düzenle/-/Sil</b></font>
<%
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat"
kt.open sql, conn, 1, 3
toplamkt = kt.recordcount
%>
<table width="95%" cellspacing="1" cellpadding="0" style="border:1 <%=kenarlik%> solid;">
<tr>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">#</font></td>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">Kategori Adý</font></td>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">Mp3</font></td>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">Düzenle</font></td>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">Sil</font></td>
</tr>
<%
i=1
do while not kt.eof
%>
<!--#include file="renk.asp"-->
<%
kategori_id = kt("id")
set mp = server.createobject("adodb.recordset")
sql = "select * from mp3 where kategori_id="& kategori_id
mp.open sql, conn, 1, 3
toplamp3 = mp.recordcount
%>
<tr bgcolor="<%=bgcolor%>" onMouseOver="<%=onmouse%>" onMouseOut="bgColor='<%=bgcolor%>'">
<td align="center"><font><%=i%></font></td>
<td align="center"><font><%=kt("kategori_adi")%></font></a></td>
<td align="center"><font><%=toplamp3%></font></td>
<td align="center"><a href="admin.asp?gitbakem=ktd&id=<%=kt("id")%>">Düzenle</a></td>
<td align="center"><a href="admin.asp?gitbakem=kts&id=<%=kt("id")%>">Sil</a></td>
</tr>
<%
kt.movenext
i=i+1
if mode=1 then
mode=2
else
mode=1
end if
loop
%>
</table>
<font size="1" face="Verdana" color="#5273AD"><b>Toplam Kategori: </b><%=toplamkt%></font>
<!--Kategori_Duzenle_Sil_Sonu-->
<!--Kategori_Duzenle-->
<% elseif gitbakem = "ktd" then %>
<%
kategori_id = request.querystring("id")
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat where id="& kategori_id
kt.open sql, conn, 1, 3
%>
<font size="2" face="Verdana" color="#5273AD"><b>Kategori Düzenle</b></font>
<form action="admin.asp?gitbakem=ktd2" method="post">
<table border="0">
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Kategori Adý </b></font></td>
<td><input type="text" size="30" value="<%=kt("kategori_adi")%>" name="kategori_adi" style="color : #F2D400; background : #5273AD; border-top : 1px solid; border-bottom : 1px solid; border-left : 1px solid; border-right : 1px solid; font-family : Verdana,tahoma,Arial; font-size : 10px; border: 1 dashed #545454"></td>
</tr>
<tr>
<td align="right"><input type="hidden" value="<%=kt("id")%>" name="id"></td>
<td><input type="submit" value="Düzenle Bakim" name="submit" style="color : #7d7d7d; background : #F2D400; border-top : 1px solid; border-bottom : 1px solid; border-left : 1px solid; border-right : 1px solid; font-family : Verdana,tahoma,Arial; font-size : 10px; border: 1 dashed #545454"></td>
</tr>
</table>
</form>
<!--Kategori_Duzenle_Sonu-->
<!--Kategori_Duzenle_MDB-->
<% elseif gitbakem = "ktd2" then %>
<%
kategori_adi = request.form("kategori_adi")
kategori_id = request.form("id")
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat where id="& kategori_id
kt.open sql, conn, 1, 3
if kategori_adi = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Kategori Adýný Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
end if
kt("kategori_adi") = kategori_adi
kt.update
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Deðiþiklikler Kaydedildi</b></font><br>"
%>
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access Driver] Cannot update. Database or object is read-only.
/3/admin.asp, line 59
admin.asp.
<!--#include file="parola.asp"-->
<!--#include file="ustmenu.asp"-->
<table width="100%">
<tr>
<!--#include file="database.asp"-->
<% Response.Buffer = true %>
<% gitbakem = request.querystring("gitbakem") %>
<td valign="top" width="18%">
<table border="0" cellpadding="0" width="100%" bordercolordark="#ffffff"><tr><td>
<table style="border:1 <%=kenarlik%> solid;" cellpadding="0" cellspacing="1" width="100%" bgcolor="<%=altrenk%>">
<tr><td background="images/bg_image.gif" align="center"><font face="verdana" color="<%=basyazi%>">Admin Bölümü</font></td></tr>
<tr><td><img src="images/ok.gif"><a href="admin.asp?gitbakem=mpe"><font color="<%=yaziiki%>"><b> Mp3 Ekle</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="indexadmin.asp"><font color="<%=yaziiki%>"><b> Mp3 Düzenle</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="admin.asp?gitbakem=kate"><font color="<%=yaziiki%>"><b> Kategori Ekle</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="admin.asp?gitbakem=ds"><font color="<%=yaziiki%>"><b> Kategori Düzenle</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="admin.asp?gitbakem=istek"><font color="<%=yaziiki%>"><b> Ýstekler</b></font></A></td></tr>
<tr><td><img src="images/ok.gif"><a href="default.asp"><font color="<%=yaziiki%>"><b> Çýkýþ</b></font></A></td></tr>
</table></td></tr></table>
</td>
<td valign="top">
<table border="0" cellpadding="0" width="100%" bordercolordark="#ffffff"><tr><td>
<table style="border:1 <%=kenarlik%> solid;" cellpadding="0" cellspacing="1" width="100%" bgcolor="<%=altrenk%>">
<tr><td background="images/bg_image.gif" align="center"><font face="verdana" color="<%=basyazi%>"><b><u>MP3</u></b></font></td></tr>
<tr><td align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" align="center" >
<tr>
<td align="right" width="95%" ><br>
<form action="arama.asp" method="get" name="form">
<input name="aranan" type="text" size="20" value="MP3 Ara" onFocus="this.value=''">
<input name="tur" type="hidden" value="1" >
<input type="submit" name="submit" value="ARA"></form>
</td>
</tr>
</table></td></tr>
<tr><td align="center">
<!------------------------------------------------------------------------------------------->
<% if gitbakem = "1" then %>
<font><b>Hoþgeldin Sahip</b></font><br><br><br>
<a href="indexadmin.asp"><img src="artwork/bgitbakem_calis.gif" border="1"></a><br><br><br>
<!--Beklet-->
<% elseif gitbakem = "onaylama" then %>
<%
id =request.querystring("id")
onay =request.querystring("onay")
set mp = server.createobject("adodb.recordset")
sql = "select * from mp3 where id="&id
mp.open sql, conn, 1, 3
mp("onay") = onay
mp.update
response.redirect request.servervariables("http_referer")
%>
<!--Beklet_Sonu-->
<!--Sýfýrla-->
<% elseif gitbakem = "sifir" then %>
<%
set mp = server.createobject("adodb.recordset")
sql = "select * from mp3"
mp.open sql, conn, 1, 3
i=1
do while not mp.eof
mp("hit") = 0
mp.update burası 59'cu satır
mp.movenext
loop
response.write ("sýfýrlandý")
%>
<!--Sýfýrla_Sonu-->
<!--Kategori_Ekleme-->
<% elseif gitbakem = "kate" then %>
<font><b>Kategori Ekle</b></font>
<form action="admin.asp?gitbakem=kate2" method="post">
<table border="0">
<tr>
<td align="right"><font><b>Kategori Adý </b></font></td>
<td><input type="text" size="30" name="kategori_adi"></td>
</tr>
<tr>
<td align="right"> </td>
<td><input type="submit" value="Ekle Bakim" name="submit"></td>
</tr>
</table>
</form>
<!--Kategori_Ekleme_Sonu-->
<!--Kategori_Ekleme_MDB-->
<% elseif gitbakem = "kate2" then %>
<%
kategori_adi = request.form("kategori_adi")
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat"
kt.open sql, conn, 1, 3
if kategori_adi = "" then
response.write ""& ust &""
response.write "<font><b>Lütfen Kategori Adýný Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
end if
kt.addnew
kt("kategori_adi") = kategori_adi
kt.update
response.write "<font><b>"& kategori_adi &" Kategorisi Eklendi</b></font><br>"
%>
<!--Kategori_Ekleme_MDB_Sonu-->
<!--Kategori_Duzenle_Sil-->
<% elseif gitbakem = "ds" then %>
<font><b>Kategori Düzenle/-/Sil</b></font>
<%
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat"
kt.open sql, conn, 1, 3
toplamkt = kt.recordcount
%>
<table width="95%" cellspacing="1" cellpadding="0" style="border:1 <%=kenarlik%> solid;">
<tr>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">#</font></td>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">Kategori Adý</font></td>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">Mp3</font></td>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">Düzenle</font></td>
<td background="images/bg_image.gif" align="center"><font color="<%=basyazi%>">Sil</font></td>
</tr>
<%
i=1
do while not kt.eof
%>
<!--#include file="renk.asp"-->
<%
kategori_id = kt("id")
set mp = server.createobject("adodb.recordset")
sql = "select * from mp3 where kategori_id="& kategori_id
mp.open sql, conn, 1, 3
toplamp3 = mp.recordcount
%>
<tr bgcolor="<%=bgcolor%>" onMouseOver="<%=onmouse%>" onMouseOut="bgColor='<%=bgcolor%>'">
<td align="center"><font><%=i%></font></td>
<td align="center"><font><%=kt("kategori_adi")%></font></a></td>
<td align="center"><font><%=toplamp3%></font></td>
<td align="center"><a href="admin.asp?gitbakem=ktd&id=<%=kt("id")%>">Düzenle</a></td>
<td align="center"><a href="admin.asp?gitbakem=kts&id=<%=kt("id")%>">Sil</a></td>
</tr>
<%
kt.movenext
i=i+1
if mode=1 then
mode=2
else
mode=1
end if
loop
%>
</table>
<font size="1" face="Verdana" color="#5273AD"><b>Toplam Kategori: </b><%=toplamkt%></font>
<!--Kategori_Duzenle_Sil_Sonu-->
<!--Kategori_Duzenle-->
<% elseif gitbakem = "ktd" then %>
<%
kategori_id = request.querystring("id")
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat where id="& kategori_id
kt.open sql, conn, 1, 3
%>
<font size="2" face="Verdana" color="#5273AD"><b>Kategori Düzenle</b></font>
<form action="admin.asp?gitbakem=ktd2" method="post">
<table border="0">
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Kategori Adý </b></font></td>
<td><input type="text" size="30" value="<%=kt("kategori_adi")%>" name="kategori_adi" style="color : #F2D400; background : #5273AD; border-top : 1px solid; border-bottom : 1px solid; border-left : 1px solid; border-right : 1px solid; font-family : Verdana,tahoma,Arial; font-size : 10px; border: 1 dashed #545454"></td>
</tr>
<tr>
<td align="right"><input type="hidden" value="<%=kt("id")%>" name="id"></td>
<td><input type="submit" value="Düzenle Bakim" name="submit" style="color : #7d7d7d; background : #F2D400; border-top : 1px solid; border-bottom : 1px solid; border-left : 1px solid; border-right : 1px solid; font-family : Verdana,tahoma,Arial; font-size : 10px; border: 1 dashed #545454"></td>
</tr>
</table>
</form>
<!--Kategori_Duzenle_Sonu-->
<!--Kategori_Duzenle_MDB-->
<% elseif gitbakem = "ktd2" then %>
<%
kategori_adi = request.form("kategori_adi")
kategori_id = request.form("id")
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat where id="& kategori_id
kt.open sql, conn, 1, 3
if kategori_adi = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Kategori Adýný Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
end if
kt("kategori_adi") = kategori_adi
kt.update
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Deðiþiklikler Kaydedildi</b></font><br>"
%>