Foros del Web » Programando para Internet » ASP Clásico »

problema con u`pdate

Estas en el tema de problema con u`pdate en el foro de ASP Clásico en Foros del Web. Tengo una tabla con 4 campos: Idtribuna= Autonumerico Articulo= Texto Exposicion= Memo Tiempo= Fecha Una pagina envia a traves de l a barra de navegacion ...
  #1 (permalink)  
Antiguo 27/06/2003, 04:57
 
Fecha de Ingreso: mayo-2003
Mensajes: 866
Antigüedad: 21 años, 1 mes
Puntos: 0
Pregunta problema con u`pdate

Tengo una tabla con 4 campos:
Idtribuna= Autonumerico
Articulo= Texto
Exposicion= Memo
Tiempo= Fecha

Una pagina envia a traves de l a barra de navegacion del explorador el valor de idtribuna de esta forma
http://localhost/web/probar11.asp?idtribuna=3

a esta pagina con la que pretendo modificar o borrar los datos de la base de datos.
Si decido borrar los datos me funciona, pero si decido modificar los datos me aparece este error:
· Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Controlador ODBC Microsoft Access] Error de sintaxis (falta operador) en la expresión de consulta '25/07/2003 22:15:45'.
/forojb/probar11.asp, line 61
· Tipo de explorador:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)
· Página:
POST 86 bytes to /forojb/probar11.asp
· Datos de POST:
articulo=juan&exposicion=moreno&tiempo=25%2F07%2F2 003+22%3A15%3A45&Save.x=20&Save.y=13

¿Por qué me da ese error?


<%@ LANGUAGE = "VBScript" %>
<!-- #include file="db.asp" -->
<!-- #include file="configuracion.asp" -->
<!-- #include file="functions.asp" -->

<%
idtribuna=valid_sql(request.querystring("idtribuna "))
estado=request.querystring("estado")
edicioncompleta=false
if not(idtribuna=null and idtribuna="" and not(isnumeric(idtribuna))) then
'Obtener los detalles relevantes del articulo
set rsidtribuna=db.execute("SELECT * FROM tribuna WHERE idtribuna = " & idtribuna)
if rsidtribuna.eof then
response.redirect("probar10.asp?mensage=" & Server.URLEncode("Ese articulo no existe."))
end if
idtribuna=rsidtribuna("idtribuna")
articulo=rsidtribuna("articulo")
exposicion=rsidtribuna("exposicion")
tiempo=rsidtribuna("tiempo")


if estado="delete" and idtribuna<>"" then
db.execute("delete * from tribuna where idtribuna=" & idtribuna)
editarmensage="El articulo ha sido eliminado con exito"
edicioncompleta=true
elseif estado="delete" and idtribuna="" then
editarmensage="Ha ocurrido un error al eliminar el articulo"
edicioncompleta=true
end if

if estado="save" then

idtribuna=request.querystring("idtribuna")
articulo=request.form("articulo")
exposicion=request.form("exposicion")
tiempo=request.form("tiempo")

if not(isnumeric(idtribuna)) then
mensage=mensage & "<br>No se ha introducido idtribuna."
end if
if articulo="" or articulo=null or len(articulo)>255 then
mensage=mensage & "<br>Necesitas introducir un articulo."
end if
if exposicion="" or exposicion=null then
mensage=mensage & "<br>Necesitas introducir una exposicion."
end if
if tiempo="" or tiempo=null then
mensage=mensage & "<br>Necesitas introducir el tiempo."
end if


if mensage="" then
'Comprobar si es una modificacion o una nueva inserccion
if idtribuna=null or idtribuna="" then
'insertar
sql="insert into tribuna (articulo, exposicion, tiempo"
db.execute(sql)
else
end if
sql="update tribuna set articulo='" & valid_sql(articulo) & "', exposicion='" & valid_sql(exposicion) & "', tiempo=" & valid_sql(tiempo) &" where idtribuna=" & valid_sql(idtribuna)
db.execute(sql) ‘ ESTA ES LINEA 61
end if
editarmensage="Detalles del articulo guardados."
edicioncompleta=true
end if

%>

<html>

<head>
<title>
Administración
</title>

<body bgcolor="<%= bgcolor %>" topmargin="0" leftmargin="0" marginwidth="0" marginheight="0" text="<%= text %>" alink="<%= color3 %>" link="<%= color3 %>" vlink="<%= vlink %>">
<font face="arial">

<table>
<%
if not(idtribuna=null and idtribuna="" and not(isnumeric(idtribuna))) then
%>
<td valign=top align=left>
<p align="left">

<br>

<td valign=top align=right width=100>
<% end if %>
<p>
</td>
<td>
<% if edicioncompleta then %>
<%= editarmensage %>
<% else %>
<form action="probar11.asp?estado=save&idtribuna=<%= idtribuna %>" method=post>
<table cellspacing=0 cellpadding="0" border="0">
<tr>
<td>
</td>
<td>
<font face="helvetica" size="6" color="<%= colortexto %>">
<p align="left">
<%if idtribuna=null or idtribuna="" then %>
<b>Añadir articulo</b>
<%else %>
<b>Editar articulo</b>
<br>
<font face="<%= fontface %>" size="2" color="<%= text %>">
<%end if %>
<%=mensage %>
<br>
<br>
</td>
</tr>
<tr>
<td align=right valign="top">
<font face="helvetica" size="2" color="<%= colortexto %>"
<p align="left"><b>Nombre:</b>&nbsp;&nbsp;</font>
<BR>
</td>
<td align=left valign="top">
<font face="helvetica" size="1" color="<%= text %>">
<input size=20 name="articulo" value="<%= Server.HTMLEncode(articulo & "") %>" maxlength=100>
</td>
</tr>
<tr>
<td align=right valign="middle">
<font face="helvetica" size="2" color="<%= colortexto %>"
<p align="left"><b>Descripción:</b>&nbsp;&nbsp;</font>
<BR>
</td>
<td align=left valign="top">
<font face="helvetica" size="1" color="<%= text %>">
<textarea name="exposicion" rows=6 cols=40><%= Server.HTMLEncode(exposicion & "") %></textarea>
</td>
</tr>
<tr>
<td align=right valign="top">
<font face="helvetica" size="2" color="<%= colortexto %>"
<p align="left"><b>tiempo:</b>&nbsp;&nbsp;</font>
<BR>
</td>
<td align=left valign="top">
<font face="helvetica" size="1" color="<%= text %>">
<input size=20 name="tiempo" value="<%= tiempo %>" maxlength=100>
</td>
</tr>
<tr>
<td align=right valign="top">
<font face="helvetica" size="2" color="<%= colortexto %>"
<p align="left"><b>Imagen:</b>&nbsp;&nbsp;</font><BR></td>
</tr>
<tr>
<td align=right valign="top">
<font face="helvetica" size="2" color="<%= colortexto %>"
<p align="left"><b>Categoria:</b>&nbsp;&nbsp;</font><BR></td>
<td align=left valign="top">
<font face="helvetica" size="1" color="<%= text %>">

<%end if%>
</select>
</td>
</tr>
<tr>
</tr>
<tr>
</tr>
</table>
<br>
<center>
<input type=image src="../imagenes/guardar.gif" alt="Guardar" name="Save" border=0>
<% if idtribuna<>"" then %>
<a href="probar11.asp?estado=delete&idtribuna=<%= idtribuna %>"><img src="imagenes/deletebutton.gif" border=0 alt="Delete"></a>
</form>
<% end if %>
<% end if %>
</td>
</table>
</body>
</html>

<%
db.close
set db=nothing
%>
  #2 (permalink)  
Antiguo 27/06/2003, 05:28
Avatar de cacike500  
Fecha de Ingreso: noviembre-2002
Mensajes: 56
Antigüedad: 21 años, 6 meses
Puntos: 0
creo que el error esta aqui...

Cuando estableces el valor de tiempo en el update lo haces sin meterlo entre comillas. En Access tendras que meterlo entra comillas simples de la misma forma que con los valores de tipo texto que tienes anteriormente la instruccion.

Otra cosa, la instruccion insert parece inacabada, revisala.

Espero haber acertado...
__________________
como dice un sabio amigo mio:
web puede...
master algo menos...
[AIG...2001]
  #3 (permalink)  
Antiguo 27/06/2003, 13:46
 
Fecha de Ingreso: mayo-2003
Mensajes: 866
Antigüedad: 21 años, 1 mes
Puntos: 0
cacike500 ¡ERES UNA MAQUINA!
Muchas gracias, ya funciona
  #4 (permalink)  
Antiguo 30/06/2003, 23:11
Avatar de mazingerz  
Fecha de Ingreso: febrero-2003
Ubicación: Sarasota FL
Mensajes: 147
Antigüedad: 21 años, 4 meses
Puntos: 0
Sqa212;
Que tal, sabes estaba revisando los POST de Update o Instert sobre el metodo Execute, mira estoy probando esta sintaxis con acces 2002 y me da un error que lo busco en MSDN de Ms y no aparece. este es el codigo. Si tuvieras algo de tu codigo, (solo lo medular). me seria de mucha utilidad, es primera ves que uso acces.

strCnn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/especificaciones.mdb")
Set cnn = Server.CreateObject ("ADODB.Connection")
Cnn.Open strCnn
strSql="UPDATE empresas SET empresas.id_empresa=1, empresas.empresa='BETONSA S.A.' WHERE empresas.id_empresa=1"
set Rst = Cnn.Execute (str)
set Rst = nothing

Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 13:24.