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