Cadena de programación mal cerrada

[guillermogonzalez]

Hola, amigos.

Quiero quitar las unidades en el siguiente script, pero no sé como cerrarlo, y me da constante error con todos los intentos:

<%
Tabla.Close
Base.Close
Set Tabla = Nothing
Set Base = Nothing
Ruta = "'../TiendaWeb/comprar.asp?cod_producto=" & _
Server.URLEncode (cod_producto) & _
"&Unidades=' + Unidades.value"
%>

Si lo quito (la fila que está en negrita y subrayada, referente a las unidades), como cierro la cadena?

Gracias!!

NOTA: Estoy un poco desesperado

[JuanRAPerez]

Server.URLEncode (cod_producto)


suerte

[guillermogonzalez]

Qúe rápido! Muchas gracias. Ya lo había hecho así, pero me devuelve el siguiente error:

Mensaje: Constante de cadena sin terminar.

Eso es lo que me desconcierta un poco.

Alguna pista más?

[guillermogonzalez]

Lo he dejado así:

<%
Tabla.Close
Base.Close
Set Tabla = Nothing
Set Base = Nothing
Ruta = "'../TiendaWeb/comprar.asp?cod_producto=" & _
Server.URLEncode (cod_producto)
%>

Pero el error de "constante de cadena sin terminar" sigue saliendo...

[u_goldman]

<%
Tabla.Close
Base.Close
Set Tabla = Nothing
Set Base = Nothing
Ruta = "'../TiendaWeb/comprar.asp?cod_producto=" & _
Server.URLEncode (cod_producto) & _
"&Unidades=' + Unidades.value"
%>

Que es exactamente unidades.value?

[guillermogonzalez]

La página dónde está incluído este script muestra los detalles de un producto. Estoy configurando una pequeña tienda, y estoy usando una estructura que ya tenía para otra tienda.

Quiero quitar el elemento de la cantidad de unidades que elige el cliente, porque para esta tienda no hace falta, pero al quitar este elemento me ocurre todo esto...

[u_goldman]

Ese es el problema, no puedes recuperar de esa manera valores del lado del cliente.

Saludos

[guillermogonzalez]

Pero si tengo un código con una serie de elementos que me interesan, y otros no, para una página que me muestre un producto, y añadirlo a su carrito de compra con las caracteristicas que yo decida, puedo eliminar los elementos que no quiero ¿no?

En este caso, quiero quitar que el cliente pueda elegir comprar ciertas unidades, y eliminar este apartado. ¿Cómo hacerlo? Esa es la pregunta. El código funciona perfectamente, pero cuando quito la parte de las unidades del código, me da error, y además me dice que la cadena está mal cerrada...

[u_goldman]

Perdon, el dia de hoy ando mas lento que lo normal, si solo quieres quitar esa parte:

Tabla.Close
Base.Close
Set Tabla = Nothing
Set Base = Nothing
Ruta = "'../TiendaWeb/comprar.asp?cod_producto=" & _
Server.URLEncode (cod_producto) & "'"

[guillermogonzalez]

SIIIIII. Menos mal que andas más lento de lo normal. Perfecto, muchas gracias.

[u_goldman]

Por nadas

[guillermogonzalez]

Ahora me ha surgido otro problema. Intento ser breve:

Después del cambio anterior, pulso "comprar", se me abre correctamente la ventana de la cesta, sale el mensaje de "¿Desea adjuntar el producto...?" y se cierra sin más problema.

Pero cuando abro la cesta, no hay nada, no se ha incluido el producto solicitado. ¿Porqué? El elemento unidades está borrado de todas las páginas, de las variables y de los formularios. Ya no existe. ¿Dónde podría estar el error?

He revisado una y otra vez los códigos, y no veo nada incorecto. Es más, si siquiera sale un mensaje de error. Simplemente, es como si no se hubiera realizado compra alguna.

¿Alguna idea? Gracias!

[u_goldman]

Hola, la explicación simple sin ver nada de código es que quitamos la variable unidades del string que me imagino que utilizas para hacer algo (en este caso guardar las unidades).

No puedo ayudarte mucho mas sin ver el código y sin saber que es exactamente lo que hace tu aplicación.

Saludos

[guillermogonzalez]

ok. que parte del código puedo enseñarte?

Este es uno de los meollos de la xuestion. Antes así:

<%
Else

cod_producto = Request.Form ("cod_producto")
Unidades = CInt(Request.Form ("Unidades"))

If Request.Cookies ("Compra")(cod_producto) = "" Then
Response.Cookies ("Compra")(cod_producto) = Unidades
Else
Response.Cookies ("Compra")(cod_producto) = _
Request.Cookies ("Compra")(cod_producto) + Unidades
End If
%>

Y ahora así:

<%
Else

cod_producto = Request.Form ("cod_producto")

If Request.Cookies ("Compra")(cod_producto) = "" Then
Response.Cookies ("Compra")(cod_producto)
Else
Response.Cookies ("Compra")(cod_producto) = _
Request.Cookies ("Compra")(cod_producto)
End If
%>

¿Puede ser que haya cerrado también malamente la cadena, como antes, o que el error esté antes en otra parte de la programacion?

Gracias de nuevo

[guillermogonzalez]

y este es el error que me sale con ese cambio...

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'Response.Cookies(...)'

[guillermogonzalez]

Creo que ya lo tengo:

<%
Else

cod_reparacion = Request.Form ("cod_producto")


If Request.Cookies ("Compra")(cod_producto) = "" Then
Response.Cookies ("Compra")(cod_producto) = cod_producto
Else
Response.Cookies ("Compra")(producto) = _
Request.Cookies ("Compra")(cod_producto)

End If
%>

Me funciona.

Gracias por todo.