Mrb Asp De Toplu Kayıt Silmeyi Öğreneceğiz Bu Dersde
<%
Set baglanti=Server.createobject("adodb.connection" )
baglanti.provider="microsoft.jet.oledb.4.0"
baglanti.open Server.Mappath("Database.mdb" )
Set rs=baglanti.execute("select * from mesajlar" )
response.write "<form action=""?islem=sil"" method=""post"">"
do until rs.eof
response.write rs("id" ) & ". "&rs("isim" )& _
"<input type=""checkbox"" name="&rs("id" )&"><br>"
rs.movenext:loop
response.write "<input type=""submit"" value=""Sil""></form>"
if request.querystring("islem" )="sil" and not request.form="" then
gelen=split(request.form,"&" )
say=ubound(gelen )
idler="":for i=0 to say
bolunecek=gelen(i )
id=split(bolunecek,"=" )
if idler="" then
idler="id="&id(0 )
else
idler=idler + " or id=" & id(0 )
end if
next
baglanti.execute("delete from mesajlar where " & idler )
end if
%>