Mensajes

[ID3 Mass Tagger]

Ahhhhhhhhhhh perdón xD

A lo que te refieres es modificar los metadatos, No lo puedes hacer por batch, Bueno, al menos no con comandos internos, Yo lo hago de la siguiente manera:

ID3 Mass Tagger

Cambiar título en los metadatos:

Código (DOS) [Seleccionar] Expandir

id3 -t "El titulo que quieras" "*"

Cambiar título del id3v1:

Código (DOS) [Seleccionar] Expandir

id3 -1 -t "El titulo que quieras" "*"

Cambiar título del id3v2:

Código (DOS) [Seleccionar] Expandir

id3 -2 -t "El titulo que quieras" "*"

Cambiar título en todos:

Código (DOS) [Seleccionar] Expandir

id3 -t "El titulo que quieras" "*" & id3 -1 -2 -t "El titulo que quieras" "*"


EXTRA!:

Para eliminar los tags:

Código (dos) [Seleccionar] Expandir

ID3.exe -1 -2 -3 -d -M -v "*"

Eso elimina en todos los archivos de música del directorio actual el Id3v1, Idv32 y Lyric Tag, Conservando la última fecha de modificación y creación de cada archivo.



PD: Esta utilidad no elimina/modifica el tag APE, Necesaría para programas como el MP3GAIN.

No tengo el link oficial de esta utilidad así que te la subo a mediafire: http://www.mediafire.com/?23ifq3v50o2p4im

Salu2

[Activar modo aleatorio de lista]

¿Como randomizar el contenido de un txt?  

Es lo único que me falta para acabar este script

PD: Acepto cualquier utilidad externa
PD2: Si existiera algún parámetro para iniciar Winamp con la opcion "Activar modo aleatorio de lista" activada, también me serviría...

un saludo

Código (dos) [Seleccionar] Expandir

@Echo OFF

Set Carpeta=%~n0

Echo #EXTM3U>"%Temp%\Lista Winamp.m3u"
For /F "Tokens=*" %%$ in ('Dir /B /S "%CARPETA%" ^| Findstr /R ".aif .flac .m4a .mid .mp3 .ogg .wav .wma"') do (Echo %%$>>"%Temp%\Lista Winamp.m3u")
REM Aqui iría el randomizado
Start /B C:"\Program Files (x86)\Winamp\winamp.exe" "%Temp%\Lista Winamp.m3u"
Exit

Quizás esto te sirva de ayuda: (solucionado) ¿Como instalar este driver de hardware (.INF) en batch



El rundll32 era "especial" (Toca pelotas) al pasar la ruta con espacios con o sin comillas, Ya no recuerdo si habia que hacerlo con comillas o SIN, así que te hago las 2 maneras xD

Si estás seguro que el comando te funciona y el error solo tiene que ver con la ruta de origen, Prueba con estos scripts (No los uses directamente desde la consola):

1º

Código (DOS) [Seleccionar] Expandir

rundll32.exe setupapi.dll,InstallHinfSection DefaultInstall 0 "%~dp0huffyuv.inf"

2º

Código (DOS) [Seleccionar] Expandir

rundll32.exe setupapi.dll,InstallHinfSection DefaultInstall 0 %~dp0huffyuv.inf



Si el error de instalación fuese por el archivo inf, Prueba así:
(Es un bat)

Código (dos) [Seleccionar] Expandir

;@Echo Off&title INF Installer
;
;Set "Code=%~f0"
;:Init
;Cls
;Echo.
;Echo. Instalando Controlador...
;rundll32.exe advpack.dll,LaunchINFSection "%Code%",DefaultInstall
;Ping -n 1 localhost >nul
;Echo. Finalizado
;Pause
;Exit /b 0

::::::::::: Codigo INF ::::


; Huffyuv AVI lossless video codec
;
; Copyright (c) 2000 Ben Rudiak-Gould
;
; This Windows 9x Installation INF File by Rainbow Software
;
[version]
signature="$CHICAGO$"

[DefaultInstall]
CopyFiles=HUF.Files.Inf,HUF.Files.Dll
AddReg=HUF.Reg
UpdateInis=HUF.INIs

