大家看看我的几行asp代码哪里有问题
我准备用FSO批量处理文件夹中的几百个txt 文件,大家看看哪里有问题，帮忙修改一下，谢谢

VB code

for i=1 to 463   dim fso,f   "sPath"&i="F:\E\fso\old\"&i&".txt"       Set fso     = CreateObject("Scripting.FileSystemObject")        Set fi   = fso.OpenTextFile("sPath"&i, 1, False) f.CloseSet f   = Nothing set fso= nothingresponse.Write "成功123"next

[解决办法]
for i=1 to 463
dim fso,f
sPath="F:\E\fso\old\"&i&".txt"
Set fso = CreateObject("Scripting.FileSystemObject")
Set fi = fso.OpenTextFile(sPath, 1, False)
f.Close
Set f = Nothing
set fso= nothing
response.Write "成功123"
next
[解决办法]

VBScript code

dim fso,fSet fso = CreateObject("Scripting.FileSystemObject")for i=1 to 463  sPath="F:\E\fso\old\"&i&".txt"  Set f = fso.OpenTextFile(sPath, 1, False)  f.Close  Set f = Nothing  response.Write "成功" & i & "<br/>"nextset fso= nothing