Asp- Toplu Onay verme işlemi ve toplu silme işlemi

[turkmn]

MErhabalar,

Daha önce toplu silme işlemi için kullandığım kodlar çalışıyordu fakat bu kez sadece en baştaki veriyi siliyor sil dediğimde. Toplu onay verme veya sutünlardan birini güncelleme olayını çalıştıramadım zaten henüz.



Toplu silme işlemimizde kodlar şöyle ;

Liste.asp sayfası :
<%
Set rs = Server.CreateObjecT("ADODB.RecordSet")
rSQL = "Select * FROM tbl "
rs.open rSQL,baglan,3,3

Do while Not rs.Eof
%>

<form name="form1" method="POST" action="sil.asp?id=<%=rs("id")%>" >

<input value="<%=rs("id")%>" type="checkbox">

<%=rs("konu")%>


<%
rs.MoveNext
Loop
%>


sil.asp sayfası :

<%
Set ObjCon_ilet = Server.CreateObject("ADODB.Connection")
ObjCon_ilet.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb")

id = Request("id")
Set rec= Server.CreateObject("ADODB.RecordSet")
RSQL_delete = "DELETE from tbl WHERE id="&id&""
rec.open RSQL_delete,ObjCon_ilet,1,3

Response.Redirect Request.serverVariables("HTTP_REFERER")
%>




kodların sıralanışında bir hata mı var acaba sadece en baştakini siliyor topluca sileceği yerine.

Eskiden çalışıyordu bu kod sonra sayfayla oynadık şimdi sadece en baştakini siliyor nedenini çözemedim kodları nasıl hizalamalıyız arkadaşlar?

[turkmn]

Toplu Silme onayını şu kodlarla çözdüm ;



<%
DB="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("db.mdb")
%>

<%


Set Baglanti = Server.CreateObject ("ADODB.Connection" )
Set rsTopluSil = Server.CreateObject ("ADODB.Recordset" )
Baglanti.Open DB



For i=1 To Request.Form("c1" ).Count


strSQL = "DELETE FROM tbl WHERE id = " & Request.Form("c1" )(i) &";"
Set rsTopluSil = Baglanti.Execute(strSQL)

Next
response.Redirect("sayfa.asp")
%>




Fakat toplu güncelleme olayına çözüm getiremedim henüz var mı arkadaşlar bu konuda bilgisi olan ? Yardım lazım Aynı kodlar üzerinde update denemesi yapıcam bakalım sonuç ne olucak? Bilen arkadaşlardan da bilgi rica ediyoruz .

İyi Çalışmalar