Autor:Bernhard Elbl

DATAGRID Teil 4 - Delete

Jetzt fügen wir noch eine DELETE-Funktion ins Datagrid ein. Ziel: rechts neben den Recordsets soll, ein Löschen-Button platziert werden. Dieser löscht das davorstehende Recordset.

Ich erweitere die Seite "datagrid.asp" mit einen löschen Button "x"

datagrid.asp

...
' --- in der DO LOOP füge diese Zeile ein. hier wird für jedes Recordset
' --- ein Button erzeugt. jeder Button linkt auf die Seite "datadelete.asp
' --- zusätzlich wird jedem Button die ID des davorstehenden Recordsets
' --- übergeben(z.B. href='datadelete.asp?id=2)
Response.Write "<td width=10><INPUT type=button value=X language=javascript onclick=location.href='datadelete.asp?id=" & rs.Fields("customerid") & "' id=btnDelete name=btnDelete></td></tr>"

Dazu erzeuge ich eine neue ASP-Datei "datadelete.asp".
Der Code für diese Seite ist sehr klein.(hier komplett abgebildet)

datadelete.asp

<%@ Language=VBScript %>
<%
'------------ Connection-Objekt instanziieren
set conn = server.CreateObject("ADODB.Connection")

'------------ öffnen der Connection des Recordsets
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=" _
& Server.MapPath("./db/") & "\dbcustomer.mdb;"

'------------ Löschen des gewählten Recordset mit DELETE FROM
strSQL = "DELETE FROM Customers where CustomerID = " & Request.QueryString("ID")
conn.Execute strSQL

'------------ Objekt zerstören
set conn = nothing

Response.Redirect "datagrid.asp"
%>

Den Kompletten Code für das Projekt(Datagrid 1-4) mit Datenbank und Email-Formular finden ihr unten zum Download

Diskutieren Sie in den Foren