Updating -> Cut FileNameString (Batch Code)

Updating -> Cut FileNameString (Batch Code)

Postby UranusOne » 14.02.2012, 04:52

I suggest this code for get a better view of the files that are being checked/installed. This will shorten the length of line, showing a more clean interface.
My intention is not to amend the logging of each update... Only, show file name a little shorter in the offline update progress. It would be an esthetic touch!

Try this example...

File 1 ( _ListShort.cmd )
Code: Select all
@ECHO OFF
::_ListShort.cmd

:: WSUSOFFLINE CLIENT DIR
set FolderPath=F:\wsusoffline730\client

echo. & echo.
echo. Creating List
echo. & echo.

::List Dirs
   FOR /F "usebackq delims==" %%c IN (`dir  %FolderPath% /Ad-a /b /l /s `) DO (
      echo.
      echo.
      echo Listening Dir: %%c
      echo.
      
      :: Send Dir Listed
      FOR /F "usebackq delims==" %%i IN (`dir  %%c /a /-d /b /l `) DO (
            CALL getfilename.cmd %%i
      )

      ::List SubDirs on Dir Listed
      FOR /F "usebackq delims==" %%d IN (`dir  %%c /Ad-a /b /l /s `) DO (
         echo.
         echo.
         echo Listening Dir: %%d
         echo.
         
         :: Send Dir Listed on SubDirs
         FOR /F "usebackq delims==" %%i IN (`dir  %%d /a /-d /b /l `) DO (
            CALL getfilename.cmd %%i
         )

      )

      echo.
      PAUSE.
      
   )

echo. & echo.
echo. Finish... & echo.
pause.
exit




File 2 ( getfilename.cmd )
Code: Select all
@ECHO OFF
::getfilename.cmd

IF [%1]==[] GOTO ending

SET SourceFile=%1
SET extension=%SourceFile:~-4%
SET TmpFileName=%SourceFile:~,-44%
SET Separator=%TmpFileName:~-1%
SET SourceFileNewB=%SourceFile:~,-45%

rem echo Installing: %SourceFile%
rem echo. %extension%
rem echo. %TmpFileName%
rem echo. %Separator%
rem echo. %SourceFileNewB%
rem echo.
rem pause.

IF %extension%==.exe Goto _GetShortFileName
IF %extension%==.cab Goto _GetShortFileName
IF %extension%==.msu Goto _GetShortFileName
IF %extension%==.msi Goto _GetShortFileName
GOTO _ending

:_GetShortFileName

   IF %Separator%==_ (
      echo. Installing: %SourceFileNewB%*%extension%
   ) ELSE (
      echo. Installing: %SourceFile%
   )


:_ending

EXIT /b




Result....

Real FileName:
    ndp20-kb928365-x64_85063df4833465a15a1cc1ed154eb9baf448a8e0.exe
Batch Cut String shows:
    ndp20-kb928365-x64*.exe

Samll Batch Run Preview:

Code: Select all

 Creating List

Listening Dir: f:\wsusoffline730\client\cpp

 Installing: vcredist2005_x64.exe
 Installing: vcredist2005_x86.exe
 Installing: vcredist2008_x64.exe
 Installing: vcredist2008_x86.exe
 Installing: vcredist2010_x64.exe
 Installing: vcredist2010_x86.exe

Presione una tecla para continuar . . .

Listening Dir: f:\wsusoffline730\client\dotnet

 Installing: dotnetfx35.exe
 Installing: dotnetfx40lp_full_x86_x64de.exe
 Installing: dotnetfx40lp_full_x86_x64es.exe
 Installing: dotnetfx40_full_x86_x64.exe

