Gente, buenas!
Tengo este codigo que saqué de las FAQ's.
la variable descripcion_wf es un string que saco de la base de datos.
El problema que tiene este script es que cuando el string descripcion_wf tiene menos de 10 palabras me aparece el siguiente error.
Microsoft VBScript runtime error '800a0009'
Subscript out of range: 'i'
/ci/workflow/incs/splitdesc.inc, line 9
Como puedo mejorar el script y evitar que me aparezca el error cuando el string tenga menos de 10 palabras?
Código:
<%
Function SplitDesc
'Asigno cantidad de palabras que quiero cortar de la oración
descr_corta="0 1 2 3 4 5 6 7 8 9 10"
'Tomo como separador el espacio en blanco
descr_corta=Split(descripcion_wf," ")
For i =0 to 10
Response.Write descr_corta(i)& " "
Next
Response.Write "..."
End Function
%>
Mil gracias de antemano!!!
