Tag: zip

从服务器压缩excel文件进​​行下载

我试图使用jszip.js从服务器捆绑多个excel文件，应该一起下载到一个zip文件点击。 当我试图replace演示脚本时，我可以创build一个zip文件，但它是空的。 当我将两个文件放在zip.file中时，第一个文件会出现在zip文件中，但已损坏。 喜欢： var zip = new JSZip(); zip.file('http://website/file1.xlsx', 'http://website/file2.xlsx'); var content = zip.generate({type:"blob"}); saveAs(content, "example.zip"); 所以我应该把文件的名称放在第一个位置，而不是文件的位置，但是我必须以其他方式访问它。 我想我只是不检查API的工作原理。 如果至less有两个文件在服务器上托pipe，那么这将是一件好事。

“尝试使用zexmlss时，没有注册zip生成器，文件夹输出被禁用”

我正在尝试使用zexmlss http://neborak.org/zexmlss/index.php?lang=en导出到ODS的Excel。 我编译了这个库，并且在库中包含了Synapse生成器。 现在我试图从代码中使用它： procedure Test; var tz: TZEXMLSS; begin tz := TZEXMLSS.Create(nil); tz.Sheets.Count:=2; tz.Sheets[0].Title:='Test'; with tz.Sheets[0] do begin RowCount:=20; ColCount:=20; Cell[0, 0].Data := 'zexmlss'; end; TZXMLSSave.From(tz).Save('C:\A_EXCEL\test.xlsx'); end 而且我收到错误消息“没有注册的zip生成器，文件夹输出禁用”。 保存到XML完成成功。 如何以及在哪里注册压缩生成器？

如何检查是否可以访问zip文件？

