Deambulando

Genial vídeo y cuanto menos nostalgico ;)

Ojo que lo borran cada poco tiempo! jejeje

Con esto quedarás bien original en las navidades! jeje

1. Aviso a toda la población: el simulacro de Paz y Amor ha finalizado. Guarden los langostinos, insulten a sus cuñados y disuélvanse.
2. “En estas fechas quería mandarte algo gracioso…increíble…tierno…sexy…dulce y muy entretenido. Pero lo siento, yo no entro por la pantalla. FELIZ AÑO 2007!!
   
3. Datos DGT muy preocupantes, afirman que 23% de accidentes de tráfico son provocados por consumo de alcohol. Eso significa que el otro 77% de los accidentes son causados por los hijos de puta que beben agua, zumos, refrescos y otras mariconadas. Al loro con los abstemios!!! FELIZ 2008!
4. He leído tu horóscopo para el 2008: SALUD: los astros te sonríen. DINERO: los astros te sonríen. SEXO: los astros se descojonan. FELIZ NAVIDAD!
5. Te deseo un 2008 como un paraguas: Mucha tela y un mango largo.
6. En estas fechas Papa Noel os regala 2 palabras que os abrirán muchas puertas: TIRAR y EMPUJAR, jou jou jou. FELIZ NAVIDAD!
7. Que el duendecillo de la navidad esboce una sonrisilla en cada rincón de vuestro hogar, y si no lo hace le pegas una hostia bien dada, que para una cosa que le pides al año… Feliz 2008!
8. Te deseo de todo corazón que pases un feliz fin de año 2008 con este mensaje cifrado: (Dale la vuelta al móvil para entenderlo) 77Od V7 3WVdnX
9. Si ésta noche te meten en un saco no temas!! Es que éste año te he pedido para reyes!! Feliz 2007!!
10. Este año Papa Noel tiene paperas. El día que tenga pa’ putas no le veremos el pelo. Felices fiestas y Próspero año 2008!
11. Amigo, no te lo vas a creer: Ayer tu novia, a media noche, descubrió a los Reyes Magos. ¡Fijo!, porque la oi gritar: “¡VENGA NEGRO, DÉJAMELO TODO AQUÍ DENTRO!. Felicidades de un amigo que te quiere.
12. Feliz Semana Santa de parte de la asociación de alzheimer y nuestro mejores deseos
    para 1.984

vía una cadena de email ;)

Muy útil!

Imaginad tenéis un texto con multitud de etiquetas html…pero claro…no siempre deben de ser buenas para insertar y mantener una estructura de una web.

Pues con esto lo arreglamos :D


function quitarHtml(str)'con regex nos cargamos todos los tags html
quitarHtml=replaceExpresion(str,"","<[^>]*?>”)
end function

function replaceExpresion(str,reem,pat)'hace un regExp
dim oER:set oER = New RegExp
oER.Pattern = pat
oER.IgnoreCase = True
oER.Global = True
replaceExpresion = oER.replace(str, reem)
set oER = nothing
end function