<%
id = Request.QueryString("id")
SQL_Consulta = "SELECT * FROM datos where id="&id
Set Consulta = fp_db.Execute(SQL_Consulta)
if not Consulta.eof then
identificador=consulta.Fields.Item("identificador")
end if
SQL_deldata = "DELETE FROM datos WHERE id = "& id &""
Set deldata = fp_db.Execute(SQL_deldata)
SQL_deldata = "DELETE FROM fotos WHERE identificador = '"& identificador &"'"
Set deldata = fp_db.Execute(SQL_deldata)
response.redirect "controlpanel.asp"
%>