<% option explicit Response.Buffer = true if session("company_id") <> "" then dim conn dim ssql dim sImage dim FileControler dim return_page %> <% sImage = trim(Request.QueryString("company_image")) ssql = "update tbl_company set company_image = '' where company_id = 'default'" conn.execute ssql conn.Close set conn = nothing set FileControler = server.CreateObject("Scripting.FileSystemObject") if FileControler.FileExists(session("images_folder") & "/" & sImage) = true then FileControler.DeleteFile session("images_folder") & "/" & sImage end if set FileControler = nothing Response.Redirect "profile.asp" else Response.Redirect "../../index.asp" end if %>