DIR命令无法获得精确到秒的问题 方法一,dir命令只能到分钟,如果需要到秒,建议改用forfiles命令 REM “delims=” is required to avoid stripping AM/PM for /f “delims=” %%i in (‘”forfiles /p C:\Users\limc /m *.bat /c “cmd /c echo @fdate @ftime” “‘) do set modif_time=%%i echo %modif_time% 参考 https://docs.microsoft.com/en-us/previous-versions/windows/it-pro/windows-server-2012-R2-and-2012/cc753551(v=ws.11)?redirectedfrom=MSDN 方法二,用VBS的FileSystemObject方式解决 @set @n=0/*&echo off dir /a-d/s/b|Cscript -nologo -e:jscript “%~f0” > 1.txt pause&exit /b */ var fso=new ActiveXObject(‘scripting.FileSystemObject’); while(!WSH.StdIn.AtEndOfStream) { file=fso.GetFile(WSH.StdIn.ReadLine()); t=new …
Tag Archives: VBA
[VBA]Base64编码和Base64解码
VBA实现Base64编码和Base64解码,用于处理加密的URL非常方便。 VBA Base64 编码/加密函数: ‘VBA Base64 编码/加密函数: Function Base64Encode(StrA As String) As String ‘Base64 编码 On Error GoTo over ‘排错 Dim buf() As Byte, length As Long, mods As Long Dim Str() As Byte Dim i, kk As Integer kk = Len(StrA) – 1 ReDim Str(kk) For i = 0 To kk Str(i) = Asc(Mid(StrA, …