摘要: 最近没有在写vbs的代码,小试牛刀Option ExplicitDim args, argSet args = WScript.ArgumentsFor Each arg In argsChangeFileAttributes(arg)NextSub ChangeFileAttributes(file)Dim hfile, finalResultDim fsoSet fso = WScript.CreateObject("Scripting.Filesystemobject")Set hfile = fso.GetFile(file)finalResult = 0If vb 阅读全文
posted @ 2013-10-17 13:02 SemiCoder 阅读(205) 评论(0) 推荐(0)