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
注意:如果要试验的话,请把那两个数字设置小点,不然,你试试就知道了。
猜你喜欢
转载自qt726qt.iteye.com/blog/1363173
今日推荐
周排行