¿como reemplazar caracteres?

[cookie]

HOLA A TODOS ¡¡

Tengo una duda, .... y solicito de su valiosa ayuda ..

actualmente utilizo el siguiente codigo para reemplazar los espacios en blanco a la hora de mostrar la info de mi Base de Datos

Código:

<% response.write replace(shownew("n_body"), vbcrlf, "<BR>" & vbcrlf)  %>

mi duda es ...

Como tendria que modificar este codigo para hacer que me reemplace por ejemplo "--:)--" por una imagen de una carita ... cuya ubicacion esta en http://www.miWeb.com/carita1.gif, y asi en el mismo codigo efectuar unos 15 reemplazos


Gracias

[meru-kun]

Pues crea una función. Por ejemplo:
Sub doSmilie(text)
pT = text
pT = replace(pT, ":)", "<img src=http....>")
PT = replace(pT, ":(", "<img src=http....>")
...
doSmilie = pT
End Sub

Y luego, simplemente, llamas a sub, y muestras el texto:
response.write smilie(variable)

[cookie]

gracias por responder meru-kun

y con respecto a tu sugerencia ... en donde dice "variable" .. que variable es??
gracias otra vez
no soy muy bueno en ASP .. pero ahi la llevo


Saludos y

[Bravenap]

Yo creo que sería mejor hacerlo con un bucle y con dos vectores qeu contengan, uno los caracteres que se sustituiran y el otro los nombres de las imágenes. Por ejemplo:

Código:

caras = Split("--;)--/--:)--/--:(--","/")
imagenes = Split("guinio/sonrisa/triste","/")

For i=0 to Ubound(caras)
    texto = Replace(texto,caras(i),"<img src="""&imagenes(i)&".gif"">")
Next

Bueno, esto es sólo un ejemplo, pero te recomiendo que lo metas en una subrutina como dice meru-kun. La variable que menciona es el texto en el que has de sustituir los caracteres por las imágenes.

Un saludo.

[cookie]

ok .. lo voy a intentar ..

y gracias por responder