<%@ Language=VBScript %> <% Set con = Server.CreateObject("ADODB.Connection") con.Open Application("conAC") strSQL = "DELETE * from veranstaltungen WHERE ID=" & Request.QueryString("ID") con.Execute strSQL con.Close Set con = Nothing Response.Redirect "Default.asp" %>