Skip to main content

AccessTr.neT


accessde 7zip kullanımı

accessde 7zip kullanımı

Çözüldü #1
iyi günler
bunu buldum ama
nasıl uyarlayacağım

****************
Function Zip_Archive_File_7Zip()

Dim s7Zip, sZipFile, sFileToZip As String

sZipFile = "C:\TMA_Production_SQL\Outputs\TMA_Draft_Documents \xyz.zip"
sFileToZip = "C:\TMA_Production_SQL\Outputs\TMA_Draft_Documents \abc.doc"

s7Zip = "C:\Program Files\7-Zip\Command_Line\7za.exe" 'Location of the WinZip program

ShellWait s7Zip & " a -tzip """ & sZipFile & """ """ & sFileToZip & """, vbhide"

End Function
*********************************
biriside ona şu cevabı yazmış

*****************
s7Zip = "C:\Program Files\7-Zip\Command_Line\7z.exe" 'or location of 7z.exe

Shell (s7Zip & " a -tzip " & sZipFile & " " & sFileToZip), vbhide
************************
@benbendedeilem
Son Düzenleme: 09/03/2012, 18:48, Düzenleyen: accessman.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
accessde 7zip kullanımı - Yazar: accessman - 09/03/2012, 18:45
Cvp: accessde 7zip kullanımı - Yazar: chopper07 - 09/03/2012, 19:37
Cvp: accessde 7zip kullanımı - Yazar: Kur@l - 10/03/2012, 04:42
Cvp: accessde 7zip kullanımı - Yazar: accessman - 10/03/2012, 07:47
Cvp: accessde 7zip kullanımı - Yazar: chopper07 - 10/03/2012, 10:33
Cvp: accessde 7zip kullanımı - Yazar: accessman - 10/03/2012, 11:08
Cvp: accessde 7zip kullanımı - Yazar: accessman - 10/03/2012, 11:25
Task