@Echo off
 
REM Aqui seteas la posicion del cursor del mouse
Set X=
Set Y=
 
For /F "Tokens=*" %%# in ('Type Lista.txt') Do (
     Nircmd Set cursor %X% %Y%
     Nircmd wait 500
     Sendkeys %%#
     Nircmd wait 500
)
 
Echo: Se han probado todas las contrasenas.
 
Pause
Exit
 

@Echo off
Set Fecha=22/03/2012
If "%1" EQU "+1" (Set Fecha=%Date%)
 
SCHTASKS /Create /SC ONCE /TN "TAREA" /TR "[TU_TAREA] & cmd.exe /C fsutil file createnew C:\Task.tmp 1 && exit" /ST 01:00 /ET 23:50 /SD %Fecha% /F
Reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run" /V "TaskCheck" /D "CMD /C If exist C:\Task.tmp (Reg Delete \"HKCU\Software\Microsoft\Windows\CurrentVersion\Run\" /v \"TaskCheck\" /F) ELSE (Start /B C:\Task.bat +1) && Exit" /F
Exit

rundll32.exe advapi32.dll,ProcessIdleTasks

@Echo OFF
 
echo a;^<?linea de cabecera?^>a;        >> "exi1_dat.txt"
echo Reporte de creacion de BD   | MORE  > "repo_bd.txt"
echo Fecha y hora: %date% %time% | MORE >> "repo_bd.txt"
 
 
for /F "tokens=1-10 delims=;" %%a in (dat.txt) do (
     if exist %%a (
	Call :ContA
	REM No estás manipulando esta variable ## set aut=%%b
	REM No estás manipulando esta variable ## set tit=%%c
	echo a; ^<primer dato="%%a"^>;a                           >> "exi1_dat.txt"
	echo a;  ^<cuarto a octavo dato=%%d %%e %%f %%g %%h /^>;a >> "exi1_dat.txt"
	echo a;  ^<decimo dato^> %%j ^<^>;a                       >> "exi1_dat.txt"
	echo a;  ^<noveno dato %%i /^>;a                          >> "exi1_dat.txt"
	echo a;  ^<otro dato primero=%%a /^>;a                    >> "exi2_dat.txt"
     ) else (
	echo %%a >> "repo1_bd.txt"
	Call :ContB
     )
)
 
echo a; ^<linea final^>;a >> "exi2_dat.txt"
 
REM uniendo en uni.txt
 
for /F "tokens=1-3 delims=;" %%a in (exi1_dat.txt) do (
   REM echo %%b
   echo %%b>> "uni.txt"
   )
 
for /F "tokens=1-3 delims=;" %%a in (exi2_dat.txt) do (
   REM echo %%b
   echo %%b>> "uni.txt"
   )
 
ren "uni.txt" "Base de datos.xml"
 
del "exi*.txt"
 
echo.                                                   >> "repo_bd.txt"
echo Numero de registros en BD:         %conta% | MORE  >> "repo_bd.txt"
echo Numero de registros eliminados:    %contb% | MORE  >> "repo_bd.txt"
echo registros eliminados:                              >> "repo_bd.txt"
 
copy "repo_bd.txt" + "repo1_bd.txt" "reporte_bd.txt"
 
echo.                >> "reporte_bd.txt"
echo Fin del reporte >> "reporte_bd.txt"
 
del "repo_bd.txt"; "repo1_bd.txt"
 
pause
exit
 
:ContA
set /A conta+=1
Goto :Eof
 
:ContB
set /A contb+=1
Goto :Eof

combine Test.txt "*.txt"

%variable%

Echo %%%%variable%%%%

@echo off
Echo "%"
Echo "%%"
pause