如何通过vbs修改以点结尾的文件属性为隐藏？

rem 修改以点结尾的文件的属性为“隐藏”
@echo off
set DstFile=C:\test\batcher.
>"%temp%\FileProperty.vbs" echo Set objFSO = CreateObject("Scripting.FileSystemObject").GetFile("\\?\%DstFile%.\")
>>"%temp%\FileProperty.vbs" echo objFSO.Attributes=objFSO.Attributes+1+2
cscript /nologo "%temp%\FileProperty.vbs"