bueno en vdd es algo largo el código y en vdd me imagino q con otra cosa se podía hacer más fácil... espero te sirva.
Antes que nada te explico un poco como es:
tienes una palabra que la hemos sacado de un formulario y la recogemos
Código:
<%
'este variable es igual a "silla"
xseccion = trim(request.Form("seccion"))
'y tenemos la palabra entera
xseccion_tabla = "banco,silla,mesedora"
'ahora con el código
xsec_buscar = InStr(xseccion_tabla, xseccion) 'veo si xseccion está dentro de xseccion_tabla
if Cstr(xsec_buscar) = "0" then ' esto me indica que no está dentro
xseccion = xseccion_tabla ' entonces dejo todo igual
elseif Cstr(xsec_buscar) <> "0" then 'borro xseccion de xseccion_tabla, con todo y la coma
xnum_sec_tabla = len(xseccion_tabla)
xsec_num = Len(xseccion)
xsec_izq = left(xseccion_tabla,Cstr(xsec_buscar)-1)
xsec_izq_num = Len(xsec_izq)
xsuma = xnum_sec_tabla - (xsec_izq_num + xsec_num)
if xsuma > 0 then
xseccion = xsec_izq & right(xseccion_tabla, xsuma-1)
else
xseccion = left(xsec_izq, xsec_izq_num-1)
end if
end if
response.Write(xseccion)
%>
me imagino que te sirve, lo he probado ahorita y si me funca... suerte! cualquier cosa avisas.. aunque me voa ir a la playa mañana a pasar año nuevo y ya no sé cuando regrese
pero igual, avisame si te funcionó