我有一个有很多PC名称的Excel表格。 每个PC应该有一个备份存储在服务器上的自动生成的.zip文件。 当我运行我的代码时，它会检查PC名称以检查它们是否有备份。 备份过程并不完美，因此在检测到问题后可能需要手动解决问题。 我无法检测到的问题之一是如果备份过程没有完成，并且.zip文件被损坏。 我想编写另一个函数来检测无法打开的损坏的.zip文件。 这里是代码： Sub check_for_all_backups() Dim c As Range Dim rng As Range Dim Backup As String For j = 1 To Worksheets.Count Set rng = Sheets(j).UsedRange.Cells For Each c In rng If ispcname(Left(c, 7)) = True And Right(c, 1) = "$" Then Dim i i = 1 Backup = Left(c, […]

使用VBA遍历zip文件

我需要使用VBA遍历一个zip文件。 特别是我需要，而不解压缩文件，findxl文件夹，以便find媒体子文件夹。 然后，我需要将图像从媒体子文件夹中复制出来并保存到另一个文件夹中。 Public Sub Extract_Images() Dim fso As FileSystemObject Dim objFile As File Dim myFolder Const zipDir As String = "\\…\ZIP FILES" Const xlFolder As String = "xl" Const mediaFolder As String = "media" Dim picname As String Dim zipname As String Set fso = New FileSystemObject Set myFolder = fso.GetFolder(zipDir) For Each objFile […]

Delphi System.Zip xlsx LibreOffice

我的系统是WIN7 64，我使用Delphi XE7组件来创build.xlsx文件。 示例结果文件 。 该文件可以打开与MS Office（没问题），但与LibreOffice我不能因为我有这个错误：“文件已损坏，不能打开…”。 怀疑是System.Zip以某种方式错误地打包文件。 LibreOffice Calc不显示关于为什么无法打开我的文件的任何详细信息。 我不明白如何开始逐项列举问题。 要了解它的原因是在归档方法，我做了以下。 解压缩文件并使用WinRar重新打包。 将它重命名为* .xlsx和vuala。 现在可以打开它。 这是新的重新打包的文件https://yadi.sk/i/bSr6g8xDh3Yde

对不同Windows版本的大文件名（压缩）进行编程截断

所以我修正了一个程序，允许用户创build一个Excel文档，在提供给客户之前，它首先压缩。 客户抱怨的一个问题是，虽然zip文件可以随时下载，但是有时用户必须使用标准的Windows压缩工具将Excel文件复制出档案（或者解压缩），然后才能打开它。 标准的“文件名太长”的错误。 当然，algorithm是将.zip存档名称设置为与报表相同 – 可以是长度超过100个字符的string。 我正在执行的解决scheme是检查潜在报告的长度，以便在违反MAX_PATH的情况下自然查看，并根据需要截断.zip名称。 在Windows 7上testing它，这是完美的。 但是当在8.1下testing时会发生一些奇怪的事情 它仍然会抛出一个错误，试图从档案打开 – 但这个错误是更神秘的。 “对不起，我们找不到C：\ Users {我的用户名} \ AppData \ Local \ Temp \ Temp1_ {剩余的被截断的压缩文件名} .zip {Full file name} .xlsx。是否有可能被移动，改名或删除？ 无论文件在浏览器中是“打开”还是“保存”，该错误都会popup。 通常情况下，我只是尝试进一步调整，但在Windows 8.1平台上进行testing涉及到很多开销，看起来问题不是path名称长度。 到底是怎么回事？ Windows 8是否存在档案中的名称长度问题，或…？ 另外，我在这里发布的原因，而不是说，用户体验，是因为我觉得解决scheme将是程序化的 – 在程序的代码。 我承认“让最终用户跳过提取button”是为了提供简单的用户体验，但是截断整个path的长度解决了Windows 7上的问题。 只是不是8.1，search的SO网站家庭没有提供任何帮助 – 讽刺的是，由于关键字Excel。

VBA复制文件到.zip dificulty

我试图将大约20-30个excel文件打包成一个zip文件，然后在一个进程完成后通过电子邮件发送出去。 我能够创build.zip文件，并将文件从一个目录复制到另一个目录。 我无法做到的是将文件复制到.zip文件中。 这里是我有的代码： zipFile = "C:\testZip.zip" zipPath = "C:\testZipFolder\" NewZip (zipFile) Set fs = CreateObject("scripting.filesystemobject") file = Dir(zipPath) Set zipFolder = fs.getfolder(zipPath) While (file <> "") If InStr(file, ".xlsx") > 0 Then I = I + 1 Set f = fs.getfile("C:\" & file) f.Copy (zipPath) Debug.Print Err.Number Debug.Print Err.Description NewZip是一个创build.zip文件的方法。 我可以打开.zip并手动将文件移动到它。 当我运行上面的代码时，我得到错误438：对象不支持此属性或方法。 如果我将目标path更改为其他文件夹，则会复制该文件。 任何帮助，将不胜感激。

将选定的文件复制到压缩文件夹：VBA中出现“找不到文件或没有读取权限”错误

我有一个代码，将所有选定的文件（信贷RonDeBruin的代码），虽然我修改了一些部分。 我的问题是，每次运行代码时都会popup如下错误： 这是我的代码： Sub zipAllFiles() 'rondebruin <— Credits to code Dim FileNameZip, FolderName Dim strDate As String, DefPath As String Dim oApp As Object Dim Fold As Range Dim ws As Worksheet Dim i As Integer, lastrow As Long DefPath = Application.DefaultFilePath If Right(DefPath, 1) <> "\" Then DefPath = DefPath & "\" End If […]

在XLSM包结构中存储和访问文件

作为我正在开发的基于Excel的VBA项目的一部分，我依赖于外部文件。 迄今为止，我已经设法通过embedded文件或发送电子表格来解决这个问题。 然而作为这个项目的一部分，我需要依靠一个* .exe文件。 由于OLE EXEembedded的问题可能会引起问题，因此可能会将它们一起发送给电子邮件。 由于XLSM填充只是压缩文件夹在他们的核心，我想知道几个问题，正在努力寻找答案：是否有任何理由为什么有一个自定义exe文件包将停止工作？ 有没有一种本地的方式来访问VBA中的软件包存档？ 谢谢阅读。

我如何指定在bash中使用的zip版本？

背景（不需要阅读） 我正在修改MS Office文件的工作（试图找出自动生成任意长度的Excel和PowerPoint文件的最快，最简单的方法）。 由于实际的excel文件只是压缩文件的.xlsx附加到文件名，我已经解压缩，编辑xml，重新压缩它们，并看看OpenOffice是否仍然可以加载它们。 不过，我已经意识到（在没有太多这样的testing之后，谢天谢地），默认情况下，bash中的zip命令（或者至less在我的mac上）是以一种只需要unzip v1 .0提取，但正常的excel文件压缩的​​方式，他们需要v2.0提取。 我检查这是一个问题，通过压缩和解压缩我知道正常加载的Excel文件，然后尝试加载它。 OpenOffice很不高兴。 所以，我知道我需要制作文件的zip文件，就像excel一样，但是如何做到这一点我不确定。 我在我的电脑上压缩版本3，所以希望如果压缩/解压缩发布周期是同步的应该是可能的，但我没有看到任何东西立即似乎是解决scheme。 编辑：和zip -9（哪个zip -h有用地说，指示zip“更好的zip”）仍然只需要v1.0提取。 题： 我怎样才能在bash中指定我想压缩zip文件的方式，这将需要解压缩v2.0来解压缩？