大家看看小弟我的几行asp代码哪里有有关问题
日期：2014-05-17 浏览次数：21011 次
大家看看我的几行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
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
