[amgad525]

PHP كود :

Dim winrarFile As String = "winrarfile.rar"
Dim winrarPass As String = "123"
Dim filename As String = "textfile.txt"


Dim tmppath As String = IO.Path.GetTempPath
Dim tmpfile As String = tmppath & "\" & filename

Dim p As Process = Process.Start("winrar", "x -o+ -p""" & winrarPass & """ """ & winrarFile & """ """ & filename & """ " & tmppath)
p.WaitForExit()

Process.Start(tmpfile)