[DefaultUnInstall]
DelFiles=HUF.Files.Dll,HUF.Files.Inf,HUF.Files.Ini
DelReg=HUF.Reg
UpdateInis=HUF.INIs.Del

[SourceDisksNames]
1="Huffyuv AVI lossless video codec","",1

[SourceDisksFiles]
HUFFYUV.INF=1
HUFFYUV.DLL=1

[DestinationDirs]
HUF.Files.Inf=17
HUF.Files.Dll=11
HUF.Files.Ini=25

[HUF.Files.Inf]
HUFFYUV.INF

[HUF.Files.Dll]
HUFFYUV.DLL

[HUF.Files.Ini]
HUFFYUV.INI

[HUF.Reg]
HKLM,SYSTEM\CurrentControlSet\Control\MediaResources\icm\VIDC.HFYU,Description,,"Huffyuv lossless codec [HFYU]"
HKLM,SYSTEM\CurrentControlSet\Control\MediaResources\icm\VIDC.HFYU,Driver,,"huffyuv.dll"
HKLM,SYSTEM\CurrentControlSet\Control\MediaResources\icm\VIDC.HFYU,FriendlyName,,"Huffyuv lossless codec [HFYU]"

HKLM,"Software\Microsoft\Windows NT\CurrentVersion\drivers.desc",huffyuv.dll,,"Huffyuv lossless codec [HFYU]"
HKLM,"Software\Microsoft\Windows NT\CurrentVersion\Drivers32",VIDC.HFYU,,"huffyuv.dll"

HKLM,Software\Microsoft\Windows\CurrentVersion\Uninstall\HUFFYUV
HKLM,Software\Microsoft\Windows\CurrentVersion\Uninstall\HUFFYUV,DisplayName,,"Huffyuv AVI lossless video codec (Remove Only)"
HKLM,Software\Microsoft\Windows\CurrentVersion\Uninstall\HUFFYUV,UninstallString,,"rundll.exe setupx.dll,InstallHinfSection DefaultUninstall 132 %17%\HUFFYUV.INF"

[HUF.INIs]
system.ini, drivers32,, "VIDC.HFYU=huffyuv.dll"

[HUF.INIs.Del]
system.ini, drivers32, "VIDC.HFYU=huffyuv.dll"

Si no te funciona, así:

Código (dos) [Seleccionar] Expandir

;@Echo Off&title INF Installer
;
;Set "Code=%~f0"
;:Init
;Cls
;Echo.
;Echo. Instalando Controlador...
;rundll32.exe setupapi.dll,InstallHinfSection DefaultInstall "%Code%"
;Ping -n 1 localhost >nul
;Echo. Finalizado
;Pause
;Exit /b 0


::::::::::: Codigo INF ::::


; Huffyuv AVI lossless video codec
;
; Copyright (c) 2000 Ben Rudiak-Gould
;
; This Windows 9x Installation INF File by Rainbow Software
;
[version]
signature="$CHICAGO$"

[DefaultInstall]
CopyFiles=HUF.Files.Inf,HUF.Files.Dll
AddReg=HUF.Reg
UpdateInis=HUF.INIs

[DefaultUnInstall]
DelFiles=HUF.Files.Dll,HUF.Files.Inf,HUF.Files.Ini
DelReg=HUF.Reg
UpdateInis=HUF.INIs.Del

[SourceDisksNames]
1="Huffyuv AVI lossless video codec","",1

[SourceDisksFiles]
HUFFYUV.INF=1
HUFFYUV.DLL=1

[DestinationDirs]
HUF.Files.Inf=17
HUF.Files.Dll=11
HUF.Files.Ini=25

[HUF.Files.Inf]
HUFFYUV.INF

[HUF.Files.Dll]
HUFFYUV.DLL

[HUF.Files.Ini]
HUFFYUV.INI

[HUF.Reg]
HKLM,SYSTEM\CurrentControlSet\Control\MediaResources\icm\VIDC.HFYU,Description,,"Huffyuv lossless codec [HFYU]"
HKLM,SYSTEM\CurrentControlSet\Control\MediaResources\icm\VIDC.HFYU,Driver,,"huffyuv.dll"
HKLM,SYSTEM\CurrentControlSet\Control\MediaResources\icm\VIDC.HFYU,FriendlyName,,"Huffyuv lossless codec [HFYU]"

