How To Run Winzip in VB Shell without distination window - Geeks to Go Forums

Jump to content

Log in Register Register Malware removal guide How it works

How To Run Winzip in VB Shell without distination window

#1 U0070115

  • Group: Member
  • Posts: 1
  • Joined: 16-June 12

Posted 16 June 2012 - 11:26 AM

I am using VB 2010 Express to try to run Winzip using the shell command. I get everything to work, but at the conclusion of unzipping, a window showing the unzipped file destination window appears. I can figure how to stop this from appearing. I tried all of the unzipping options in WinZip, and it still appears.

The following is my code:

Target = """" & NameUnZipFolder & ZipFileName & """"
Source = """" & NameUnZipFolder & """"
lTaskID = Shell("""C:\Program Files\WinZip\winzip32.exe""" & " -e -o " & Target & " " & Source, iWindowState)

lProcess = OpenProcess(SYNCHRONIZE, 0, lTaskID)

If lProcess <> 0 Then
WaitForSingleObject(lProcess, INFINITE)
CloseHandle(lProcess)
End If


The destination windows appears just after my "Shelland Wait" logic. Just after WaitFor Single Object(lProcess, INFINITE) statement

I am using WinZip 15.0 Pro.

I would appreciate any help you can offer !!!

Share this topic: