大家看看小弟我的几行asp代码哪里有有关问题
大家看看我的几行asp代码哪里有问题
我准备用FSO批量处理文件夹中的几百个txt 文件,大家看看哪里有问题,帮忙修改一下,谢谢
------解决方案--------------------
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
------解决方案--------------------
我准备用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.Close Set f = Nothing set fso= nothing response.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,f Set 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/>" next set fso= nothing