Распаковка архива с расширением .arj - Visual Basic .NET

Формулировка задачи:

Всем доброго времени суток. Ребята, не подскажите как можно распаковать архив с расширением .arj? Может какая -то библиотека есть для работы с данным типом архива? А именно мне необходимо следующиее: Есть в папке, скажем D:\arh\ куча архивов (*.arj). Как можно пройтись по всем этим архивам и "вытищить" из них только файлы с расширением *.jpg, *.txt, *.pdf, *.doc и поместить результат в папку D:\rez? Заранее спасибо вам за любую помощь и ваши ответы.

Решение задачи: «Распаковка архива с расширением .arj»

textual
                            Листинг программы 
                        

                            UnZip("C:\dat\mxparser.zip", "C:\rez")
'…
Sub UnZip(ByVal source As String, ByVal result As String)
    Dim sh As New Shell32.Shell()
    Dim output As Shell32.Folder = sh.NameSpace(result)
    Dim input As Shell32.Folder = sh.NameSpace(source)
    output.CopyHere(input.Items, 4)
End Sub
                        