Listening Dir: f:\wsusoffline730\client\dotnet\x64-glb

 Installing: dotnetfx35langpack_x64de.exe
 Installing: dotnetfx35langpack_x64es.exe
 Installing: ndp20-kb928365-x64*.exe
 Installing: ndp20sp1-kb2416468-x64*.exe
 Installing: ndp20sp1-kb2478656-x64*.exe
 Installing: ndp20sp1-kb2530095-x64*.exe
 Installing: ndp20sp1-kb982865-x64*.exe
 Installing: ndp20sp2-kb2518864-x64*.exe
 Installing: ndp20sp2-kb2539631-x64*.exe
 Installing: ndp20sp2-kb2572073-x64*.exe
 Installing: ndp20sp2-kb2656352-x64*.exe
 Installing: ndp20sp2-kb958481-x64*.exe
 Installing: ndp20sp2-kb979909-x64*.exe
 Installing: ndp30sp2-kb958483-x64*.exe
 Installing: ndp35-kb2418240-x64*.exe
 Installing: ndp35sp1-kb2657424-x64*.exe
 Installing: ndp35sp1-kb958484-x64*.exe
 Installing: ndp40-kb2487367-x64*.exe
 Installing: ndp40-kb2518870-x64*.exe
 Installing: ndp40-kb2539636-x64*.exe
 Installing: ndp40-kb2572078-x64*.exe
 Installing: ndp40-kb2656351-x64*.exe

Listening Dir: f:\wsusoffline730\client\dotnet\x86-glb

 Installing: dotnetfx35langpack_x86de.exe
 Installing: dotnetfx35langpack_x86es.exe
 Installing: ndp1.1sp1-kb2656353-x86*.exe
 Installing: ndp1.1sp1-kb867460-x86*.exe
 Installing: ndp20-kb928365-x86*.exe
 Installing: ndp20sp1-kb2416468-x86*.exe
 Installing: ndp20sp1-kb2478656-x86*.exe
 Installing: ndp20sp1-kb2530095-x86*.exe
 Installing: ndp20sp1-kb982865-x86*.exe
 Installing: ndp20sp2-kb2478658-x86*.exe
 Installing: ndp20sp2-kb2518864-x86*.exe
 Installing: ndp20sp2-kb2539631-x86*.exe
 Installing: ndp20sp2-kb2572073-x86*.exe
 Installing: ndp20sp2-kb2656352-x86*.exe
 Installing: ndp20sp2-kb958481-x86*.exe
 Installing: ndp20sp2-kb979909-x86*.exe
 Installing: ndp30sp2-kb958483-x86*.exe
 Installing: ndp35-kb2418240-x86*.exe
 Installing: ndp35sp1-kb2657424-x86*.exe
 Installing: ndp35sp1-kb958484-x86*.exe
 Installing: ndp40-kb2487367-x86*.exe
 Installing: ndp40-kb2518870-x86*.exe
 Installing: ndp40-kb2539636-x86*.exe
 Installing: ndp40-kb2572078-x86*.exe
 Installing: ndp40-kb2656351-x86*.exe

Presione una tecla para continuar . . .

Listening Dir: f:\wsusoffline730\client\md


Presione una tecla para continuar . . .

Listening Dir: f:\wsusoffline730\client\o2k10


Listening Dir: f:\wsusoffline730\client\o2k10\esn

 Installing: officesuite2010sp1-kb2460049-x64-fullfile-es-es.exe
 Installing: officesuite2010sp1-kb2460049-x86-fullfile-es-es.exe

Presione una tecla para continuar . . .

Listening Dir: f:\wsusoffline730\client\o2k3


Listening Dir: f:\wsusoffline730\client\o2k3\esn

 Installing: office2003sp3-kb923618-fullfile-esn.exe

Presione una tecla para continuar . . .

Listening Dir: f:\wsusoffline730\client\o2k7


Presione una tecla para continuar . . .

Listening Dir: f:\wsusoffline730\client\ofc


Listening Dir: f:\wsusoffline730\client\ofc\esn

 Installing: compatibilitypacksp3-kb2526297-fullfile-es-es.exe
 Installing: fileformatconverters.exe
 Installing: gpfilt*.cab
 Installing: gpfilt*.cab
 Installing: msconv*.cab
 Installing: msconv*.cab
 Installing: olkintl*.cab
 Installing: olkintl*.cab
 Installing: snapview*.cab
 Installing: snapview*.cab
 Installing: works432*.cab

