<% Dim conn Set conn = server.createobject("ADODB.Connection") conn.open MM_conn_login_STRING cid=request.QueryString("cid") sql1="delete from registration_details where customerid="&cid set rst1=conn.execute(sql1) 'rst1.close() 'set rst1=nothing 'conn.close() 'set conn=close() response.Redirect("admin_cp.asp") %>