如何将.Net代码转换为vbscript？

Question

我需要将此代码转换为vbscript

SetAttr("C:\Users\" + Environment.UserName + "\Desktop\Client.exe", FileAttribute.Hidden)

任何人都可以在VBscript中获取上述代码吗？

Answer 1

您必须使用FileSystemObject。提示：这可以很容易地用Google搜索。

示例：

Sub HideFolderFiles(filespec)
    Dim fs, f, r 
    Set fs = CreateObject("Scripting.FileSystemObject") 
    Set f = fs.GetFolder(filespec).Files
    f.attributes = 2 'hidden
End Sub

来源：https://www.experts-exchange.com/questions/28054761/VBScript-to-set-file-attributes.html