Hem / Tips & tricks
a = Shell("c:\command.com /c dir c:\*.*/s/b>c:\windows\desktop\list.txt", vbMinimizedNoFocus)