Unzip a file in dts with an activex

[AnaFlor]

Hello,

I was trying to unzip a file in a dts with the following code:

Function Main()
strFTPDir = "c:\zip_source"
strFileNameBase = "TEST"
strPublishDir = "c:\zip_destination"

Set WshShell = CreateObject("WScript.Shell")
strUnzip = "c:\pkunzip.exe -e " & strFTPDir & "\" & strFileNameBase & ".zip " & strPublishDir
WshShell.Run strUnZip,1,true
Set WshShell = nothing

Main = DTSTaskExecResult_Success
End Function

The problem is in the line:
WshShell.Run strUnZip,1,true

Can you help me?

Thanks

 

[JBaileys]

Have you considered creating a batch file to do the unzip? Or is this unacceptable for your environment?

 

[AnaFlor]

How can I do that?

 

[AnaFlor]

I tryed to create a batch file to do the unzip.

The problem is when I try to unzip files in my machine it works.

But when I try to unzip files in the server it gives me an error.

Can you help me?

Thanks