パスワード付き圧縮

解決

灼ヺ゜ 2006-05-09 20:54:50 No: 95296

こんにちは。
VB6でテキストファイルを圧縮するプログラムを作成しています。
これについては、
「Private Declare Function Unlha Lib "Unlha32.dll" _
(ByVal hWnd As Long, ByVal szCmdLine As String, ByVal szOutput As String, ByVal dwSize As Long) As Long」で出来たのですが、
実はそれではダメで、”パスワード付き”で圧縮しなくてはいけません。
２日これだけを調べて解らず、ここにたどり着きました。
どなたか教えてください。
宜しくお願い致します。

魔界の仮面弁士 2006-05-09 21:18:54 No: 95297

LHA自体には、パスワード機能がありません。
パスワード対応の書庫形式(たとえばzip)を用いてみては如何でしょう。

ジッポ 2006-05-09 22:28:42 No: 95298

魔界の仮面弁士さん、ありがとうございます。
ＺＩＰ形式で圧縮するには、何DLLの何FUNCTIONを使えばいいでしょうか？
いろんなところを見たのですが解りません・・・。すみません。
宜しくお願い致します。

魔界の仮面弁士 2006-05-09 22:42:25 No: 95299

> ２日これだけを調べて解らず、ここにたどり着きました。

ノーヒントで 2日間頑張ったのですから、もう少し調べてみましょうよ。
zip というヒントをもらってから、まだ 2時間もたっていませんよね。

> いろんなところを見たのですが解りません・・・。すみません。
追加ヒント
http://www.madobe.net/archiver/index.html

ジッポ 2006-05-09 23:21:50 No: 95300

魔界の仮面弁士さん、ありがとうございます！！
頂いたヒントで何とかできそうです。
↓
Public Declare Function Zip Lib "ZIP32J" _
(ByVal hwnd As Long, ByVal szCmdLine As String, _
ByVal SzOutput As String, ByVal dwSize As Long) As Long

ありがとうございます。