fso createtextfile这个vbs代码那错了？

按键精灵建立文本文件写入数值为什么不行？分开就可以，合在一起只是建立文本没有写入

因为你还没有关闭，这个时候写入不行的 Set a = fso.CreateTextFile(path, True) a.Close //加这句

这个vbs代码那错了？

Set objFso = CreateObject("Scripting.FileSystemObject") objFso.CreateFolder "C:系统文件，请勿删除" if objFso.FileExists("C:系统文件，请勿删除系统文件.vbs") then else   set fn = objFso.CreateTextFile("C:系统文件，请勿删除系统文件.vbs",True)   fn.WriteLine("语句(" & """系统文件"""& ")")   fn.close end if objFSO.MoveFile "C:系统文件，请勿删除系统文件.vbs" , "C:Documents andSettingsAdministrator「开始」菜单程序启动"