[VB2005]請問如何利用winrar或是7zip壓縮文字檔
之前有找到利用winzip壓縮的程式碼
不過似乎是vb 6.0的
程式碼如下：
Dim wzipexe As String ' winzip 執行檔的位置
Dim wsource As String ' 原始檔案 (壓縮前)
Dim wtarget As String ' 目地檔案 (壓縮後)
Dim wcmd As String ' Shell 指令
Dim retval As Double ' Shell 指令傳回值
'拼湊 Shell 指令
wzipexe = "C:\program files\winzip\WINzip32"
wtarget = "D:\456.zip"
wsource = "D:\*.txt"
wcmd = wzipexe & " -a " & "-s""123""" & wtarget & " " & wsource
retval = Shell(wcmd, 6)
想請問要如何運用winrar或是7zip壓縮.txt檔
是可以直接從以上的程式碼改寫嗎?
我是有試過把wzipexe = "C:\program files\winzip\WINzip32"
直接改寫為wzipexe = "C:\program files\WinRAR\WinRAR"
而後面的" -a " 改為" a "
是可以壓縮的 但是加密的方式我就不了解了
所以也想請教一下如何利用winrar壓縮兼加密
而路徑改為"C:\Program Files\7-ZIP\7zFMn.exe"則不行了
主要還是想利用7zip壓縮再加密 因為7zip比較沒有版權問題
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.170.233.26
推
02/22 10:14, , 1F
02/22 10:14, 1F
→
02/22 13:48, , 2F
02/22 13:48, 2F
討論串 (同標題文章)
以下文章回應了本文：
完整討論串 (本文為第 1 之 2 篇)：
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
33
68