Listening Dir: f:\wsusoffline730\client\ofc\glb

 Installing: accwiz*.cab
 Installing: cdo10*.cab
 Installing: dlc-x-none*.cab
 Installing: dlc*.cab
 Installing: excel-x-none*.cab
 Installing: excel-x-none*.cab
 Installing: excel*.cab
 Installing: excel*.cab
 Installing: fm20*.cab
 Installing: fm20*.cab
 Installing: gdiplus*.cab
 Installing: groove-x-none*.cab
 Installing: groove-x-none*.cab
 Installing: groove*.cab
 Installing: ime-zh-cn*.cab
 Installing: ime-zh-cn*.cab
 Installing: ime-zh-tw*.cab
 Installing: ime-zh-tw*.cab
 Installing: infopath*.cab
 Installing: mfc11*.cab
 Installing: msaccess*.cab
 Installing: msconv97*.cab
 Installing: msconv*.cab
 Installing: mso-x-none*.cab
 Installing: mso-x-none*.cab
 Installing: mso*.cab
 Installing: mso*.cab
 Installing: msptls-x-none*.cab
 Installing: msptls-x-none*.cab
 Installing: msptls-x-none*.cab
 Installing: mspub*.cab
 Installing: mspub*.cab
 Installing: msxml5s*.cab
 Installing: msxml5s*.cab
 Installing: msxml5*.cab
 Installing: oart-x-none*.cab
 Installing: oart-x-none*.cab
 Installing: oartconv-x-none*.cab
 Installing: oartconv-x-none*.cab
 Installing: ocpgpflt*.cab
 Installing: office2010-kb2553065-fullfile-x86-glb.exe
 Installing: ofv.exe
 Installing: ork.exe
 Installing: osrchwfe-x-none*.cab
 Installing: outlook*.cab
 Installing: outlook*.cab
 Installing: owc10*.cab
 Installing: owc10*.cab
 Installing: owc10*.cab
 Installing: owc11*.cab
 Installing: owc11*.cab
 Installing: powerpnt*.cab
 Installing: powerpnt*.cab
 Installing: powerpnt*.cab
 Installing: powerpoint-x-none*.cab
 Installing: powerpoint-x-none*.cab
 Installing: powerpoint-x-none*.cab
 Installing: pplwfe-x-none*.cab
 Installing: ppsmawfe-x-none*.cab
 Installing: pptconv-x-none*.cab
 Installing: pptview-x-none*.cab
 Installing: publisher-x-none*.cab
 Installing: publisher*.cab
 Installing: shared*.cab
 Installing: usp10*.cab
 Installing: usp10*.cab
 Installing: vb6cntrls10*.cab
 Installing: vb6cntrls11*.cab
 Installing: vbe6*.cab
 Installing: vbe6*.cab
 Installing: vviewer-x-none*.cab
 Installing: vviewer-x-none*.cab
 Installing: winword*.cab
 Installing: winword*.cab
 Installing: wordview*.cab
 Installing: wordview*.cab
 Installing: wordview*.cab
 Installing: works632*.cab
 Installing: xlview*.cab

Presione una tecla para continuar . . .



(Translated Spanish)
UranusOne
 
Posts: 20
Joined: 12.11.2010, 10:05

Re: Updating -> Cut FileNameString (Batch Code)

Postby WSUSUpdateAdmin » 28.02.2012, 16:22

Hi!

Thanks for your idea, but sorry, in my eyes this looks like much effort for little benefit.

Regards
Torsten Wittrock
WSUSUpdateAdmin
Administrator
 
Posts: 2245
Joined: 07.07.2009, 14:38

Re: Updating -> Cut FileNameString (Batch Code)

Postby UranusOne » 05.03.2012, 09:46

Thanks for reply!
UranusOne
 
Posts: 20
Joined: 12.11.2010, 10:05


Return to Anregungen / Suggestions

Who is online

Users browsing this forum: No registered users and 40 guests