İyinet'e Hoşgeldiniz!

Türkiye'nin En Eski Webmaster Forum'una Hemen Kayıt Olun!

Kayıt Ol!

/3/admin.asp, line 59 yardım ???

SpYTaZz

0
İyinet Üyesi
Katılım
13 Eylül 2004
Mesajlar
271
Reaction score
0
Konum
TÜRKİYE/İstanbul/Kad
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>"
%>
 

SpYTaZz

0
İyinet Üyesi
Katılım
13 Eylül 2004
Mesajlar
271
Reaction score
0
Konum
TÜRKİYE/İstanbul/Kad
<!--Kategori_Duzzenle_MB_Sonu-->

<!--Kategori_Sil-->
<% elseif gitbakem = "kts" then %>
<%
id = request.querystring("id")
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat where id="& id
kt.open sql, conn, 1, 3

set mp = server.createobject("adodb.recordset")
sql = "select * from mp3 where kategori_id="& id
mp.open sql, conn, 1, 3
toplamp3 = mp.recordcount
%>
<font size="2" face="Verdana" color="#5273AD"><b>'<%=kt("kategori_adi")%>' Kategorisini ve Bu Kategoride Bulunan '<%=toplamp3%>' Tane Mp3'ü Silmek Ýstediðinize Emin misiniz ¿</b></font><br>
<font size="2" face="Verdana" color="#5273AD"><b>| </b><a href="admin.asp?gitbakem=kts2&id=<%=kt("id")%>">Evet</a><b> | </b><a href="javascript:history.back()">Hayýr</a><b> |</b></font>
<!--Kategori_Sil_Sonu-->

<!--Kategori_Sil_MDB-->
<% elseif gitbakem = "kts2" then %>
<%
id = request.querystring("id")
set kt = server.createobject("adodb.recordset")
sql = "select * from mp3cat where id="& id
kt.open sql, conn, 1, 3
kategori_adi = kt("kategori_adi")
kt.delete
set mp = server.createobject("adodb.recordset")
sql = "delete from mp3 where kategori_id="& id
mp.open sql, conn, 1, 3

response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>"& kategori_adi &" ve Bu Kategoride Bulunan Tüm Mp3 ler Silindi!</b></font><br>"
%>
<!--Kategori_Sil_MDB_Sonu-->

<!--Mp3_Ekle-->
<% elseif gitbakem = "mpe" then %>
<font size="2" face="Verdana" color="#5273AD"><b>Mp3 Ekle</b></font>
<%
set mp = server.createobject("adodb.recordset")
sql = "select * from mp3cat"
mp.open sql, conn, 1, 3
%>
<form action="admin.asp?gitbakem=mpe2" method="post">
<table border="0">
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Sanatçý Adý: </b></font></td>
<td><input type="text" size="30" name="sanatci" style="border: 1 dashed <%=renkfour%>"></td>
</tr>
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Baþ Harfi: </b></font></td>
<td><input type="text" size="30" name="bas_harf" style="border: 1 dashed <%=renkfour%>"></td>
</tr>
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Albüm Adý: </b></font></td>
<td><input type="text" size="30" name="album" style="border: 1 dashed <%=renkfour%>"></td>
</tr>
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Þarký Adý: </b></font></td>
<td><input type="text" size="30" name="mp3_adi" style="border: 1 dashed <%=renkfour%>"></td>
</tr>
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Mp3 Adresi: </b></font></td>
<td><input type="text" size="30" name="url" style="border: 1 dashed <%=renkfour%>"></td>
</tr>
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Boyutu: </b></font></td>
<td><input type="text" size="30" name="boyut" style="border: 1 dashed <%=renkfour%>"></td>
</tr>
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Zip Þifre: (<font size="1">Yoksa Boþ Býrakýn</font>)</b></font></td>
<td><input type="text" size="30" name="sifre" style="border: 1 dashed <%=renkfour%>"></td>
</tr>
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Kategori: </b></font></td>
<td>
<select name="kategori_id" size="1" style="border: 1 dashed <%=renkfour%>">
<%
DO WHILE NOT mp.EOF
%>
<option value="<%=mp("id")%>"><%=mp("kategori_adi")%></option>
<%
mp.MoveNext
LOOP
%>
</select>
</td>
</tr>
<tr>
<td align="right"> </td>
<td><input type="submit" value="Ekle" name="submit" style="border: 1 dashed <%=renkfour%>"></td>
</tr>
</table>
</form>
<!--Mp3_Ekle_Sonu-->

<!--Mp3_Ekle_MDB-->
<% elseif gitbakem = "mpe2" then %>
<%
sanatci = request.form("sanatci")
bas_harf = request.form("bas_harf")
album = request.form("album")
mp3_adi = request.form("mp3_adi")
url = request.form("url")
boyut = request.form("boyut")
sifre = request.form("sifre")
kategori_id = request.form("kategori_id")

if sifre = "" then
sifre = " "
end if

