Menace
Legacy Member
Code van vorige pagina
Hierboven ziet kunt u dus de code zien van vorige pagina maar nu wil ik de geselecteerde verwijderen. Dit is mijn code:
Ik krijg geen foutmelding maar er wordt gewoon niets verwijderd.
Kan er iemand helpen?
Hierboven ziet kunt u dus de code zien van vorige pagina maar nu wil ik de geselecteerde verwijderen. Dit is mijn code:
Code:
<%
Dim cnnDB
dim strConnstring
dim rstLogin
dim strRequest
strConnstring= "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("shvinkt.mdb")
set cnnDB = Server.CreateObject("ADODB.Connection")
cnnDB.open strConnstring
for x = 1 to request.form("id_total")
strRequest=request.form("id")
if request.form("chkCheck" & x) then
Set rstLogin = cnnDB.Execute ("Delete * FROM tblGebruikers where '"& strRequest &"'=ID")
end if
next
response.redirect("loginlijstedit.asp")
cnnDB.Close
%>
Ik krijg geen foutmelding maar er wordt gewoon niets verwijderd.
Kan er iemand helpen?
