<% option explicit Response.Buffer = true if session("company_id") <> "" then dim conn dim ssql dim sOrder_Id dim return_page %> <% sOrder_Id = trim(Request.QueryString("system_order_id")) ssql = "delete from tbl_order where system_order_id = '" & sOrder_Id & "'" conn.execute ssql conn.Close set conn = nothing return_page = "" Response.Write return_page else Response.Redirect "../../index.asp" end if %>