[crayon-6866839c8047d804193237/]
Para resolver ecuaciones de segundo grado ingresando los coeficientes a, b y c cuando se te solicite. El script utiliza la fórmula general para resolver la ecuación y muestra las soluciones reales si existen, o un mensaje indicando que la ecuación no tiene soluciones reales en caso contrario.
[crayon-6866839c80c81835171226/]
Este script lo grabaría en el escritorio de WINDOWS. Al pincharlo realizara una copia de la planilla EXCEL, hasta un máximo de 10 versiones. Al llegar a la versión 10, desaparecerá la versión más antigua y esta se grabar como versión 10 (la mas reciente). Luego abrirá la planilla EXCEL para trabajar. Se puede adaptar a la imaginación del usuario.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 |
@echo off setlocal enabledelayedexpansion set ruta=d:\Fuentes\version\ set archivo=planilla.xlsx set ver[2]=1 set ver[3]=2 set ver[4]=3 set ver[5]=4 set ver[6]=5 set ver[7]=6 set ver[8]=7 set ver[9]=8 set ver[10]=9 for /F %%i in ("%archivo%") do set nombre=%%~ni if exist %ruta%%nombre%-10.xlsx goto renombra for /L %%a in (1,1,10) do if not exist %ruta%%nombre%-%%a.xlsx set archver=%ruta%%nombre%-%%a.xlsx && goto copia :renombra for /L %%a in (2,1,10) do ( copy /Y %ruta%%nombre%-%%a.xlsx %ruta%%nombre%-!ver[%%a]!.xlsx >NUL ) set archver=%ruta%%nombre%-10.xlsx :copia copy /Y "%ruta%%archivo%" "%archver%" >NUL start "" "%ruta%%archivo%" >NUL if errorlevel 4 echo "El archivo esta ABIERTO, debe cerrarlo primero" && pause goto:eof |
[crayon-6866839c81050531811212/]
Al ejecutar el script, se obtiene el siguiente resultado. Pudiendo adaptarlo a cualquier situación que se requiera.
[crayon-6866839c8105b026591128/]
Para este ejemplo se utilizan 2 archivos de texto plano. “factura.txt” el cual contiene datos de facturas, con un código que es único en el archivo. El segundo archivo es “detalle.txt” el cual contiene el detalle de las facturas, identificados por el código de la factura y pueden ser múltiples líneas en el archivo.
El script une estos 2 archivos en el archivo “facdet.txt” el cual contiene las facturas y luego el detalle de dicha factura.
[crayon-6866839c81213539078133/]
Existe un error que me dio en algún momento, específicamente en el comando “findstr” que se ejecuta dentro del ciclo FOR. Al ejecutar el SCRIPT me daba error “ no se reconoce como un comando interno o externo”.
Pero si el comando lo ejecutaba en la línea de comando o en el script fuera del ciclo FOR, si lo ejecutaba en forma correcta. Busqué alguna solución en la WEB y me di cuenta que muchas personas tenían este problema. La solución que daban todos era por problemas con la variable “PATH” de Windows. No era mi caso.
El problema me lo origino el antivirus que tenía, que por algún motivo, bloqueo la ejecución, pero solo cuando se gatilla dentro del ciclo FOR. Ni idea por qué. Elimine el bloqueo y el problema se solucionó. Por si a alguien le pueda servir.