if sanatci = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Sanatçý Adýný Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
elseif bas_harf = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Sanatçýnýn Baþ Harfini Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
elseif mp3_adi = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Þarký Adýný Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
elseif url = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Mp3 Adresini Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
end if

set mp = server.createobject("adodb.recordset")
sql = "select * from mp3"
mp.open sql, conn, 1, 3
mp.addnew
mp("sanatci") = sanatci
mp("bas_harf") = bas_harf
mp("album") = album
mp("mp3_adi") = mp3_adi
mp("url") = url
mp("boyut") = boyut
mp("sifre") = sifre
mp("kategori_id") = kategori_id
mp("bas_harf") = bas_harf
mp("sifre") = sifre
mp("onay") = true
mp.update

response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>"& sanatci &" - "& mp3_adi &" Eklendi!</b></font><br>"
%>
<!--Mp3_Ekle_MDB_Sonu-->


<!--Mp3_Sil-->
<% elseif gitbakem = "silm" then %>
<%
id =request.querystring("id")
set mp = server.createobject("adodb.recordset")
sql = "select * from mp3 where id="& id
mp.open sql, conn, 1, 3
sanatci = mp("sanatci")
mp3_adi = mp("mp3_adi")
mp.delete
response.write"<font size=""2"" face=""Verdana"" color=""#5273AD""><b>"& sanatci &" - "& mp3_adi &" Silindi!</b></font><br>"
%>
<!--Mp3_Sil_Sonu-->
 

SpYTaZz

0
İyinet Üyesi
Katılım
13 Eylül 2004
Mesajlar
271
Reaction score
0
Konum
TÜRKİYE/İstanbul/Kad
<!--Mp3_Duzenle-->
<% elseif gitbakem = "duzm" then %>
<font size="2" face="Verdana" color="#5273AD"><b>Mp3 Düzenle</b></font>
<%
id = request.querystring("id")
set mp = server.createobject("adodb.recordset")
sql = "select * from mp3cat"
mp.open sql, conn, 1, 3

set rs = server.createobject("adodb.recordset")
sql = "select * from mp3 where id="& id
rs.open sql, conn, 1, 3
kategori_id = rs("kategori_id")

%>
<form action="admin.asp?gitbakem=duzm2" method="post">
<table border="0">
<tr>
<td align="right"><font size="2" face="Verdana" color="#5273AD"><b>Sanatçý Adý: </b></font></td>
<td><input type="text" size="30" value="<%=rs("sanatci")%>" name="sanatci" 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"><font size="2" face="Verdana" color="#5273AD"><b>Baþ Harfi: </b></font></td>
<td><input type="text" size="30" value="<%=rs("bas_harf")%>" name="bas_harf" 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"><font size="2" face="Verdana" color="#5273AD"><b>Albüm Adý: </b></font></td>
<td><input type="text" size="30" value="<%=rs("album")%>" name="album" 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"><font size="2" face="Verdana" color="#5273AD"><b>Þarký Adý: </b></font></td>
<td><input type="text" size="30" value="<%=rs("mp3_adi")%>" name="mp3_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"><font size="2" face="Verdana" color="#5273AD"><b>Mp3 Adresi: </b></font></td>
<td><input type="text" size="30" value="<%=rs("url")%>" name="url" 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"><font size="2" face="Verdana" color="#5273AD"><b>Boyutu: </b></font></td>
<td><input type="text" size="30" value="<%=rs("boyut")%>" name="boyut" 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"><font size="2" face="Verdana" color="#5273AD"><b>Zip Þifre: (<font size="1">Yoksa Boþ Býrakýn</font>)</b></font></td>
<td><input type="text" size="30" value="<%=rs("sifre")%>" name="sifre" 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"><font size="2" face="Verdana" color="#5273AD"><b>Kategori: </b></font></td>
<td>
<select name="kategori_id" size="1" 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">
<%
DO WHILE NOT mp.EOF
%>
<option value="<%=mp("id")%>"><%=mp("kategori_adi")%></option>
<%
mp.MoveNext
LOOP
%>
</select>
</td>
</tr>
<tr>
<td align="right"><input type="hidden" value="<%=rs("id")%>" name="id"></td>
<td><input type="submit" value="Düzenle" 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>
<!--Mp3_Duzenle_Sonu-->

<!--Mp3_Duzenle_MDB-->
<% elseif gitbakem = "duzm2" then %>
<%
id = request.form("id")
sanatci = request.form("sanatci")
bas_harf = request.form("bas_harf")
album = request.form("album")
mp3_adi = request.form("mp3_adi")
url = request.form("url")
boyut = request.form("boyut")
sifre = request.form("sifre")
kategori_id = request.form("kategori_id")
if sifre = "" then
sifre = " "
end if