HKLM,"Software\Microsoft\Windows NT\CurrentVersion\drivers.desc",huffyuv.dll,,"Huffyuv lossless codec [HFYU]"
HKLM,"Software\Microsoft\Windows NT\CurrentVersion\Drivers32",VIDC.HFYU,,"huffyuv.dll"

HKLM,Software\Microsoft\Windows\CurrentVersion\Uninstall\HUFFYUV
HKLM,Software\Microsoft\Windows\CurrentVersion\Uninstall\HUFFYUV,DisplayName,,"Huffyuv AVI lossless video codec (Remove Only)"
HKLM,Software\Microsoft\Windows\CurrentVersion\Uninstall\HUFFYUV,UninstallString,,"rundll.exe setupx.dll,InstallHinfSection DefaultUninstall 132 %17%\HUFFYUV.INF"

[HUF.INIs]
system.ini, drivers32,, "VIDC.HFYU=huffyuv.dll"

[HUF.INIs.Del]
system.ini, drivers32, "VIDC.HFYU=huffyuv.dll"

[magiciso]

Es cierto que un tipo de imagen ISO es ".bin", Pero eso no significa que todos los archivos de extensión .bin tengan que ser una ISO Bin, Así que intentar abrir con magiciso es tontería xD.

Los archivos .bin se pueden usar como contenedores cifrados por ejemplo en cierto tipo de APPS y VideoGames. En fin, cada uno le pone la extensión que quiere a sus archivos.

Salu2.

[Rando]

deberia ir en este foro n.n

Es que me gusta darle trabajo a Rando  Aprendiz-Oscuro

Sorry Que lo muevan.

[Windows 7 Home Premium con SP1 integrado]

Windows 7 Home Premium con SP1 integrado

Español x86: http://msft.digitalrivercontent.net/win/X17-58857.iso
Español x64: http://msft.digitalrivercontent.net/win/X17-58859.iso

English x86: http://msft.digitalrivercontent.net/win/X17-58996.iso
English x64: http://msft.digitalrivercontent.net/win/X17-58997.iso


Windows 7 Profesional con SP1 integrado

Español x86: http://msft.digitalrivercontent.net/win/X17-58866.iso
Español x64: http://msft.digitalrivercontent.net/win/X17-58868.iso

English x86: http://msft.digitalrivercontent.net/win/X17-59183.iso
English x64: http://msft.digitalrivercontent.net/win/X17-59186.iso


Windows 7 (N) Profesional con SP1 integrado

Español x86: http://msft.digitalrivercontent.net/win/X17-58871.iso
Español x64: http://msft.digitalrivercontent.net/win/X17-58874.iso

English x86: http://msft.digitalrivercontent.net/win/X17-59335.iso
English x64: http://msft.digitalrivercontent.net/win/X17-59337.iso


Windows 7 Ultimate con SP1 integrado

Español x86: http://msft.digitalrivercontent.net/win/X17-58877.iso
Español x64: http://msft.digitalrivercontent.net/win/X17-58879.iso

English x86: http://msft.digitalrivercontent.net/win/X17-59463.iso
English x64: http://msft.digitalrivercontent.net/win/X17-59465.iso



Activador DAZ Loader v2.2.1



Descarga



Kit de instalación automatizada de Windows® (WAIK) para Windows® 7



Descarga en Español
Descarga en English



Complemento del Kit de instalación automatizada de Windows® (WAIK) para Windows® 7 SP1

El complemento del Kit de instalación automatizada de Windows (WAIK) para Windows 7 SP1 es una actualización opcional de AIK para Windows 7 que le ayuda a instalar, personalizar e implementar Microsoft Windows 7 SP1.

Descarga en Español
Descarga en English



GimageX

GImageX is a graphical user interface for the ImageX tool from the Windows Automated Installation Kit v2.0 (WAIK). ImageX is used to capture and apply WIM images for Windows XP, Windows Vista and Windows 7 desktop deployments.



Descarga



RT Se7en Lite

RT Se7en Lite is to customize windows 7 operating system and to make it lite.
You can add wallpapers, Icons, themes, integrate updates, drivers, language packs, applications, remove components, enable or disable features, unattended installation settings, bootable ISO and USB creator , etc.



