Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @echo off
- :: immer mein Batchheader um irgendwelche Programme zu suchen und den pfad dorthin wiederzufinden.
- if exist "%temp%\%~n0.ini" (for /f "delims=" %%a in (%temp%\%~n0.ini) do ( set %%a) & goto :imported)
- echo suche cmdow...
- for /f "delims=" %%F in ('dir /b /s "c:/xcmdow.exe" 2^>nul') do (set "self.cmdow=%%~fsF" && goto found)
- echo cmdow nicht gefunden
- start "" https://ritchielawrence.github.io/cmdow/
- ping localhost -n 10 >nul
- exit
- :found
- echo gefunden: %self.cmdow%
- set self. >"%temp%\%~n0.ini"
- :imported
- :var
- :main
- ::suche nach fenster mit %searchText% im Titel und speichere den Hanlde darauf in einer Variablen
- ::keine Ahnung wie der richtige Fenstertitel der MCconsole lautet? ersetze meine Fiktion durch den richtigen
- set "searchText=Minecraft-console"
- for /f " tokens=1-8* " %%a in ('%self.cmdow% /t /f /b ^|find /i "%searchText%"') do (
- echo Handle=%%a PID%%c Image=%%h Fensterbeschreibung=%%i
- set "myhandle=%%a"
- )
- ping localhost -n 10 >nul
- rem MC-Console aktiv setzen, denn in dieses fenster soll ja geschrieben werden
- %self.cmdow% %myhandle% /ACT
- rem Anweisung senden
- echo Set WshShell = WScript.CreateObject("WScript.Shell") >myscript.vbs
- echo WshShell.SendKeys "/save_all" >>myscript.vbs
- echo WshShell.SendKeys "{ENTER}" >>myscript.vbs
- cscript //nologo myscript.vbs
- rem keine Ahnung wie lange das Speichern Dauert? 60 sec?
- ping localhost -n 10 >nul
- rem Hier Anweisungen zum backup
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement