Re-registering multiple DLL's with VB Script

[Pookey]

Hey Guys,

I was wondering if someone knew of a better way to re-register a bunch of DLL's that's not messy like what's below?

Dim objShell
Set objShell = CreateObject("WScript.Shell")
objShell.Run "regsvr32.exe c:\windows\system32\whatever1.dll"
objShell.Run "regsvr32.exe c:\windows\system32\whatever2.dll"
objShell.Run "regsvr32.exe c:\windows\system32\whatever3.dll"
objShell.Run "regsvr32.exe c:\windows\system32\whatever4.dll"

Ideally, I want something like this (messy quick version):

Sub RegisterMultipleDLL(RegisterDLLArray)
Dim strDLL
If IsArray(RegisterDLLArray)
For Each strDLL in RegisterDLLArray
Some command to run regsrv32.dll /s with the appended name

Anyone able to point me in the right direction?

[Pookey]

No-one has any ideas?

[Psychotria]

I'm not sure. Wouldn't you just do (in the loop) objShell.Run "regsvr32.exe /s " + strDLL?

(replacing regsvr32.exe with the full path if necessary)