Foro de elhacker.net

Programación => Scripting => Mensaje iniciado por: RubenLL en 24 Agosto 2012, 10:53 am



Título: [VBS] Como leer el contenido que hay en la tercera tabulacion de un fichero txt.
Publicado por: RubenLL en 24 Agosto 2012, 10:53 am
Hola a todos, quisiera poder leer un fichero txt que esta separado por tabulaciones y extraer en un variable el contenido que hay en la tercera tabulación. ¿ Como podría hacerlo?

Gracias


Título: Re: Como leer el contenido que hay en la tercera tabulacion de un fichero txt. vbscr
Publicado por: adastra en 24 Agosto 2012, 13:18 pm
cat fichero.txt | cut -d " " -f3


Título: Re: Como leer el contenido que hay en la tercera tabulacion de un fichero txt. vbscr
Publicado por: RubenLL en 24 Agosto 2012, 13:27 pm
gracias por la respuesta pero es vbscript.


Tengo este script que quiero que solo muestre el segundo tabulador que es donde aparece una fecha el fichero esta separado por tabulaciones pero esto lo convierte en comas ara que lo muestre en una sola linea ¿ como lo hago?
Código
  1. Const ForReading = 1
  2. Set objFSO = CreateObject("Scripting.FileSystemObject")
  3. Set objTextFile = objFSO.OpenTextFile _
  4.    ("C:\Documents and Settings\usuario\Escritorio\prueba.txt", ForReading)
  5. Do Until objTextFile.AtEndOfStream
  6.  
  7.    strNextLine = objTextFile.Readline
  8.    arrServiceList = Split(strNextLine , ",")
  9. Wscript.Echo "Server name: " & arrServiceList(0)
  10.  
  11. Loop


Título: Re: Como leer el contenido que hay en la tercera tabulacion de un fichero txt. vbscr
Publicado por: Eleкtro en 24 Agosto 2012, 19:26 pm
@RubenLL
Los códigos deben ir dentro de la etiqueta [ CODE ]

Código
  1. Const ForReading = 1
  2. Set objFSO = CreateObject("Scripting.FileSystemObject")
  3. Set objTextFile = objFSO.OpenTextFile _
  4.    ("TEST.txt", ForReading)
  5. Do Until objTextFile.AtEndOfStream
  6.    strNextLine = objTextFile.Readline
  7.    arrServiceList = Split(strNextLine, vbtab)          ' vbtab = El delimitador de tabulación.
  8.    Wscript.Echo "Server name: " & arrServiceList(2)    ' (X)   = El token
  9. Loop
  10.  

Saludos


Título: Re: [VBS] Como leer el contenido que hay en la tercera tabulacion de un fichero txt.
Publicado por: RubenLL en 25 Agosto 2012, 01:04 am
Gracias, me ha servido :)
Tengo otro problemilla que no se si tu me puedes ayudar, trato de copiar ficheros de un directorio a otro o de un equipo a otro y lo que necesitaria es saber cuando se produce un error de cualquier tipo (no puede copiar fichero...) y si ocurre hacer unas series de acciones, además quiero que si ocurre un error continue con el script, de momento solo tengo este codigo que creo que solo me sirve una linea

Código
  1. Const DontOverwriteExisting = FALSE
  2.  
  3. Set obj_FS = CreateObject("Scripting.FileSystemObject")
  4.  
  5. obj_FS.CopyFile "\\servidor\carpeta\imagen.jpg" , "c:\escritorio\", DontOverwriteExisting
  6. On Error Goto 0
  7.  


Título: Re: Como leer el contenido que hay en la tercera tabulacion de un fichero txt. vbscr
Publicado por: Eleкtro en 25 Agosto 2012, 03:35 am
@RubenLL
Los códigos deben ir dentro de la etiqueta [ CODE ]

Edita tu último comentario, Haz el favor.

(http://img846.imageshack.us/img846/1383/prtscrcaptureo.jpg)

Saludos


Título: Re: [VBS] Como leer el contenido que hay en la tercera tabulacion de un fichero txt.
Publicado por: RubenLL en 25 Agosto 2012, 14:04 pm
Ok, ya esta editado :)


Título: Re: [VBS] Como leer el contenido que hay en la tercera tabulacion de un fichero txt.
Publicado por: Novlucker en 25 Agosto 2012, 15:48 pm
El pie para que encuentres tu respuesta :P

On Error Resume Next y err.number ;)

Saludos