Jump to content
Sign in to follow this  
koman92040

Need Help Converting Batch File FOR\DIR loop

Recommended Posts

koman92040

Hi everyone,

I've got everything complete in a script for repairing Microsoft SMS 2003 client other than a FOR loop. I was wondering if someone cloud help me with it.

the directory these batch commands are run in is C:\Windows\System32\wbem

for /f %%s in ('dir /b /s *.dll') do regsvr32 /s %%s

for /f %%s in ('dir /b *.mof') do mofcomp %%s

for /f %%s in ('dir /b *.mfl') do mofcomp %%s

additionally i need to ensure C:\Windows\System32\wbem is in the %PATH% variable at the begging of my script.

If someone can help me with the autoit code to do this it would be great

thanks

Edited by koman92040

Share this post


Link to post
Share on other sites
guinness

Look in the Help file for 'For...To...Step...Next' and then search the forum for RecFileListToArray.au3. This should get you started.


UDF List:

 
_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_ArrayFilter/_ArrayReduce_BinaryBin()_CheckMsgBox()_CmdLineRaw()_ContextMenu()_ConvertLHWebColor()/_ConvertSHWebColor()_DesktopDimensions()_DisplayPassword()_DotNet_Load()/_DotNet_Unload()_Fibonacci()_FileCompare()_FileCompareContents()_FileNameByHandle()_FilePrefix/SRE()_FindInFile()_GetBackgroundColor()/_SetBackgroundColor()_GetConrolID()_GetCtrlClass()_GetDirectoryFormat()_GetDriveMediaType()_GetFilename()/_GetFilenameExt()_GetHardwareID()_GetIP()_GetIP_Country()_GetOSLanguage()_GetSavedSource()_GetStringSize()_GetSystemPaths()_GetURLImage()_GIFImage()_GoogleWeather()_GUICtrlCreateGroup()_GUICtrlListBox_CreateArray()_GUICtrlListView_CreateArray()_GUICtrlListView_SaveCSV()_GUICtrlListView_SaveHTML()_GUICtrlListView_SaveTxt()_GUICtrlListView_SaveXML()_GUICtrlMenu_Recent()_GUICtrlMenu_SetItemImage()_GUICtrlTreeView_CreateArray()_GUIDisable()_GUIImageList_SetIconFromHandle()_GUIRegisterMsg()_GUISetIcon()_Icon_Clear()/_Icon_Set()_IdleTime()_InetGet()_InetGetGUI()_InetGetProgress()_IPDetails()_IsFileOlder()_IsGUID()_IsHex()_IsPalindrome()_IsRegKey()_IsStringRegExp()_IsSystemDrive()_IsUPX()_IsValidType()_IsWebColor()_Language()_Log()_MicrosoftInternetConnectivity()_MSDNDataType()_PathFull/GetRelative/Split()_PathSplitEx()_PrintFromArray()_ProgressSetMarquee()_ReDim()_RockPaperScissors()/_RockPaperScissorsLizardSpock()_ScrollingCredits_SelfDelete()_SelfRename()_SelfUpdate()_SendTo()_ShellAll()_ShellFile()_ShellFolder()_SingletonHWID()_SingletonPID()_Startup()_StringCompact()_StringIsValid()_StringRegExpMetaCharacters()_StringReplaceWholeWord()_StringStripChars()_Temperature()_TrialPeriod()_UKToUSDate()/_USToUKDate()_WinAPI_Create_CTL_CODE()_WinAPI_CreateGUID()_WMIDateStringToDate()/_DateToWMIDateString()Au3 script parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 22/04/2018

Share this post


Link to post
Share on other sites
koman92040

Look in the Help file for 'For...To...Step...Next' and then search the forum for RecFileListToArray.au3. This should get you started.

i see _FileListToArray but i cont see any RecFileListToArray.au3 in this fourm

Share this post


Link to post
Share on other sites
water

Please use the forums search function and the second entry in the results list is


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2018-10-19 - Version 1.4.10.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (2018-09-01 - Version 1.3.4.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
PowerPoint (2017-06-06 - Version 0.0.5.0) - Download - General Help & Support
Excel - Example Scripts - Wiki
Word - Wiki
 
Tutorials:

ADO - Wiki

 

Share this post


Link to post
Share on other sites
JLogan3o13

√-1 2^3 ∑ π, and it was delicious!

Share this post


Link to post
Share on other sites
koman92040

Thnks to everyone for your help,

While i did not get direct awnser you all gave me a good "concept"

Ended up using "RecursiveFileSearch" Function witten by WeaponX

So now i have:

$dlls = RecursiveFileSearch($wbemPath, "(?i).(dll)")
for $loop = 1 to $dlls[0]
RunWait("regsvr32 /s " & $dlls[$loop])
Next
$mofs = RecursiveFileSearch($wbemPath, "(?i).(mof)")
for $loop = 1 to $mofs[0]
RunWait("mofcomp " & $mofs[$loop])
Next
$mfls = RecursiveFileSearch($wbemPath, "(?i).(mfl)")
for $loop = 1 to $mfls[0]
RunWait("mofcomp " & $mfls[$loop])
Next

i also esxpanaded the capibliy to repair 64-bit WMI files

If @OSArch = "X64" Then
$64dlls = RecursiveFileSearch($wbem64Path, "(?i).(dll)")
for $loop = 1 to $64dlls[0]
  RunWait("regsvr32 /s " & $64dlls[$loop])
Next
$64mofs = RecursiveFileSearch($wbem64Path, "(?i).(mof)")
for $loop = 1 to $64mofs[0]
  RunWait("mofcomp " & $64mofs[$loop])
Next
$64mfls = RecursiveFileSearch($wbem64Path, "(?i).(mfl)")
for $loop = 1 to $64mfls[0]
  RunWait("mofcomp " & $64mfls[$loop])
Next
EndIf

Now all i have left is the PATH varible

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×