FoxPro Examples

ChilkatHOMEAndroid™ASPVisual BasicVB.NETC#iOS (IPhone)Objective-CC++CMFCDelphiFoxProJavaPerl
PHP ExtensionPHP ActiveXPythonPowerShellRubySQL ServerVBScript

Visual FoxPro Examples

Bounced Mail
Bz2
Character Encoding
CSV
Digital Certificates
Digital Signatures
Email
Email Object
FTP
HTML Conversion
HTTP
IMAP
Encryption
MHT / HTML Email
POP3
RSA
S/MIME
Socket
Spider
SFTP
SMTP
SSH
SSH Key
SSH Tunnel
String
Tar
Upload
XML
XMP
Zip Compression
Self-Extractor

More Examples...
Amazon S3
DKIM / DomainKey
NTLM
RSS
Atom
Byte Array
Service
PPMD
Deflate
DH Key Exchange
DSA
FileAccess
Bzip2
LZW

 

Non-Chilkat Links
Text and String Handling

Extract a Single File from a RAR Archive

Download Chilkat 32-bit Zip ActiveX (.msi) (includes objects for .zip, .gz, .bz2, and .Z)

Download All 32-bit Chilkat ActiveX Components (.zip)

Download All 64-bit Chilkat ActiveX Components (.zip)

Demonstrates how to open a RAR archive and extract a single file at a time.

Note: The Chilkat RAR ActiveX objects are included in the "Chilkat Zip" ActiveX download. The RAR functionality contained within ChilkatZip2.dll is freeware, however, the Chilkat Zip, GZip, and .Z functionality is not freeware.

The Chilkat RAR for .NET and C++ are bundled in downloads that contain all Chilkat classes (both free and non-free). Make sure you select the download that matches your .NET Framework or VC++ version (6/7/8).

If running on x64, download the ActiveX, .NET, or C++ builds marked specifically for x64.

LOCAL loRar
LOCAL lnSuccess
LOCAL loEntry

loRar = CreateObject('Chilkat.Rar')

*  Note: The Chilkat RAR functionality only provides the ability
*  to open, list, and "unrar" (i.e. extract) RAR archives.  It does
*  not provide the ability to create RAR archives.

*  Also, the Chilkat RAR functionality is free.  It does not
*  require a license to use indefinitely.

lnSuccess = loRar.Open("abc123.rar")
IF (lnSuccess <> 1) THEN
    =MESSAGEBOX(loRar.LastErrorText)
    QUIT
ENDIF

*  Entries within the RAR can be accessed by name or by index.

loEntry = loRar.GetEntryByName("HelloWorld123.txt")
IF (loEntry = NULL ) THEN
    =MESSAGEBOX(loRar.LastErrorText)
ELSE
    lnSuccess = loEntry.Unrar("c:/temp/unrarDest")
    IF (lnSuccess = 0) THEN
        =MESSAGEBOX(loRar.LastErrorText)
    ELSE
        =MESSAGEBOX("Success.")
    ENDIF

ENDIF

RELEASE loEntry

*  Alternatively, get an entry by index.  The first entry
*  is at index 0.
loEntry = loRar.GetEntryByIndex(0)
IF (loEntry = NULL ) THEN
    =MESSAGEBOX(loRar.LastErrorText)
ELSE
    lnSuccess = loEntry.Unrar("c:/temp/unrarDest")
    IF (lnSuccess = 0) THEN
        =MESSAGEBOX(loRar.LastErrorText)
    ELSE
        =MESSAGEBOX("Success.")
    ENDIF

ENDIF

RELEASE loEntry

© 2000-2010 Chilkat Software, Inc. All Rights Reserved.

Mail Component · .NET Email Component · ASP Mail Component · XML Parser