<%
delete=request.Form("delete")
sql="delete from t53 where AudienceID in (" & delete & ");"
'sql="delete from form1 where id='"+request("id")+"';"
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=test2553;UID=root;PWD=;OPTION=3"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql,conn,1,3
response.redirect("listall2.asp")
%>