Ayuda cen vb 6
Buen día
Sabes, necesito desarrollar un programa que cuente lineas de código, es decir, abra un archivo, lea linea por linea y al final pueda decirme cuantas lineas escritas tiene ese archivo. Se que existen muchas herramientas en el mercado que ya te hacen eso, pero yo necesito el código fuente, hacerle algunas adecuaciones y poder presentarlo en vb 6
No se si cuantas con algo que que me pueda servir al respecto, te lo agradecería bastante
Sin más por el momento, de antemano agradezco tu ayuda
Sabes, necesito desarrollar un programa que cuente lineas de código, es decir, abra un archivo, lea linea por linea y al final pueda decirme cuantas lineas escritas tiene ese archivo. Se que existen muchas herramientas en el mercado que ya te hacen eso, pero yo necesito el código fuente, hacerle algunas adecuaciones y poder presentarlo en vb 6
No se si cuantas con algo que que me pueda servir al respecto, te lo agradecería bastante
Sin más por el momento, de antemano agradezco tu ayuda
1 Respuesta
Respuesta de juliusguate
1
Si se puede, para tal fin hay que abrir el archivo con los comandos proporcionados por el componente
filestream
ya con eso es bien sencillo cargar lineas, examinarlas y empezar a contarlas, ya que así puede revisar archivos (en formato plano -txt-) contar las que tienen lineas, las que no tienen lineas, etc
El objeto se define en proyecto, referencias, microsoft scripting runtime,
de ahí se declara una variable de la siguiente manera
dim f as filesystemobject
Este objeto ya tiene sus propiedades, tales como opentext, etc.. etc.
Julius
-Guatemala-
filestream
ya con eso es bien sencillo cargar lineas, examinarlas y empezar a contarlas, ya que así puede revisar archivos (en formato plano -txt-) contar las que tienen lineas, las que no tienen lineas, etc
El objeto se define en proyecto, referencias, microsoft scripting runtime,
de ahí se declara una variable de la siguiente manera
dim f as filesystemobject
Este objeto ya tiene sus propiedades, tales como opentext, etc.. etc.
Julius
-Guatemala-
