Я получил ниже скрипт pzip.vbs из этого блога, чтобы сжать файл. Но получаю ошибку как pzip.vbs(10, 3) Microsoft VBScript runtime error: Object required: 'zip' . Что-то не так в сценарии? Также это будет работать для файла размером 4 ГБ?

Командная строка: CScript pzip.vbs targetfile.zp.dat sourcefile.dat

Скрипт в pzip.vbs:

Set objArgs = WScript.Arguments
ZipFile = objArgs(0)

' Create empty ZIP file and open for adding
CreateObject("Scripting.FileSystemObject").CreateTextFile(ZipFile, True).Write "PK" & Chr(5) & Chr(6) & String(18, vbNullChar)
Set zip = CreateObject("Shell.Application").NameSpace(ZipFile)

' Add all files/directories to the .zip file
For i = 1 To objArgs.count-1
  zip.CopyHere(objArgs(i))
  WScript.Sleep 60000 'REQUIRED!! (Depending on file/dir size)
Next
|источник

0