Ver Mensaje Individual
  #7 (permalink)  
Antiguo 22/12/2006, 15:47
Avatar de pablinff
pablinff
 
Fecha de Ingreso: diciembre-2005
Ubicación: Argentina
Mensajes: 383
Antigüedad: 19 años, 3 meses
Puntos: 7
Re: Problema con string

Listo! ya está corregido!, había sido que no me estaba extrayendo los datos de la BD y bueno solucioné eso y después surgió otro problema, que sp(0) me lo tomaba fuera de rango, así que para solucionarlo lo metí dentro de un bucle for el cuál misteriosamente lo solucionó.
Bueno acá dejo el código final por si alguien le interesa :P
Código:
<%
dim texto
texto = rs("prod")
texto = Trim(texto)

'si existen espacios dobles en la cadena, los eliminamos con este bucle
Do While InStr(1, texto, "  ") > 0
    texto = Replace(texto, "  ", " ")
Loop

'y hacemos un vector con sus palabras
Dim prod_cant, x, sp
prod_cant = split(texto, "|")

For i = 0 to ubound(prod_cant)
sp = split(prod_cant(i), "--") 
	for x = 1 to ubound(sp)
		Response.write("<input disabled type='text' size=30 name='prod"&i&"' id='prod"&i&"' value='"&sp(0)& "'><input disabled type=text size=7 name='cant"&i&"' id='cant"&i&"' value='"&sp(1)&"'>" & "<br>")	
	next
next
%>
Saludos y muchas gracias Myakire por tu gran ayuda!
__________________
I'm gonna start a revolution from my bed...