CAB書庫の解凍

Microsoftのアプリケーション標準圧縮方式のＣＡＢファイルを解凍します。解凍には宮内 邦昭さん作成のCAB32.DLLが必要になります。統合アーカイバプロジェクトなどから入手してください。

宣 言

Private Declare Function Cab Lib "cab32" ( ByVal hwnd As Long, ByVal pszCmdLine As String, ByVal pszOutput As String, ByVal dwSize As Long) As Long

※Privateは必要に応じて削除またはPublicに変更してください。

使 用 方 法

Cab Me.hWnd,"-x 書庫ファイル名 [ファイル名]","",0

引 数 説 明

hwnd	Long	呼び出すウィンドウのウィンドウハンドル
pszCmdLine	String	UnCABに渡すコマンド文字列（DOS版LHAと互換性有り）
pszOutPut	String	UnCABが結果を返すための変数
dwSize	Long	pszOutputの大きさ

サ ン プ ル プ ロ グ ラ ム

プログラムを張りつけ実行しフォームをクリックするとc:\temp\temp.cabというファイルを解凍します。なお実行には「c:\temp\temp.cab」というCab書庫が必要になります。あらかじめ用意しておいてください。

動作確認：Visual Basic 5.0,Windows98