2016-06-11 19 views
1

ディレクトリのすべてのファイルをZIPファイルに追加します。私はCan you zip a file from the command prompt using ONLY Windows' built-in capability to zip files?から下のコードを使用しますが、このVBスクリプトは非常に遅いです。VBスクリプトを使ってZIPファイルにファイルを追加する方法は?

この動作をより速くするにはどうすればよいですか?

'Get command-line arguments. 
Set objArgs = WScript.Arguments 
InputFolder = objArgs(0) 
ZipFile = objArgs(1) 

'Create empty ZIP file. 
CreateObject("Scripting.FileSystemObject").CreateTextFile(ZipFile, True).Write "PK" & Chr(5) & Chr(6) & String(18, vbNullChar) 

Set objShell = CreateObject("Shell.Application") 

Set source = objShell.NameSpace(InputFolder).Items 

objShell.NameSpace(ZipFile).CopyHere(source) 

'Required! 
wScript.Sleep 2000 
+0

あなたがすることはできません。遅いシェルオブジェクトを使用しています。 winzipのようなプログラムを使用してください。http://www.winzip.com/prodpagecl.html –

+0

Rob Vander Woud - X-Zipから学んだ無料のコンポーネントがあります。ここにいくつかのコードサンプルがあります。私はあなたがこれをネイティブに行うことはできないと思っていますが、X-zipはあなたのユースケースに役立つようです。 C++/C#のような言語を使うと、あなたが探しているものを達成するのに最適かもしれません。 http://www.robvanderwoude.com/vbstech_files_zip.php –

+1

7-Zip、Info-ZIP、WinRAR、WinZipなどのZIPをサポートするフリーウェアとシェアウェアアーカイバがたくさんあります.ZIPを使ってファイルやディレクトリをファイルに追加するために書かれています圧縮。 Windowsはデフォルトで提供するものよりもはるかに高速です。外部ツールを使用せずにファイルとフォルダをバッチファイルで圧縮(解凍(解凍)(解凍)するにはどうすればよいですか?)](http://stackoverflow.com/questions/28043589/) – Mofi

答えて

-1

私は、これはコードであるバッチファイルを使用して好む:

@echo off 

echo Iam.zip 

Move test.txt Iam.zip 
関連する問題