Ver Mensaje Individual
  #2 (permalink)  
Antiguo 26/08/2002, 15:12
Avatar de Aston
Aston
 
Fecha de Ingreso: mayo-2001
Ubicación: Madrid
Mensajes: 933
Antigüedad: 24 años
Puntos: 0
Re: Grabar checks

Hola Pepelucho:

Código:
Campo = "Roma,Milán,Florencia,Venecia"
Para añadirle comillas simples a cada plabra de esa cadena haremos lo siguiente:

'Convertir la cadena en un Array, matriz o arreglo con la Función Split()...

Código:
aCampo = Split(Campo, ",")
Y recorremos la matriz cambiando las subcadenas y añadiendo las comillas simples...
Código:
For n = 0 To UBound(aCampo)
  aCampo(n) = "'" & aCampo(n) & "'"
Next
Por último, volvemos a convertir la matriz o arreglo en una cadena con la función inversa de Split(), osea Join()...

Código:
campo = Join(aCampo, ",")
La cadena final te quedaría así:

Código:
"'Roma','Milán','Florencia','Venecia'"
Con este código puedes hacer una función a la que llames en otras ocasiones ya que esto se suele dar con asiduidad.

Espero te ayude. Saludos. :)

<a href="http://www.laventanita.net/" target="_blank">
<img src="http://www.breogan.org/images/Aston.gif" border="0" alt="La Ventanita.net - Lo imprescindible en la red en castellano"></a>