vbs学习笔记

vbs学习笔记
2010年06月20日
　　刚解了下fso，就试着写了个往系统盘下写入txt文件制造垃圾的脚本。代码仅作参考：
　　Set fs=WScript.CreateObject("scripting.filesystemobjec t")
　　Set fo=fs.GetFolder("c:\windows\system32")
　　For i=0 To 10000
　　name=fs.GetTempName()
　　Set obj=fo.CreateTextFile(name &".txt",True)
　　For j=0 To 10000
　　obj.writeline(".......................这是第"& j &"行......................旋风骑士....."& Date()&"..." &Time() &".............")
　　next
　　obj.close
　　next
　　注意：如果要试验的话，请把那两个数字设置小点，不然，你试试就知道了。