Foros del Web » Programación para mayores de 30 ;) » Programación General »

Eliminar caracteres especiales

Estas en el tema de Eliminar caracteres especiales en el foro de Programación General en Foros del Web. Hola, Tengo un pequeño script que he encontrado navegando que me borra caracteres especiales dentro de un txt. Me gustaría saber si alguien puede ayudarme ...
  #1 (permalink)  
Antiguo 04/04/2016, 03:24
 
Fecha de Ingreso: febrero-2008
Mensajes: 5
Antigüedad: 16 años, 1 mes
Puntos: 0
Eliminar caracteres especiales

Hola,

Tengo un pequeño script que he encontrado navegando que me borra caracteres especiales dentro de un txt.

Me gustaría saber si alguien puede ayudarme a generar este mismo Script pero que recorra toda la carpeta en busca de TXT y fuera borrando los caracteres especiales de todos ellos.

Adjunto código:

Set FSO = CreateObject("Scripting.FileSystemObject")
OldTextFile = ".\test.txt"
NewTextFile = ".\testsinbarra.txt"
ReplaceFrom = "/"
ReplaceTo = ""


FSO.CreateTextFile(NewTextFile, 2). _
Write(Replace(FSO.OpenTextFile(OldTextFile, 1).ReadAll(), _
ReplaceFrom, ReplaceTo, 1, -1, vbTextCompare))


Un Saludo y gracias de antemano.

Etiquetas: caracteres, especiales
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 03:04.