Por defecto los subtítulos que tengan un nombre igual al del video son cargados automáticamente por VLC y MPC-HC, por ejemplo: "video.avi" y "video.str" (MCKSys Argentina explica también la distinción de idiomas)

También es posible cargarlos manualmente, desde VLC en el menú Subtítulos y en MPC-HC desde el menú Archivo > Subtítulos

Se usa el contenedor AVI con los codec MPEG-4 y MP3 por compatibilidad, por defecto AVI no soporta incrustarle subtítulos, estos tienen que ir en archivos separados y también por compatibilidad en .SRT, la otra opción es pegarlos al video pero una vez pegados no se pueden quitar. Por último se puede usar otro contenedor como MP4 o MKV que si soportan nativamente incrustar subtítulos, pero ya dependerá del medio en el que quieras reproducir estos videos y su compatibilidad para con el video resultante

1. Esto es debido al UAC (Control de Cuentas de Usuario) que se introdujo desde Windows Vista. Por defecto solo el usuario "Administrador" tiene permitido saltarse el UAC. Si quieres usar otro Usuario tienes que deshabilitar la UAC o configurar para que TODOS los usuarios con permisos de administrador puedan saltársela.

2. Depende del Intérprete que estés utilizando, Script.exe y WScript.exe (.vbs) tienen innato el objeto WSCript, pero si usas otro intérprete como mshta.exe (.hta .htm, etc) u otro, pues ellos tienen otro objeto o directamente usar CreateObject como lo has hecho.

3. Si, como puse en mi primer mensaje, solo que tienes que considerar escapar las comillas si las vas a necesitar.

4. El script que puse está hecho para PCs remotas con IP válidas porque así lo requiere Reg.exe y CmdKey.exe, aunque puedes poner la IP de tu PC local (no loopback) pero debes iniciar el servicio de registro remoto. Lo mejor sería usar: pc = "." de esa manera Reg entenderá que es tu propia PC local y no requerirá nada de permisos remotos, CmdKey dará un error interno oculto pero el script funcionará sin problemas.

No existe algo tal cual buscas, deberías acostumbrarte a usar el menú inicio, es decir, presionar Win y escribir las primeras letras del programa que necesites, este menú inicio aprende con el tiempo, si en un inicio por ejemplo para iniciar Chrome tuviste que escribir: chro, para las siguientes te bastará ch o incluso solo c, al final le das un Enter para que inicie el programa resaltado.

La siguiente opción es crearte un script o exe con tus atajos de teclado como AutoHotKey y llevarlo a las PC que quieras, pero ya es depender de dicho script

El nuevo método que estás implementando no requiere del servicio de Registro Remoto, sin embargo a nivel básico requiere tener habilitado el usuario Administrador con contraseña y puesto en el Firewall la Administración Remota. PERO lo más importante es el envío de credenciales que desde VBScript puro no lo vas a poder hacer, tendrías que usar RunAs.exe para hacer el envío de credenciales, por ejemplo:

En la PC Remota/Servidor (192.168.0.102):

:: Activar la cuenta de Administrador y ponerle un password (12345)
Net User Administrador /Active:Yes
Net User Administrador 12345
 
:: Activar la Administración Remota en el Firewall
NetSh Firewall Set Service RemoteAdmin Enable

En la PC Cliente:

:: Crear el Script, por ejemplo "RemoteRegRead.vbs":
Const HKLM = &H80000002
pc = "192.168.0.102"
Set oReg = GetObject("winmgmts:\\" & pc & "\root\default:StdRegProv")
key = "SOFTWARE\Microsoft\Windows NT\CurrentVersion"
value = "ProductName"
oReg.GetStringValue HKLM, key, value, rpta
Wscript.Echo "Rpta: " & rpta
 
:: Usar RunAs para usar las credenciales y ejecutar el script
RunAs /NetOnly /User:Administrador "WScript C:\Users\EdSon\Desktop\RemoteRegRead.vbs"

Ahora bien, si no quieres usar RunAs.exe tendrías que dejar prácticamente sin protección al Servidor para deshabilitar toda obstrucción, esto incluso es algo complejo porque no suele venir fácilmente documentado.


Si tu intención es solo guardar el resultante en una variable, puedes usar un método sencillo, por ejemplo el primero que planteé con Reg.exe o este último con RunAs.exe o usando herramientas de terceros como PSExec. El ejemplo para hacerlo con Reg.exe sería el siguiente:

En la PC Remota/Servidor (192.168.0.102):

:: Activar la cuenta de Administrador y ponerle un password (12345)
Net User Administrador /Active:Yes
Net User Administrador 12345
 
:: Ejecutar el servicio de Registro Remoto
Net Start RemoteRegistry
 
:: Activar Compartir Archivos e Impresoras en el Firewall
NetSh Firewall Set Service FileAndPrint Enable

En la PC Cliente:

' Crear el Script, por ejemplo "RemoteRegQuery.vbs":
pc = "192.168.0.102"
Set sh = WScript.CreateObject("WScript.Shell")
cmd = "CmdKey /Add:" & pc & " /User:Administrador /Pass:12345"
sh.Exec(cmd)
cmd = "Reg Query ""\\" & pc & "\HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion"" /V ProductName"
Set rpta = sh.Exec(cmd)
variable = rpta.StdOut.ReadAll()
Call WScript.Echo(variable)

