如何使用中的内部Windows XP选项在VBScript中解压缩文件
我想用VBScript解压一个.zip文件,但它始终是一台没有外部应用程序的新计算机。现在我知道WindowsXP和2003有一个内部的.zip文件夹选项,所以我想我可以通过VBScript使用它来提取文件 我该怎么做 我试过:如何使用中的内部Windows XP选项在VBScript中解压缩文件,windows,scripting,vbscript,zip,Windows,Scripting,Vbscript,Zip,我想用VBScript解压一个.zip文件,但它始终是一台没有外部应用程序的新计算机。现在我知道WindowsXP和2003有一个内部的.zip文件夹选项,所以我想我可以通过VBScript使用它来提取文件 我该怎么做 我试过: Set objShell = CreateObject("Shell.Application") Set SrcFldr = objShell.NameSpace(fileName) Set DestFldr = objShell.NameSpace(appDir)
Set objShell = CreateObject("Shell.Application")
Set SrcFldr = objShell.NameSpace(fileName)
Set DestFldr = objShell.NameSpace(appDir)
DestFldr.CopyHere(SrcFldr)
这没用。
有什么问题吗?只需将ZipFile=压缩文件的位置,将ExtractTo=设置为压缩文件应解压缩到的位置
'The location of the zip file.
ZipFile="C:\Test.Zip"
'The folder the contents should be extracted to.
ExtractTo="C:\Test\"
'If the extraction location does not exist create it.
Set fso = CreateObject("Scripting.FileSystemObject")
If NOT fso.FolderExists(ExtractTo) Then
fso.CreateFolder(ExtractTo)
End If
'Extract the contants of the zip file.
set objShell = CreateObject("Shell.Application")
set FilesInZip=objShell.NameSpace(ZipFile).items
objShell.NameSpace(ExtractTo).CopyHere(FilesInZip)
Set fso = Nothing
Set objShell = Nothing
查看站点上的第三个条目。在JScript中编写相同的条目时,需要注意避开反斜杠(\\)。这让我非常头疼。按要求获取错误。设置FilesInZip=objShell.NameSpace(ZipFile.items)。有人可以帮我输入完整的文件路径,或者将“CreateObject”(“Scripting.FileSystemObject”).GetParentFolderName(WScript.ScriptFullName)与“file.zip”连接起来吗“@Tester101嗨,那么,plz,如果文件存在,代码怎么能覆盖所有文件,而不要求它呢?我只想注意,路径必须是绝对路径,文件必须有
.zip
扩展名(在某些情况下,一个zip文件,但它可能有不同的扩展名-在提取之前必须重命名它)。