I want to unzip a file in QTP. In the work station SECUREZIP is installed. I have tried the below code.
strZipFile = "C:\DOWNLOAD\SSH.ZIP" outFolder = "C:\Kishor\" Set objShell = CreateObject( "Shell.Application" ) Set objSource = objShell.NameSpace(strZipFile).Items() Set objTarget = objShell.NameSpace(outFolder) intOptions = 256 objTarget.CopyHere objSource, intOptions But it throws an error message " General run error" while executing the below line. Set objSource = objShell.NameSpace(strZipFile).Items() Quick response will be highly appreciated. -- You received this message because you are subscribed to the Google "QTP - HP Quick Test Professional - Automated Software Testing" group. To post to this group, send email to [email protected] To unsubscribe from this group, send email to [email protected] For more options, visit this group at http://groups.google.com/group/MercuryQTP?hl=en
