Hola, foro:
Veréis, acabo de terminar un formulario que, una vez le das a "Aceptar", pasa a la última página y graba los datos. Hasta aquí todo bien.
Pero me he dado cuenta que retrocediendo al formulario y dándole otra vez a "Aceptar" se graba otra vez el registro. ¿Cómo se puede evitar esto? ¿Hay alguna forma de invalidar el botón de "Atrás" del navegados una vez ha pasado a la útlima página?
El código que tengo en la última página es éste:
<%
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConString
set rsOrder = Server.CreateObject("ADODB.Recordset")
rsOrder.Open "SELECT * FROM peticiones ",Conn, adOpenStatic, adLockOptimistic, adCmdText
if rsOrder.EOF then
Response.Write "Existe un problema con su petición. "
Response.Write "------------ERROR-------------------"
else
'----- AÑADIMOS UN REGISTRO Y GRABAMOS LOS DATOS-----
rsOrder.Addnew
numero=rsorder.Fields.Item("id")
rsOrder("orderID")= numero
rsOrder("Nombre") = Request.form("Nombre")
rsOrder("Apellidos") = Request.form("Apellidos")
rsOrder.Update
clave=rsOrder.Fields.Item("id")
%>
'----- MOSTRAMOS EL ENLACE DEL ARCHIVO PDF CON LA CLAVE CREADA----
<meta name="GENERATOR" Content="Microsoft Visual Studio 6.0">
<title></title>
<style type="text/css">
<!--
a:link { color: #808080 }
a:visited { color: #808080 }
a:hover { color: #ff9900 }
-->
</style>
<basefont face="Verdana" size="2">
</td>
</tr>
</table>
<hr color="#003333" size="1" noshade>
<table border="0" bgcolor="#FFFFFF" cellpadding="0" cellspacing="0" width="793">
<tr>
<td width="1" valign="top" align="center" height="192">
<td width="1" bgcolor="#003333" height="192">
<img src="images/spacer.gif" width="1" height="1" alt border="0"></td>
<td width="791" height="192" align="center" valign="middle" background="Generar modelo 046">
<table border="0" cellspacing="4" cellpadding="4" width="714">
<tr>
<td height="36" align="center" valign="top" bgcolor="#FFFFFF" class="listname Estilo20">
<p><span style="font-weight: 400"><font face="Arial"><span class="normaltext Estilo17">
<font color="#000000" style="font-size: 11px">Su
petición se ha procesado correctamente. </font></span></font></span>
<font face="Arial">
<span class="normaltext Estilo17"><font color="#000000">
<span style="font-weight: 400; font-size: 11px">También puede, si lo
desea, imprimir justificante de los datos transmitidos.</span></font></span></p>
</td>
</tr>
<tr>
<td height="27" align="center" valign="top" bgcolor="#FFFFFF" class="normaltext">
<table border="0" width="79%" id="table4">
<tr>
<td width="49%">
<p align="center">
</td>
<td width="47%">
<p align="center">
<font face="Arial">
</tr>
<tr>
<td width="49%">
<p align="center">
<font face="Arial">
<a href="#null" onClick="newWindow('http://XXXXXXX/XXX/XX/pdf/justif/<%=(rsorder.Fields.Item("orderID").Value)%>.pdf',' ','650','250','resizable,scrollbars,nomenubar, nostatus, notoolbar')"><img src="images/datos_transmitidos.png" alt="Generar 046" width="145" height="55" border="0"></a></td>
<td width="47%">
<p align="center">
<font face="Arial">
<a href="#null" onClick="newWindow('http://XXXXXXXX/XXX/XXXXX/pdf/<%=(rsorder.Fields.Item("orderID").Value)%>.pdf',' ','650','250','resizable,scrollbars,nomenubar, nostatus, notoolbar')"><img src="images/modelo_046.png" alt="Generar 046" width="145" height="55" border="0"></a></td>
</tr>
<tr>
<td colspan="2">
<p align="center"><a href="default.asp">
<img border="0" src="images/button_terminar.jpg" width="89" height="33"></a></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="53" align="center" valign="top" bgcolor="#FFFFFF" class="normaltext">
</td>
</tr>
</table>
<p><span class="listname"><b><font face="Arial" size="4"></font></b></span><b><font face="Arial" size="4" class="detaillabels">Gracias por su colaboración</font></b>
</p>
<hr color="#003333" size="1" noshade></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="6" width="100%">
<tr>
<td colspan="3" valign="BOTTOM">
<table border="0" cellpadding="0" cellspacing="6" width="100%" id="table3">
<tr>
<td valign="top" height="59">
<div align="center">
<pre> </pre>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html><%
%>
'----- CERRAMOS LA BASE DE DATOS-----
<%
rsorder.Close
set rsorder = Nothing
Conn.Close
set Conn = Nothing
%>
¿Alguna idea?
Saludos y gracias