Rc 999 using VCZIPSUP.DLL

I m facing to the following problem doing Unzip function of VSZIPZUP.DLL in a Lotus script agent :- I have VCZIPSUP.DLL installed under c:\WINDOWS and C:\WINDOWS\system32. This was downloaded from : http://www.vcode.no/vcode.nsf/downloads/VCZIPSUP

  • Running this code on Notes v8.5.1:

Declare Function Unzip Lib “VCZIPSUP.DLL” (_

ByVal pstrInputZipFilename As String, _

ByVal pstrOutputDirectory As String, _

ByVal pstrOptions As String) As Long

Declare Function GetZIPSUPMajorVersion Lib “VCZIPSUP.DLL” () As Integer

Declare Function GetZIPSUPMinorVersion Lib “VCZIPSUP.DLL” () As Integer

Declare Function GetZIPSUPBuildNumber Lib “VCZIPSUP.DLL” () As Integer

Sub Initialize

Dim lRc As Long 	

Dim MajorVersion As String

Dim MinorVersion As String

Dim BuildNumber As String	

MajorVersion = GetZIPSUPMajorVersion()

MinorVersion = GetZIPSUPMinorVersion()

BuildNumber = GetZIPSUPBuildNumber()



lRc = Unzip("C:/xxxx.tar","C:"," ")

End Sub

I get lRc = 999 ( and no files unzipped…)

  • for information :

MajorVersion = 1

MinorVersion = 2

BuilNumber = 0

Any idea to fix this problem?

Thanks

Subject: This is a third party product…

Have you tried contacting the guy who wrote it to see if he knows? The contact details are on his website.

Subject: third party product answer

After some mails exchange with VCZIPSUP.dll provider , we found that this dll isn’t able to inzip .tar file build on TSO/OMVS segment of Z/OS.But is work correctly for other .zip or .tar files.