Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(VBScript) Untar a .tar.Z (.taz) Compressed ArchiveUntar a .tar.Z (.taz) compressed archive.
Dim fso, outFile Set fso = CreateObject("Scripting.FileSystemObject") 'Create a Unicode (utf-16) output text file. Set outFile = fso.CreateTextFile("output.txt", True, True) ' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' Untar a .tar archive. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Tar") set tar = CreateObject("Chilkat.Tar") ' Untar into c:/temp/untarDir. The directory tree(s) contained ' within the TAR archive will be re-created rooted at this ' directory. tar.UntarFromDir = "/Users/chilkat/temp/untarDir" ' If any filepaths within the Tar archive are absolute, ' automatically make them relative by removing the first ' forward or backward slash. This protects from untarring ' files to unexpected locations. tar.NoAbsolutePaths = 1 success = tar.UntarZ("/Users/chilkat/testData/tar/abc123.tar.Z") If (success <> 1) Then outFile.WriteLine(tar.LastErrorText) Else outFile.WriteLine("Success") End If outFile.Close |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.