Con ello obtendrías en variable el resultado de usar el comando Reg.exe, en mi caso:


Obviamente el Script debe ser ejecutado como administrador, a partir de ahí puedes parsear el resultado por ejemplo con Split:

value = Split(Split(variable, vbCrLf)(2), "    ")(3)
Call WScript.Echo("_" & value & "_")

Bueno, esa sería la idea de usar comandos externos y recuperar su salida.

Saludos,

El único detalle es que estás usando un StringVar pero no estás extrayendo su valor correctamente, solo reemplaza tu línea 7 por:

        datetime.strptime(fecha.get(), '%d/%m/%Y')

PowerShell viene incluido por defecto desde Windows 7, las instrucciones que utilizas son de las clásicas así que no debería haber problemas.

Con respecto a que aún no te funciona, pues seguramente tu Batch no está guardado como UTF-8, usa un editor de texto/código decente como Notepad3, Notepad++ o SublimeText y asegúrate de guardar tu archivo con codificación UTF8 sin BOM

Si no quieres usar PowerShell, puedes usar Batch puro y duro:

Set "_ReadMe=%WinDir%\Temp\ReadMe.txt"
Set "yo=%~f0"
Del %_ReadMe% >NUL 2>&1
Call :export txt "%_ReadMe%"
Start notepad "%_ReadMe%"
Exit /B
 
:export
For /F "tokens=1 delims=:" %%a In ('FindStr /X /N ":%1:" %yo%') Do More %yo% +%%a > %2
Exit /B
 
:txt:
Aplicación
Expañol
Inglés
Ñandú

La ventaja es que tomará la codificación de tu Batch sea cual sea: ANSI, UTF-8, etc y el archivo resultante también tendrá la misma codificación por lo que siempre debería mostrar las cosas tal cual se ven.

Hace dos semanas MoviStar me metió dentro de una NAT con IP pública 100.x.x.x, obviamente no había manera de "abrir puertos" así, llamé y les dije que tengo un servidor web y necesito una IP Pública sin NAT, luego de algunos intentos al fin me volvieron a poner una IP pública directa del tipo 190.x.x.x

Primero debes hacer un Test en Local en tu Red LAN, configura tu Firewall, tu IP Local e intenta acceder desde otra PC en tu misma Red, minimamente esto debe funcionarte. Luego recién puedes ir a tu Router y hacer el PortForwarding para salir a Internet, en el mismo Router dice en WAN tu IP pública que debe coincidir con la IP que te muestran páginas del tipo CualEsMiIP, si no coincide es que estás dentro de una SubRed o NAT y no podrás Servir.

Las MAC siempre son visibles, no las puedes esconder. No estoy seguro pero AirCrack no es capaz de mostrarte la clave WiFi así de fácil XD, seguramente auditaste tu WiFi y ahí sacó tu clave porque es muy sencilla o está en un WordList o tu Router tiene alguna deficiencia como un PIN WPS viejo, a los nuevos no se les puede hacer fuerza bruta, a los pocos intentos te bloquea y pone a esperar mucho más tiempo, si es viejo si se le puede hacer fuerza bruta por lo que se recomienda deshabilitar el WPS.

Por defecto PowerShell trabaja con UTF8, no es necesario especificar esa codificación si esa es la que vas a utilizar. De todas maneras tu estás especificando que use ASCII, por eso no te guarda bien los acentos, el siguiente ejemplo funciona perfectamente:

Set "_ReadMe=%WinDir%\Temp\ReadMe.txt"
Set "yo=%~f0"
Del %_ReadMe% >NUL 2>&1
Call :export txt "%_ReadMe%"
Start notepad "%_ReadMe%"
Exit /B
 
:export
PowerShell $f=[io.file]::ReadAllText('%yo%') -Split ':%~1:';[io.file]::WriteAllText('%~2',$f[1].Trim())
Exit /B
 
:txt:
Aplicación
Expañol
Inglés
 
:txt:

Si lo deseas puedes especificar la codificación UTF8:

[io.file]::WriteAllText('%~2',$f[1].Trim(),[System.Text.Encoding]::UTF8)

Depende mucho de como esté conformado tu archivo de txt, recuerda que Find y FindStr buscan en líneas. Suponiendo que tienes cada serial únicamente en una línea por ejemplo:


- Nótese la penúltima línea tiene un espacio delante y la última tiene un espacio al final

:: Buscar 123456789 exacto en una linea
FindStr /B /E "123456789" archivo.txt
123456789

/B especifica que la línea empiece con el texto buscado, y /E especifica que la línea termine con el texto buscado. FindStr es un comando muy potente, puedes ver la referencia de comandos en español en la ayuda de la Consola o más recomiendo descargar la referencia en formato CHM que es más detallada y muestra ejemplos (extraído de un Windows XP, debes usar el INDICE):
https://mega.nz/file/woBkmJIJ#eHbMbUIRW2u0SGlFx9h-_gyUE0jQHD-A7irGe3wvxsY