Question

set fs = CreateObject("Scripting.FileSystemObject")帮忙解释一下

Const ForReading =1, ForWriting = 2
set fs = CreateObject("Scripting.FileSystemObject")
set ts = fs.OpenTextFile(voteincdir,ForWriting, True)

Answer 1

Const ForReading =1, ForWriting = 2 '定义两个常量 一个为只读， 一个为可写。
set fs = CreateObject("Scripting.FileSystemObject") '创建文件系统对象
set ts = fs.OpenTextFile(voteincdir,ForWriting, True) '打开voteincdir中指定的文本文件。