Ver Mensaje Individual
  #1 (permalink)  
Antiguo 08/11/2004, 10:28
xAlex
 
Fecha de Ingreso: noviembre-2004
Ubicación: Sevilla
Mensajes: 139
Antigüedad: 20 años, 6 meses
Puntos: 0
Es esto posible?

dim registros
dim vect, i

registros = "campo1, campo2"
registros = Chr(34) & replace(registros, ", ", Chr(34) & "," & Chr(34), 1, -1, 1) & Chr(34)

vect = array(registros)
For i = 0 to ubound(vect)

Response.Write vect(i)
Response.Write "<BR><br>"

next

--------------------------------------------------------


hay alguna manera de q este codigo funcione con alguna modificacion?

De esta manera, en vez de dar como resultado:

campo1
campo2

da como resultado:

"campo1","campo2"

-----------------------------------------

la finalidad de este codigo es insertar con un solo textbox varios registros en una base de datos, por eso necesito que el array funcione y separe los registros divididos por ","

hay alguna forma menos palurda de hacerlo?

se me entiende? :S

un saludo a todos y gracias por vuestra atencion