<!--#include file="app_inc/form.asp" -->
<!--#include file="config.asp" -->
<%
if (session("id_pessoa") <> "") then
	dim fs : set fs=Server.CreateObject("Scripting.FileSystemObject")
	if (fs.FileExists(files&"/"&session("id_pessoa")&"_cracha.jpg") = true) then
		fs.DeleteFile(files&"\"&session("id_pessoa")&"_cracha.jpg") 
	end if
	if (fs.FileExists(files&"/"&session("id_pessoa")&"_cracha.gif") = true) then
		fs.DeleteFile(files&"\"&session("id_pessoa")&"_cracha.gif") 
	end if
 	call form_alert("Exclusão efetuada com sucesso.") : form_script("top.location.href='E_Cracha.asp'")
end if
	
%>