Descarga x86
Descarga x64



Windows 7 USB/DVD Download Tool

Windows 7 USB/DVD Download Tool Creates and Makes Bootable DVD Disc or USB Flash/Hard Drive from ISO Image.



Descarga en Español
Descarga en English

[Java]

Es una carpeta de Java (Java Runtime Envoirement)

No la borres

Saludos

[FileUtils.move]

Hola

Verán tengo un problema con el módulo FileUtils.move...

Si estos 2 archivos existen:

1º - C:\ABC.mp3
2º - D:\ABC.mp3

Imaginen que tenemos el 2º archivo abierto (Reproduciendose en winamp por ejemplo)
Ahora intentamos usar FileUtils.move para mover el 2º archivo, al directorio 1º. El archivo obviamente no se puede reemplazar, el FileUtils.move dará "error de acceso" pero a pesar de eso, FileUtils.move elimina el archivo 1º y desaparece!.

Y entonces nos queda esto:

1º - (NADA)
2º - D:\ABC.mp3


¿Se puede hacer algún tipo de "test" para que no elimine el archivo a reemplazar si da Errno::EACCES?
Lo que quiero decir, Es que primero se asegure de que la operación no va a dar error, Para que no elimine el archivo 1ª si el 2º no se puede mover.

Creo que por ahí leí algo como: FileUtils.test.move pero no estoy seguro...

También he visto    FileUtils::NoWrite, PEro no he visto ningún ejemplo de como usarlo, Ni tampoco se si sirve para lo que necesito.

Muchas gracias.



El code que tengo por si sirve para más información es este:

Código (ruby) [Seleccionar] Expandir

# -*- coding: UTF-8 -*-

# Mueve archivos desde un punto de origen hasta un punto de destino
# Pensado para usarlo como replazamiento del "SendTo" de Windows.
#
# (Requiere el uso de argumentos)


# Módulos

require "FileUtils"
require 'dl'

exit if Object.const_defined?(:Ocra)


# Variables constantes

BUTTONS_OKCANCEL = 1
BUTTONS_YESNO = 4
CLICKED_CANCEL = 2
CLICKED_YES = 6
CLICKED_NO = 7


# Métodos

def help()
print "\nSe requiere al menos 1 archivo de origen.\n\n\n"
print "Modo de empleo: \n\n"
print ' Mover.rb [Destino] [Archivo de origen 1] [Archivo de origen 2] [etc...]' + "\n\n\n"
print 'Ejemplo: (Mover tres archivos al directorio de destino "C:"' + "\n\n"
print ' Mover.rb "C:\" "D:\Archivo1.txt" "E:\Archivo2.jpg" "F:\Archivo3.mp3"' + "\n\n"
Process.exit
end

def message_box(txt, title='', buttons='')
   user32 = DL.dlopen('user32')
msgbox = DL::CFunc.new(user32['MessageBoxA'], DL::TYPE_LONG, 'MessageBox')
r, rs = msgbox.call([0, txt, title, 3].pack('L!ppL!').unpack('L!*'))
   return r
end

def force_move(source_file, dest_file)
 FileUtils.mv $archivo, ARGV[0]
 rescue Errno::EACCES
  response = message_box("El archivo esta en uso:\n" + $archivo  + "\n\n Reintentar?", "Reintentar?", BUTTONS_OKCANCEL)
if response == CLICKED_YES
      retry
  elsif response == CLICKED_CANCEL
      Process.exit
 end
end


# Control de errores

if ARGV.empty? == true
help()
elsif ARGV.length < 2
help()
elsif File.directory?(ARGV[0]) == false
print "\n El directorio de destino no existe: " + (ARGV[0]) + "\n"
Process.exit
end

for archivo in ARGV[1..ARGV.length].each
if File.exist?(archivo) == false
print "\n El archivo a mover no existe: " + archivo + "\n"
end

end


# Proceso

for $archivo in ARGV[1..ARGV.length].each

