scriptlib/BatchFiles/PickUpCopy.bat

   1 @echo off\r
   2 call :SetVariables "%~0"\r
   3 \r
   4 %close_at_end%  %cscript% //nologo "%vbslib_root%\vbslib Prompt.vbs"  PickUpCopy  %1 %2 %3 %4 %5 /pause\r
   5 pause\r
   6 \r
   7 goto :eof\r
   8 \r
   9 \r
  10 REM ********************************************************************\r
  11 REM  Function: SetVariables\r
  12 REM ********************************************************************\r
  13 :SetVariables\r
  14 if     "%ProgramFiles(x86)%" == ""  set cscript=cscript\r
  15 if not "%ProgramFiles(x86)%" == ""  set cscript=%windir%\SysWOW64\cscript.exe\r
  16 \r
  17 set close_at_end=\r
  18 set not_close=cmd.exe /K\r
  19 \r
  20 call :GetParentPath "%~1"\r
  21 call :GetParentPath "%ret%"\r
  22 call :GetParentPath "%ret%"\r
  23 set vbslib_root=%ret%\r
  24 \r
  25 goto :eof\r
  26 \r
  27 \r
  28 REM ********************************************************************\r
  29 REM  Function: GetParentPath\r
  30 REM ********************************************************************\r
  31 :GetParentPath\r
  32 set ret=%~dp1\r
  33 set ret=%ret:~0,-1%\r
  34 goto :eof\r