Visual Basic - Abrir un archivo y buscar un texto en el

Life is soft - evento anual de software empresarial
 
Vista:

Abrir un archivo y buscar un texto en el

Publicado por Filippo (1 intervención) el 21/05/2009 03:30:59
Hola señores tengo un problema y soy un nuevo en Visual basic. yo quiero hacer lo siguiente:

1) Abrir un archivo

2) Buscar dentro de el una cadena de caracteres especificada por el usuario

3) cuando lo encuentre me separe ese archivo o grupos de archivos a un directorio que yo le voy a espoecificar

La idea es la siguiente imaginen que tengo que buscar en 20 documentos en cuantos de estos existe la palabra "Hola" y separarlos a un directorio, listo!

Espero me puedan ayudar!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Abrir un archivo y buscar un texto en el

Publicado por P3L30N2009 (699 intervenciones) el 21/05/2009 11:10:09
Bueno, cuando dices "Abrir un archivo" supongo que te refieres a un archivo plano tipo txt.

El proceso podría ser el siguiente:

Abres el archivo con la función Input
Open "MiArchivo" For Input As #Canal

Cargas cada línea en una variable de tipo String
Line Input #Canal, variable

Cargas cada palabra de la línea en una matriz con la función Split
a = Split(variable, delimitador) ' Previamente has declarado "a" como una matriz de cadenas

Recorres la matriz de principio a fin con las funciones LBound y UBound y en el bucle haces la comparación
IF variable = DatoBuscado Then separo_el_archivo_a_un directorio
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Reduciendo código

Publicado por Quique (51 intervenciones) el 21/05/2009 16:33:08
Muy bien, Peleon, pero se evitaría algo de trabajo (función Split y bucles) si simplemente compara si la palabra existe en la linea que ya leyó, después de:
Line Input #Canal, variable
hacer esta comparación:
If InStr( variable, DatoBuscado ) <> 0 Then separo_el_archivo_a_un directorio
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Reduciendo código

Publicado por P3L30N2009 (699 intervenciones) el 22/05/2009 08:44:56
Efectivamente, Quique

Buena observación.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar