Autor
|
Tema: Ayuda con Bat o Vbs (Leído 8,446 veces)
|
AngelFire
Desconectado
Mensajes: 118
WTF :)
|
En Windows Xp Sp3
Partiendo de: Fichero1.txt Fichero2.txt Fichero3.txt
Con contenido de tipo y solo una sola linea por fichero como muestra el ejemplo Fichero1.txt asdadasdasdasd asdsadas asdasdasd cash out: 1.97 asdasdas asdasda
Fichero2.txt asdadasdasdasd asdsadas asdasdasd cash out: 212.34 asdasdas asdasda
Fichero3.txt asdadasdasdasd asdsadas asdasdasd cash out: 1232.97 asdasdas asdasda
Como seria un bat o vbs que como resultado diera un fichero
Fichero4.txt
Con contenido: cash out: 1.97 cash out: 212.34 cash out: 1232.97
Alguna recomendación, tengo conocimientos muy básicos en programación Estoy por leer mas sobre el comando find o findstr en windows el cual pocas veces he utilizado y luego seria algo como >Fichero4.txt
Mas no se como hacer en bat o vbs para que abran los fichero uno a uno en orden.
Gracias por leer igual estoy buscando sobre el tema, cualquier comentario, ayuda o etc es bienvenida.
|
|
|
En línea
|
|
|
|
MCKSys Argentina
|
Hola! Revisa esto (vbs). Saludos!
|
|
|
En línea
|
MCKSys Argentina "Si piensas que algo está bien sólo porque todo el mundo lo cree, no estás pensando."
|
|
|
AngelFire
Desconectado
Mensajes: 118
WTF :)
|
Lo hare muchas gracias tengo este tema duplicado por error como puedo borrar uno de los dos o hablar con el moderador, pues cuando le doy a la cruz de eliminar no me deja y me dice que hay alguien visitando el tema.
|
|
|
En línea
|
|
|
|
AngelFire
Desconectado
Mensajes: 118
WTF :)
|
Hola! Revisa esto (vbs). Saludos! Lo lei pero no aplica a mi caso, ahi solo dicen como leer un fichero y yo tengo varios y no necesito todo el contenido de la primera linea sino solo una parte para luego darlos todos juntos en un solo fichero. No se si me explique.
|
|
|
En línea
|
|
|
|
MCKSys Argentina
|
Lo lei pero no aplica a mi caso, ahi solo dicen como leer un fichero y yo tengo varios y no necesito todo el contenido de la primera linea sino solo una parte para luego darlos todos juntos en un solo fichero. No se si me explique.
Leer 1 archivo o 3 archivos, es indistinto aquí. Revisa el ejemplo y trata de entenderlo para aplicarlo a tu situación. Lo mismo con lo que lees: puedes leer todo o sólo 1 lineay luego parsear esa línea. Esta función te será útil. Aqui tienes todas las funciones de VB. Revisa las que son para archivos y strings. Saludos!
|
|
|
En línea
|
MCKSys Argentina "Si piensas que algo está bien sólo porque todo el mundo lo cree, no estás pensando."
|
|
|
AngelFire
Desconectado
Mensajes: 118
WTF :)
|
Intente algo como esto pero no me sirve aun @echo off ( findstr "Cash out:" 1.txt findstr "Cash out:" 2.txt findstr "Cash out:" 3.txt ) > "4.txt" Esperaba algo de salida como Cash out: Cash out: Cash out: Pero nada lo que obtuve no es mas que el contenido de 1.txt+2.txt+3.txt todo uno a continuacion de otro y no es lo deseado. Tampoco se como tomar el valor numérico que sigue a continuación porque como expuse anteriormente son variables los numeros van desde 0.00 a infinito siempre conservando dos lugares despues del . (.00) Saludos
|
|
|
En línea
|
|
|
|
AngelFire
Desconectado
Mensajes: 118
WTF :)
|
|
|
|
En línea
|
|
|
|
Eleкtro
Ex-Staff
Desconectado
Mensajes: 9.788
|
Intente algo como esto pero no me sirve aun @echo off ( findstr "Cash out:" 1.txt findstr "Cash out:" 2.txt findstr "Cash out:" 3.txt ) > "4.txt" Esperaba algo de salida como Cash out: Cash out: Cash out: Batch es un lenguaje muy limitado y una herramienta inutil para ese tipo de tareas. El comando FIND/FINDSTR buscan coincidencias en una linea, y muestran la linea, no capturan la parte parcial de la linea que coincide con el patrón de búsqueda. Sigue el consejo del compañero @MCKSys Argentina, utiliza VisualBasicScript, pero utiliza expresiones regulares (RegEx) que es más cómodo. Saludos!
|
|
|
En línea
|
|
|
|
AngelFire
Desconectado
Mensajes: 118
WTF :)
|
Ok ya estoy de nuevo en ello, gracias por avisar que el find y findstr no puedo hacer capturas de una linea.
|
|
|
En línea
|
|
|
|
AngelFire
Desconectado
Mensajes: 118
WTF :)
|
Voy por aquí pero me faltan aun que los ficheros de salida contengan solo el pedazo que me interesa: Salida1.txt Cash Out: 232.45 Salida2.txt Cash Out: 123232.35 Salida3.txt Cash Out: 42.40 De ahí solo tendría que pasar el bat anteriormente expuesto que lo que hace es pasar todo los ficheros de salida del 1 al 3 en un text 4. On Error Resume Next Dim Cadena Set Carpeta = CreateObject("Scripting.FileSystemObject") Carpeta.CreateFolder ".\output" For i = 1 To 3 Fichero = "C:\Ejemplo\" & i &".txt" 'MsgBox Fichero,0,"Muestra" 'Set texto = CreateObject("Scripting.FileSystemObject") 'texto.CopyFile Fichero,".\Salida.txt" Set objFSO = CreateObject("Scripting.FileSystemObject") filepath = Fichero substrToFind = "CashOut:" Set objInputFile = objFSO.OpenTextFile(filepath) tmpStr = objInputFile.ReadLine If InStr(tmpStr, substrToFind) <= 0 Then WScript.Echo "No se encontro la cadena en " & i &".txt" Else Set texto = CreateObject("Scripting.FileSystemObject") Set salida = texto.CreateTextFile (".\output\Salida" & i &".txt", True) salida.WriteLine i salida.Close End if Next
|
|
« Última modificación: 20 Febrero 2015, 18:48 pm por Eleкtro »
|
En línea
|
|
|
|
|
Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
[Ayuda] Necesito ayuda para crear un buen video uso AF y Flash.
Diseño Gráfico
|
XXXXXX
|
1
|
5,437
|
11 Noviembre 2009, 00:17 am
por Sub_Cero
|
|
|
Ayuda por davor ayuda os ruego ayuda XD (SOLUCIONADO)
Hardware
|
XxRekcahlExX
|
6
|
10,469
|
24 Mayo 2010, 00:56 am
por Aprendiz-Oscuro
|
|
|
AYUDA -.- ahora no entro más en 4chan (tengo una duda, ayuda por favor)
Foro Libre
|
Draklit
|
6
|
8,668
|
15 Octubre 2010, 03:14 am
por Draklit
|
|
|
sist lince indumentaria ayuda ayuda!!!!!!!!!! problemon que hice en le trabajo
Software
|
paola03
|
1
|
4,882
|
11 Marzo 2011, 01:09 am
por charola42
|
|
|
[PYTHON][AYUDA][ERROR] Necesito ayuda para instalar PyGTK 2 en windows 7
Scripting
|
Noxware
|
2
|
7,510
|
20 Septiembre 2014, 00:05 am
por Noxware
|
|