Vbs - Variable als Parameter an externes Programm übergeben und Rückgabewert in Variable schreiben

Hallo,
ich habe ein vbs-Script, welches alle Dateien eines Verzeichnisse in ein Array schreibt. Mittels eines kleinen Tools kann ich Exif-Daten einer Datei auslesen.
Ich gebe also den interessierenden Wert als Parameter mit und dazu den Dateinamen als String:
Danach schreib ich den Dateinamen und den ermittelten Exif-String in das Array.

Wie übergebe ich also an das externe Tool und wie schreibe ich den zurückgegebenen String in eine Variable?

Gruß
Torsten

Dim objShell, oExec, out
Set objShell = CreateObject("Wscript.Shell")  

'Befehl ausführen  
Set oExec = objShell.Exec("cmd /c ping -n 1 localhost")  

'Warte darauf das der Befehl beendet wurde  
Do While oExec.Status = 0
     WScript.Sleep 100
Loop

' StdOut auslesen  
out = ""  
Do While Not oExec.StdOut.AtEndOfStream
   out = out & oExec.StdOut.ReadAll
Loop

' Zum Test: Ausgabe anzeigen lassen:  
msgbox out

'..... wie oben  

arrLines = Split(out,vbNewLine)
var = Trim(Split(arrLines(0),":",2,1)(1))  
MsgBox var