Como hacer mensajes depues de acturalizar?

[jpalbox]

Hola ejecuto la consulta de actualizacion que os muestro en asp, y quiero que salga un mensaje si no se ejecuta correctamente y un otro mensaje si se ejecuta correctamente como lo puedo hacer,

nsocio = Request.Form("nsocio")
usuario = Request.Form("usuario")
password = Request.Form("password")
nombre = Request.Form("nombre")
apellidos = Request.Form("apellidos")

'Abre la conexion con la base de datos a traves de una conexion ODBC
Set con = Server.CreateObject("ADODB.Connection")
'Como vamos a utilizar la variable rs del tipo recordset para recorrer los registros con EOF
Set rs = Server.CreateObject("ADODB.Recordset")
con.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\jpalbox\db\usuarios.mdb&quot ;))


sql = "UPDATE Personal SET password ='" & password & "', usuario='" & usuario & "' WHERE nsocio='" & nsocio &"' and nombre = '" & nombre &"' and apellidos ='" & apellidos &"'"
con.Execute(sql)


'Libera memoria
con.Close
Set con = Nothing
:roto:

[ElAprendiz]

If Err = 0 Then
Response.Write "Actualizacion correcta"
Else
Response.Write "Error en actualizacion."
End If

<center><IMG SRC="http://www.550m.com/usuarios/altolacruz/aprendiz3.gif" ALT="Visitame en AlSurNet.com -- E-Learning E-Commerce Multimedia E-Business--"></center>

[jpalbox]

Aprendiz eso ya lo probe y me dice siempre inserccion correcta aunque no se haya producido la actualizacion. Nose eso pq es ?
Hay q buscar otra opcion :(

[urjose]

Bueno y si no se realiza la actualización que error manda?

<center>
<a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/imagenes/logos/logo.gif></a>
</center>

[jpalbox]

ninguno. Es decir me da se realice o no la actualizacion el mensaje de actualizacion correcta.


He pensado de intentar otra cosa porque llevo detras de esto una semana. He pensao filtrar los datos mediante una sentencia sql previamente pero no se te pongo el codigo a ver si aclaramos algo

'Si el valor EOF (fin de la tabla elegida) es false, existe el usuario.
If rs.EOF = false then
Response.redirect &quot;err03.htm&quot;
else
sql = &quot;SELECT * FROM Personal WHERE nsocio='&quot; &amp; nsocio &amp;&quot;' and nombre = '&quot; &amp; nombre &amp;&quot;' and apellidos ='&quot; &amp; apellidos &amp;&quot;' &quot;
rs.Open sql, con

'no existe un registro con las condiciones que el nsocio sea igual al del form, el nombre=al del fom ni los apellidos
If rs.EOF = true then
Response.Write &quot;Hubo un error&quot;

else
'Ejecuta un sentencia SQL para insertar alta
sql = &quot;UPDATE Personal SET password ='&quot; &amp; password &amp; &quot;', usuario='&quot; &amp; usuario &amp; &quot;' WHERE nsocio='&quot;&amp; nsocio &amp;&quot;' &quot;
con.Execute(sql)
End if

end if
'Libera memoria
con.Close
Set con = Nothing

Esto no funciona, pq utilizar dos veces RS si tiene el mismo valor creo q es el errror no se ........

[urjose]

Si no te actualiza y no te manda error entonces tu UPDATE esta mal...

<center>
<a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/imagenes/logos/logo.gif></a>
</center>

[jpalbox]

La actualizaciones si las realiza cuando tine que realizarlas pq lo he comprobao en los datos de la tabla pero cuando no se cumplen las condiciones del where entonces no realiza la actuallizacion como debe ser pero si me saca el mensaje de actualizacion correcta. :(

[urjose]

Entonces la única solucion es la que has ideado en el mensaje anterior.

Primero validar que el registro exista y de ser así hacer la actualización.

Saludos

<center>
<a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/imagenes/logos/logo.gif></a>
</center>

[jpalbox]

El problema esta en q utilizo la otra opcion y no sale nada, da error
Esto es un desastre....

[urjose]

SELECT * FROM TABLA WHERE USUARIO='ALGO' AND ALGO='ALGO'
'Ejecutas la query

If Rs.EOF and RS.BOF Then
'Aqui muestras un error
Else
'Aqui haces la actualización.
End If

Saludos

<center>
<a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/imagenes/logos/logo.gif></a>
</center>

[jpalbox]

Me puedes decir para q se utiliza BOF. La verdad es q de asp tengo las ideas ajustaitas. Gracias Voy a probar

[urjose]

Si es BOF (beginning of file) o EOF (End...) entonces quiere decir que no hay nada.

Saludos

<center>
<a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/imagenes/logos/logo.gif></a>
</center>

[jpalbox]

Nada. esto no funciona mira lo q he hecho
&lt;%
nsocio = Request.Form(&quot;nsocio&quot;)
usuario = Request.Form(&quot;usuario&quot;)
password = Request.Form(&quot;password&quot;)
nombre = Request.Form(&quot;nombre&quot;)
apellidos = Request.Form(&quot;apellidos&quot;)

'Abre la conexion con la base de datos a traves de una conexion ODBC
Set con = Server.CreateObject(&quot;ADODB.Connection&quot;)
'Como vamos a utilizar la variable rs del tipo recordset para recorrer los registros con EOF
Set rs = Server.CreateObject(&quot;ADODB.Recordset&quot;)
con.Open(&quot;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=&quot; &amp; Server.MapPath(&quot;\jpalbox\db\usuarios.mdb&quot ;))

'Comprobamos en la tabla que el nombre del usuario existe.
sql = &quot;SELECT * FROM Personal WHERE usuario='&quot;&amp;usuario&amp;&quot;' &quot;
rs.Open sql, con

'Si el valor EOF (fin de la tabla elegida) es false, existe el usuario.
If rs.EOF = false then
Response.redirect &quot;err03.htm&quot;
else
sql = &quot;SELECT * FROM Personal WHERE nsocio='&quot; &amp; nsocio &amp;&quot;' and nombre = '&quot; &amp; nombre &amp;&quot;' and apellidos ='&quot; &amp; apellidos &amp;&quot;' &quot;
rs.Open sql, con
If Rs.EOF and RS.BOF Then
Response.Write &quot;Hubo un error&quot;
Else

'Ejecuta un sentencia SQL para insertar alta
sql = &quot;UPDATE Personal SET password ='&quot; &amp; password &amp; &quot;', usuario='&quot; &amp; usuario &amp; &quot;' WHERE nsocio='&quot;&amp; nsocio &amp;&quot;' &quot;
con.Execute(sql)
reResponse.Write &quot;Insercion correcta&quot;
End if

end if
'Libera memoria
con.Close
Set con = Nothing

%&gt;