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
%>