if File.exist?(ARGV[0] + "\\" + $archivo.split('\\').last)
response = message_box("Origen:\n" + $archivo + "\n\n Destino:\n " + ARGV[0] + "\\" + $archivo.split('\\').last + "\n\n El archivo de destino ya existe, Reemplazar archivo?", "Reemplazar archivo?", BUTTONS_YESNO)
if response == CLICKED_YES
  force_move($archivo, ARGV[0])
  elsif response == CLICKED_CANCEL
  Process.exit
end
else
force_move($archivo, ARGV[0])
end

end


# Fin
Process.exit

Ya lo he conseguido, he salido del "proceso" para llamar un método y así sí...

Aunque sigo teniendo un pequeño problema, mejor lo comento en otro post.

un saludo

Código (ruby) [Seleccionar] Expandir

# -*- coding: UTF-8 -*-

# Mueve archivos desde un punto de origen hasta un punto de destino
# Pensado para usarlo como replazamiento del "SendTo" de Windows.
#
# (Requiere el uso de argumentos)


# Módulos

require "FileUtils"
require 'dl'

exit if Object.const_defined?(:Ocra)


# Variables constantes

BUTTONS_OKCANCEL = 1
BUTTONS_YESNO = 4
CLICKED_CANCEL = 2
CLICKED_YES = 6
CLICKED_NO = 7


# Métodos

def help()
print "\nSe requiere al menos 1 archivo de origen.\n\n\n"
print "Modo de empleo: \n\n"
print ' Mover.rb [Destino] [Archivo de origen 1] [Archivo de origen 2] [etc...]' + "\n\n\n"
print 'Ejemplo: (Mover tres archivos al directorio de destino "C:"' + "\n\n"
print ' Mover.rb "C:\" "D:\Archivo1.txt" "E:\Archivo2.jpg" "F:\Archivo3.mp3"' + "\n\n"
Process.exit
end

def message_box(txt, title='', buttons='')
    user32 = DL.dlopen('user32')
msgbox = DL::CFunc.new(user32['MessageBoxA'], DL::TYPE_LONG, 'MessageBox')
r, rs = msgbox.call([0, txt, title, 3].pack('L!ppL!').unpack('L!*'))
    return r
end

def force_move(source_file, dest_file)
  FileUtils.mv $archivo, ARGV[0]
  rescue Errno::EACCES
   response = message_box("El archivo esta en uso:\n" + $archivo  + "\n\n Reintentar?", "Reintentar?", BUTTONS_OKCANCEL)
if response == CLICKED_YES
         retry
    elsif response == CLICKED_CANCEL
         Process.exit
  end
end


# Control de errores

if ARGV.empty? == true
help()
elsif ARGV.length < 2
help()
elsif File.directory?(ARGV[0]) == false
print "\n El directorio de destino no existe: " + (ARGV[0]) + "\n"
Process.exit
end

for archivo in ARGV[1..ARGV.length].each
if File.exist?(archivo) == false
print "\n El archivo a mover no existe: " + archivo + "\n"
end

end


# Proceso

for $archivo in ARGV[1..ARGV.length].each

if File.exist?(ARGV[0] + "\\" + $archivo.split('\\').last)
response = message_box("Origen:\n" + $archivo + "\n\n Destino:\n " + ARGV[0] + "\\" + $archivo.split('\\').last + "\n\n El archivo de destino ya existe, Reemplazar archivo?", "Reemplazar archivo?", BUTTONS_YESNO)
if response == CLICKED_YES
  force_move($archivo, ARGV[0])
  elsif response == CLICKED_CANCEL
  Process.exit
end
else
force_move($archivo, ARGV[0])
end

end


# Fin
Process.exit

[python]

En batch? Eso es una porquería.

Archivo 01.mp3
Archivo 02.mp3
Archivo 03.mp3

Así, no?

Es MUY fácil, Solo hay que setear un número, y un FOR que vaya aumentando el número y los vaya renombrando...
Aunque me niego a hacer un code que renombre archivos en batch, ya que sinceramente y por experiencia propia te digo que es una basura para esa taréa.

Mejor aprende lo básico de python o ruby para hacerlo, O usa este programa que te RECOMIENDO:

http://download.beroux.com/renameit-setup.exe




PD: Para renombrar en batch se usa el comando "Ren" que también de puede usar como "Rename".

Código [Seleccionar] Expandir

Rename "archivo" "Archivo renombrado"

Salu2