MemoSoup » Windows & DOS

AutoIt: script for hotkeys usage

admin — Fri, 08 Apr 2011 17:15:02 +0000

This script allows You to define the global Windows hotkeys via the configuration file.

The syntax of the config file is simple:

Hotkey,Program,Parameters

Here “Hotkey” is the combination of the keyboard key with one of the identifiers:

^ Ctrl
! Alt
+ Shift
# Windows-Key

Example:

;Win+C – start calculator
#{c},calc.exe

;Win+Shift+N – start notepad
+#{n},notepad.exe

;Win+N – start notepad++ together with apploc.exe
#{n},%windir%\AppPatch\AppLoc.exe,”%ProgramFiles%\Notepad++\notepad++.exe” -nosession /L0419

#Include <File.au3>

; ^ Ctrl
; ! Alt
; + Shift
; # Windows-Key

Global $MATRIX_SIZE = 1
Global $aMatrix[$MATRIX_SIZE][3]
Global ENUM $POS_HOTKEY = 0, $POS_PROGRAM, $POS_PARAM

Global $sPATH, $sProgramFiles, $sAppData
AutoItSetOption("TrayAutoPause",1)
AutoItSetOption("TrayMenuMode",1)

$mnuReadSettings = TrayCreateItem("Read settings")
$mnuHelp = TrayCreateItem("Help")
TrayCreateItem("")
$mnuExit = TrayCreateItem("Exit")

Func read_settings()

Local $aTMPArray
FileChangeDir (@scriptdir )
If Not _FileReadToArray("hotkeys.txt",$aTMPArray) Then
MsgBox(4096,"Error", " Error reading hotkeys.txt@CRLF error:" & @error)
Exit
EndIf
if ( $aTMPArray[0] = 0 ) Then
MsgBox(4096,"Error", " No hotkeys defined")
Exit
EndIf

$MATRIX_SIZE = $aTMPArray[0]
ReDim $aMatrix[$MATRIX_SIZE][3]

AutoItSetOption("ExpandEnvStrings",1)

$i = 0
for $i_tmp = 1 to $MATRIX_SIZE

if ( StringLen($aTMPArray[ $i_tmp ]) = 0 or StringLeft( $aTMPArray[ $i_tmp ] , 1) = ";" ) Then
ContinueLoop
EndIf

$aCurLine = StringSplit( $aTMPArray[ $i_tmp ], ",;", 2 )
$lCurLine = UBound( $aCurLine )

if ( $lCurLine<2 or $aCurLine[ $POS_HOTKEY ] = "" or $aCurLine[ $POS_PROGRAM ] = "" ) Then
MsgBox(4096,"Error", " No program or hotkey defined: " & $aTMPArray[ $i_tmp ] )
Exit

EndIf

; Are the parameters for the command line?
if ($lCurLine = 2 ) Then
$sParam = ""
Else
$sParam = $aCurLine[$POS_PARAM]
EndIf

Switch $aCurLine[$POS_PROGRAM]
Case "SPECIAL"
HotKeySet($aCurLine[$POS_HOTKEY], "_run_special" )
Case Else

$aMatrix[$i][$POS_HOTKEY] = $aCurLine[$POS_HOTKEY]

$aMatrix[$i][$POS_PROGRAM] = $aCurLine[$POS_PROGRAM]

$aMatrix[$i][$POS_PARAM] = $sParam

$aMatrix[$i][$POS_PROGRAM] = $aMatrix[$i][$POS_PROGRAM] & " " & $aMatrix[$i][$POS_PARAM] ;

HotKeySet($aMatrix[$i][$POS_HOTKEY],"_run_it" )

$i = $i + 1 ;

EndSwitch

Next

AutoItSetOption("ExpandEnvStrings",0)

EndFunc

Func _run_special()
MsgBox(0 , "No action", "Reserved for future use" )
EndFunc

Func _run_it()
For $i = 0 to $MATRIX_SIZE - 1
if( $aMatrix[$i][$POS_HOTKEY] = @HotKeyPressed ) Then
Run( $aMatrix[$i][$POS_PROGRAM] )
ExitLoop
EndIf
Next
EndFunc

Func show_help()
Local $helpMessage = ""

for $i = 0 to $MATRIX_SIZE - 1
$helpMessage = $helpMessage & $aMatrix[$i][$POS_HOTKEY] & " " & $aMatrix[$i][$POS_PROGRAM] & @CRLF
Next

MsgBox(0,"Help", $helpMessage )
EndFunc

; ##### Main ######
read_settings()
While 1
$msg = TrayGetMsg()
Select
Case $msg = $mnuReadSettings
read_settings()
case $msg = $mnuHelp
show_help()
Case $msg = $mnuExit
Exit
EndSelect

sleep(100)
WEnd

WHICH command for DOS

admin — Mon, 21 Sep 2009 11:59:34 +0000

If You need the analog of Unix ‘which’ command and do not have Resource Kit, the following batch file will help.
The code was found on www.ss64.com
Published with the permission of the author, Clay Calvert.

@echo off
SETLOCAL
(set WF=)

:: Look for file in the current directory

for %%a in ("" %!!%) do (
if not defined WF if exist "%~1%%~a" set WF=%CD%\%~1%%~a)

:: Look for file in the PATH

for %%a in ("" %!!%) do (
if not defined WF for %%g in ("%~1%%~a") do (
if exist "%%~$PATH:g" set WF=%%~$PATH:g))

:: Store the Help Error message

if NOT "%~x1"=="" goto:END
for /f "delims=." %%a in ('help.exe *') do set HlpErr=%%a

:: If command missing from Help, goto end

help.exe "%~1" |find "%HlpErr%">nul && goto:END

:: Listed in help so find file in System32

for %%a in (exe com) do (
if /i "%WF%"=="%windir%\system32\%~1.%%a" goto:END)

:: File not in System32, so must be an internal command

set WF="%~1" is an internal command

:END
if defined WF (echo.%WF%) else (
echo The file: "%~1" was not found)

:: Credits:
:: Clay Calvert
:: alt.msdos.batch.nt

Start sqlplus in Windows .BAT script

admin — Mon, 24 Aug 2009 22:37:30 +0000

Here is the example of emulating “HERE-documents” in Windows shell.

@ECHO OFF

FIND "/*%none% some_label" <%0 |sqlplus USER/PASS@SERVER

GOTO end

: ----------- embedded SQL-------------------------

/* some_label */ select count(*) from dba_free_space;
/* some_label */ select tablespace_name from dba_tablespaces;

: ----------- end of embedded SQL-------------------------

:end

It’s also possible to use procedures in .bat files.
%none% is replaced by empty string.
Spaces are mandadory in “/* some_label */” string.

Another possibility:

@(
echo select global_name from global_name ;
) | sqlplus USER/PASS@SERVER