Piano

Gostaria de criar uma caixa de confirmaçao para apagar um registro do BD.

Esse é o codigo em ASP

<% 
Dim sql, ano
ano = Year(now)
sql="SELECT * FROM cartas WHERE Data LIKE '%" & ano & "%' ORDER BY codigo DESC"
tabela.open sql,conexao,3,3
SetLocale("pt-br")
while not tabela.eof
  response.Write("<tr>") 
  response.write("<td align=center>" & tabela("Codigo"))
  response.Write("<td>" & tabela("Empresa"))
  response.Write("<td align=center>" & tabela("Receptor"))
  response.Write("<td>" & tabela("Assunto"))
  response.Write("<td align=center>" & tabela("Data"))
  response.Write("<td align=center>" & tabela("Pasta"))
  response.Write("<td>" & tabela("Por"))
  response.Write("<td align=center><a href='editar_cartas.asp?codigo=" & tabela("codigo") &"'><img alt='Editar Registro' border=0 src=..\images\editar.gif></a></td>")
  response.Write("<td align=center><a href='excluir_cartas.asp?codigo=" & tabela("codigo") &"'><img alt='Excluir Registro' border=0 src=..\images\excluir.gif></a></td>")
  tabela.movenext
  response.Write("</tr>") 
wend
%>

Codigo Javascript

<script>
function confirmation() {
	var answer = confirm("Tem certeza que deseja excluir o registro?")
	if (answer){
		window.location = "editar_cartas.asp?codigo=" & tabela("codigo") &"";
	}
	else{
		;
	}
}
</script>

Sei que o código em Javascript não funciona, pois há um codigo em ASP inserido nele.
Como poderia resolver esse problema?

Obrigado.

Ja resolvido, obrigado.

<script>
function confirmSubmit()
{
var agree=confirm("Deseja realmente apagar o registro?");
if (agree)
	return true ;
else
	return false ;
}
</script>

<% 
Dim sql, ano
ano = Year(now)
sql="SELECT * FROM cartas WHERE Data LIKE '%" & ano & "%' ORDER BY codigo DESC"
tabela.open sql,conexao,3,3
SetLocale("pt-br")
while not tabela.eof
  response.Write("<tr>") 
  response.write("<td align=center>" & tabela("Codigo"))
  response.Write("<td>" & tabela("Empresa"))
  response.Write("<td align=center>" & tabela("Receptor"))
  response.Write("<td>" & tabela("Assunto"))
  response.Write("<td align=center>" & tabela("Data"))
  response.Write("<td align=center>" & tabela("Pasta"))
  response.Write("<td>" & tabela("Por"))
  response.Write("<td align=center><a href='editar_cartas.asp?codigo=" & tabela("codigo") &"'><img alt='Editar 

Registro' border=0 src=..\images\editar.gif></a></td>")
  %>
<td align=center><a onclick="return confirmSubmit()" href="excluir_cartas.asp?codigo=<%=tabela("codigo")%>">
<img alt='Excluir Registro' border=0 src=..\images\excluir.gif></a></td>
<%
  tabela.movenext
  response.Write("</tr>") 
wend
%>