请问：如何将windows文件夹中的文件名称和版本号用命令行提取出来，并存到一个txt文件中？文件大都是.exe,.dll格式。多谢。
不一定一定要用批处理，用其他语言也可以，能不能给出例子呢？谢谢．
[ Last edited by mandyonly on 2007-6-7 at 04:27 PM ]
不一定一定要用批处理，用其他语言也可以，能不能给出例子呢？谢谢．
[ Last edited by mandyonly on 2007-6-7 at 04:27 PM ]
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
提取文件版本信息（版本号）
标题：提取文件版本信息（版本号）
批处理提取版本号估计没戏，VBS以前试过可以，不过现在忘了
wmic datafile where "Name='c:\\windows\\explorer.exe'" get Manufacturer,Version,Filename
这时用什么语言写的？
wmic datafile where "Name='c:\\windows\\explorer.exe'" get Manufacturer,Version,Filename
是P啊？
是P啊？
wmic不错
如果文件是多个，存在一个文件夹中，我要提取的是文件夹中的所有的文件名和版本，而不是５楼说的具体的一个文件名，该怎么办呢？
//我要提取的是文件夹中的所有的文件名和版本
@echo off
set Target=C:\\test
cd %Target%
for %%i in (*.*) do (
rem echo %%i
wmic datafile where "Name='%Target%\\%%i'" get Manufacturer,Version,Filename
)
多谢！
wmic /output:result.log datafile where "Path='\\windows\\system32\\' and Drive='C:' and (Extension='dll' or Extension='exe')" get Manufacturer,Version,Caption运行时间可能稍长点，耐心等待。。
VBS的，只提取有版本号的“应用程序”（exe）、“应用程序扩展”（dll）
所有的“应用程序”（exe）、“应用程序扩展”（dll）都提取
[ Last edited by zh159 on 2007-6-9 at 10:21 PM ]
Path = "C:\windows"
Set fso = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(Path)
For Each strFileName in objFolder.Items
name = objFolder.GetDetailsOf(strFileName, 0)
Extension = objFolder.GetDetailsOf(strFileName, 2)
ver = objFolder.GetDetailsOf(strFileName, 37)
If not ver = "" Then
If Extension = "应用程序" Then
str = str & name & ".exe:" & ver & vbCrLf
Else
If Extension = "应用程序扩展" Then str = str & name & ":" & ver & vbCrLf
End If
End If
Next
Set fW = fso.OpenTextFile("result.log", 2, True)
fW.WriteLine str
fW.close所有的“应用程序”（exe）、“应用程序扩展”（dll）都提取
Path = "C:\windows"
Set fso = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(Path)
For Each strFileName in objFolder.Items
name = objFolder.GetDetailsOf(strFileName, 0)
Extension = objFolder.GetDetailsOf(strFileName, 2)
ver = objFolder.GetDetailsOf(strFileName, 37)
If Extension = "应用程序" Then
str = str & name & ".exe:" & ver & vbCrLf
Else
If Extension = "应用程序扩展" Then str = str & name & ":" & ver & vbCrLf
End If
Next
Set fW = fso.OpenTextFile("result.log", 2, True)
fW.WriteLine str
fW.close[ Last edited by zh159 on 2007-6-9 at 10:21 PM ]
哦，好东东亚。
要这么麻烦吗?
用"filever /v filename" 命令就可以得到一个文件的版本信息.
用"filever /v filename" 命令就可以得到一个文件的版本信息.
filever 是个三方工具？
Originally posted by wbshu at 2007-7-6 10:42:
要这么麻烦吗?
用"filever /v filename" 命令就可以得到一个文件的版本信息.
C:\>filever/?
'filever' 不是内部或外部命令，也不是可运行的程序
或批处理文件。
是微软工具包里的工具,我也是最近知道的.搜索一下就能找到,(我不会上传附件).
filever集成在Windows XP Service Pack 2 Support Tools中,可在华军或者微软官方下载:
http://www.onlinedown.net/soft/21532.htm
http://www.microsoft.com/downloads/details.aspx?FamilyId=49AE8576-9BB9-4126-9761-BA8011FABF38&displaylang=en
http://www.onlinedown.net/soft/21532.htm
http://www.microsoft.com/downloads/details.aspx?FamilyId=49AE8576-9BB9-4126-9761-BA8011FABF38&displaylang=en
好帖要顶,今天用到了,呵呵.
Originally posted by qinbuer at 2007-7-7 03:39 PM:
filever集成在Windows XP Service Pack 2 Support Tools中,可在华军或者微软官方下载:
http://www.onlinedown.net/soft/21532.htm
http://www.microsoft.com/downloads/de ... 谢谢了！！
来源：https://www.cn-dos.net/forum/viewthread.php?tid=31291 · 打印时间 2026-06-14 20:46