Home Links Batch

Win-9x & Batch Tips
.



C:\WINDOWS\SendTo\MS-DOS Editor.pif

Place a shortcut to your MS-DOS Editor in your Sendto folder.


Call BATch from a HTML document

   UNDER CONSTRUCTION: Down.htm



Pfe32-Editor. 1. Association - The unknown files. 2. Right-click a Batch file. Select Edit. @Echo off :: :: 32-bit Edition If not exist %windir%\command\pfe32.exe Goto End :: 16-bit Edition :: For %%v in (.exe dos.exe dos.pif) do If not exist %windir%\command\pfe%%v Goto End For %%v in (C: "CD %TEMP%\") do %%v Echo REGEDIT4> some#tmp.reg :: 1 Echo.>> some#tmp.reg Echo [HKEY_CLASSES_ROOT\Unknown\shell\open\command]>> some#tmp.reg Echo @="PFE32.EXE %%1">> some#tmp.reg Echo.>> some#tmp.reg :: 2 Echo.>> some#tmp.reg Echo [HKEY_CLASSES_ROOT\batfile\shell\edit\command]>> some#tmp.reg Echo @="PFE32.EXE %%1">> some#tmp.reg Echo.>> some#tmp.reg Start/w some#tmp.reg del some#tmp.reg : End
New MS-DOS-batchfile @Echo off :: After this little Batch file - you can easy do :: a right click and select: New MS-DOS-batchfile :: if %1!==!! goto %1 if not exist %windir%\ShellNew\nul for %%v in (echo.Exit:[03] pause cls EXIT) do %%v if exist %windir%\ShellNew\New.bat dir /v %windir%\ShellNew\New.bat echo. if exist %windir%\ShellNew\New.bat choice/cosq This file already exist: Overwrite, Save, Quit(Esc)  if errorlevel 3 for %%v in (echo.Exit:[07] cls EXIT) do %%v if errorlevel 2 echo If you answer No! to this option - New.bat is not saved: if errorlevel 2 copy/-y %windir%\ShellNew\New.bat %windir%\ShellNew\Old.*>nul for %%v in (cls c: echo.) do %%v cd %temp%\ type %0 | find "O" | find /v "c" for %%c in (echo. echo. pause cls) do %%c ECHO REGEDIT4> SOME#TMP.reg Echo.>> SOME#TMP.reg ECHO. ECHO [HKEY_CLASSES_ROOT\.bat\ShellNew]>> SOME#TMP.reg ECHO "FileName"="New.bat">> SOME#TMP.reg Echo.>> SOME#TMP.reg ECHO. ECHO.@ECHO OFF>%windir%\ShellNew\New.bat ECHO.>>%windir%\ShellNew\New.bat ECHO.FOR %%%%C IN (ECHO. PAUSE CLS EXIT) DO %%%%C>>%windir%\ShellNew\New.bat Echo. start/w SOME#TMP.reg del SOME#TMP.reg start /max %0 ! "Make no sense, if " EXIT :! Two long lines: :: echo.%2%0 was running in a DOS-BOX%1 [AltGr+left Enter] - avoid Batchfile to be minimized into icon size for %%v in (   The˙New˙Batchfile rightclick˙option will˙be˙available after˙one˙restart ) do echo.%%v choice /crsq  Reboot, Shuts down, Quit(Esc)  if errorlevel 03 for %%v in (Cls EXIT) do %%v if errorlevel 2 rundll32.exe User,ExitWindows rundll32.exe shell32.dll,SHExitWindowsEx 2 :: ASCII 07: . ESCape/ASCII 27: . EXIT - Kind regards, Benny - OS. Windows 98 - http://users.cybercity.dk/~bse26236/home.html August 9, 2000: Created a new template, %windir%\ShellNew\New.bat -- (Win98) @Echo off If NOT exist %Windir%\Command\What.exe Exit If NOT exist %Windir%\Command\Pfe*.exe Exit If exist %Windir%\Command\Batchm* For %%v in (Beep Cls) do Batchman %%v 127 ::Goto -------- Echo ŚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄæ Echo ³ ³ Echo ³ Press ESCape() to quit ³ Echo ³ Press minus (-) to edit ³ Echo ³ ³ Echo ĄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŁ˙ What c If %what%'==-' For %%c in ("Pfe32 /g17 %0" "Set what=" Cls Exit) do %%c If %what%'==' For %%c in ( "Set what=" Cls Exit) do %%c For %%c in ( "Set what=" Cls ) do %%c :--------------------------------------------------------------------------| :: For %%c in (Echo Pause Cls Exit) do %%c. Comments: # Print only lines which match X: Sed "/X/!d;" %0 > CON Move the following characters to the center of line number 5 & 10: ÄÄÄÄÄÄÄÄÄ

Top | batch | Index

news:alt.msdos.batch