查看文件修改时间精确到秒

yjqd

@echo off
cd /d %~dp0
echo.
set /p a=请输入文件路径:
start 查看文件修改时间精确到秒.vbs /b:%a%



查看文件修改时间精确到秒.vbs内容：
set wshnamed=wscript.arguments.named
va=wshnamed.item("b")

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(va)
MsgBox va&vbLf &vbLf &"创建时间：" & objFile.DateCreated & vbLf & "修改时间：" & objFile.DateLastModified
Set objFile = Nothing
Set objFSO = Nothing

yjqd

还是那些高手厉害
一个文件搞定
把下面保存为批处理
：:On Error Resume Next
:Sub bat
echo off & cls

echo '>nul & set /p a=请输入文件路径:
echo '>nul & start "" wscript //e:vbscript "%~f0" %* /b:%a%
Exit Sub : End Sub

Set Wshnamed=wscript.arguments.named
Va  = Wshnamed.item("b")

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(va)
MsgBox va&vbLf &vbLf &"创建时间：" & objFile.DateCreated & vbLf & "修改时间：" & objFile.DateLastModified
Set objFile = Nothing
Set objFSO = Nothing

或者
echo '>nul & start "" wscript //e:vbscript "%~f0" %* /b:%a%替换为：
echo '>nul & for /f "delims=" %%a in ('cscript //Nologo //e:vbscript "%~f0" %* /b:%a%') do echo.&echo %%a
echo '>nul & echo.
pause

MsgBox 替换为：wscript.echo

365天的思念

嘻嘻嘻，路过，踩一下先

enet007

感谢分享，谢谢你们~~