if sanatci = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Sanatçý Adýný Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
elseif bas_harf = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Sanatçýnýn Baþ Harfini Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
elseif mp3_adi = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Þarký Adýný Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
elseif url = "" then
response.write ""& ust &""
response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>Lütfen Mp3 Adresini Yazýnýz!</b></font><br>"
response.write ""& alt &""
response.end
end if

set mp = server.createobject("adodb.recordset")
sql = "select * from mp3 where id="& id
mp.open sql, conn, 1, 3

mp("sanatci") = sanatci
mp("bas_harf") = bas_harf
mp("album") = album
mp("mp3_adi") = mp3_adi
mp("url") = url
mp("boyut") = boyut
mp("sifre") = sifre
mp("kategori_id") = kategori_id
mp("bas_harf") = bas_harf
mp("sifre") = sifre
mp("onay") = true
mp.update

response.write "<font size=""2"" face=""Verdana"" color=""#5273AD""><b>"& sanatci &" - "& mp3_adi &" Üzerindeki Deðiþiklikler Kaydedildi!</b></font><br>"
%>

<!--Mp3_Duzenle_MDB_Sonu-->

<!--Istekler-->
<% elseif gitbakem = "istek" then %>
<font size="2" face="Verdana" color="#5273AD"><b>Ýstekler</b></font>
<%
set yks = server.createobject("adodb.recordset")
sql = "select * from istek order by tarih desc"
yks.open sql, conn, 1, 3
%>
<table width="95%" cellspacing="0" cellpadding="0">
<tr bgcolor>
<td align="center" background="images/bg_image.gif"><font color="<%=basyazi%>">#</font></td>
<td align="center" background="images/bg_image.gif"><font color="<%=basyazi%>">Sanatçý</font></td>
<td align="center" background="images/bg_image.gif"><font color="<%=basyazi%>">Þarký</font></td>
<td align="center" background="images/bg_image.gif"><font color="<%=basyazi%>">E-mail</font></td>
<td align="center" background="images/bg_image.gif"><font color="<%=basyazi%>">Tarih</font></td>
<td align="center" background="images/bg_image.gif"><font color="<%=basyazi%>">Sil</font></td>
</tr>
<%
i=1
do while not yks.eof
%>
<!--#include file="renk.asp"-->
<tr bgcolor="<%=bgcolor%>" onMouseOver="<%=onmouse%>" onMouseOut="bgColor='<%=bgcolor%>'">
<td align="center" style="border-left: 1px solid #535353; border-right: 1px solid #535353; border-bottom: 1px solid #535353;"><font size="1" face="Verdana"><b><%=i%></b></font></td>
<td align="center" style="border-bottom: 1px solid #535353; border-right: 1px solid #535353;"><font size="1" face="Verdana"><b><%=yks("sanatci")%></b></font></a></td>
<td align="center" style="border-bottom: 1px solid #535353; border-right: 1px solid #535353;"><font size="1" face="Verdana"><b><%=yks("mp3_adi")%></b></font></a></td>
<td align="center" style="border-bottom: 1px solid #535353; border-right: 1px solid #535353;"><font size="1" face="Verdana"><b><%=yks("email")%></b></font></a></td>
<td align="center" style="border-bottom: 1px solid #535353;"><font size="1" face="Verdana"><b><%=yks("tarih")%></b></font></td>
<td align="center" style="border-left: 1px solid #535353; border-right: 1px solid #535353; border-bottom: 1px solid #535353;"><a href="admin.asp?gitbakem=isteksil&id=<%=yks("id")%>"><font color="<%=fontcolor%>" size="1" face="Verdana"><b>Sil</b></font></a></td>
</tr>
<%
yks.movenext
i=i+1
if mode=1 then
mode=2
else
mode=1
end if
loop
%>
</table>
<!--Istekler_Sonu-->

<!--Istek_Sil-->
<% elseif gitbakem = "isteksil" then %>
<%
id = request.querystring("id")
set yks = server.createobject("adodb.recordset")
sql = "select * from istek where id="& id
yks.open sql, conn, 1, 3

yks.delete
response.redirect Request.ServerVariables("HTTP_REFERER")
%>
<!--Istek_Sil_Sonu-->
<% end if %>
</td></tr>


</table></td></tr></table></td>
</tr></table>

</BODY>
</HTML>




</td>
</tr>
</table>
 

zokkie

0
İyinet Üyesi
Onaylı Üye
Katılım
8 Şubat 2003
Mesajlar
1,465
Reaction score
0
veritabanın bulunduğu klasör için yazma / uygulama izni vermen ya da verdirmen lazım
 

Türkiye’nin ilk webmaster forum sitesi iyinet.com'da forum üyeleri tarafından yapılan tüm paylaşımlardan; Türk Ceza Kanunu’nun 20. Maddesinin, 5651 Sayılı Kanununun 4. maddesinin 2. fıkrasına göre, paylaşım yapan üyeler sorumludur.

Backlink ve Tanıtım Yazısı için iletişime geçmek için Skype Adresimiz: .cid.1580508955483fe5

Üst