Puh also ich habe jetzt eine Schleife eingefügt... Jedoch funktioniert das trotzdem nicht!
HTML
<%
loe = Request.Form("ID")
str = "Driver={Microsoft Access Driver (*.mdb)};DBQ="
str = str & Server.MapPath("Datenbank/inventar.mdb")
str = str & ";DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5;"
%>
<html>
<head>
<title>Datenbank Löschen</title>
<link rel="STYLESHEET" type="text/css" href="format.css">
</head>
<body>
<%
For Each item In Request.Form("ID")
cstrAL = "DELETE * FROM inventar WHERE ID like '" & loe & "'"
strabfrage = cstrAL
Set conn = CreateObject("ADODB.Connection")
conn.Open str
Set res = CreateObject ("ADODB.Recordset")
res.Open strabfrage, conn
next
response.write "Der markierte Eintrag wurde <font color=green>[b]erfolgreich[/b]</font> aus der Inventardatenbank gelöscht
[url='c_overview.asp><u>Klicke'][/url]"
%>
</body>
</html>
Alles anzeigen
vll. hat noch jemand eine zündente Idee...
Wäre wirklich 1000000000x Dankbar
Viele Grüße
Dave