文件读写的问题！！！

[big_net]

兄弟们帮帮忙啊，在读写文件时候出现错误了－－－－
其中代码：
－－－－
do while 1
a1=trim(a.readline)'//////此句出现错误－－－
if a1="<!--新闻快讯结束-->" then
c.writeline a1
exit do
end if
loop
''
''将index-2.htm文件中在"<!--新闻快讯结束-->" 与"<!--最新供求开始-->"之间的内容原样写到index.htm之中；
错误提示：
Microsoft VBScript 运行时错误 错误 '800a003e'

输入超出了文件尾

/asp/flush-include/flush-index-4.asp，行75

我想问一下asp的readline最多读入多少个字符－－
thanks!!!
备注：我的网站感染病毒，代码都集中到一行了－－是不是这个原因－－

[ssm1226]

可能，asp代码放在一行，没有分隔符会出错的

[tpProgramer]

如果按你所说，很简单的原因：
因为你的"<!--新闻快讯结束-->"已经不是一行了
所以你的读文件的循环永远都不能结束(因为if a1="<!--新闻快讯结束-->" 条件不成立)
所以就出现了超出文件尾的错误。

你应该这样修改判断条件（是思路而不是代码）：

if a1中含有字符串"<!--新闻快讯结束-->"


不过这样做的前提是你的文件中只有一个地方会出现 "<!--新闻快讯结束-->"字样。
达到这个目的好像是InStr函数 吧？你查查看
InStr([start, ]string1, string2[, compare])

祝 好运！

[25475360]

还有在 DO WHILE 后在加上 A1 不为空或文件是否结束,不然会死循环的

[shuangyulove]

这样就是读文件时，文件中已到最后了，要做一个判断

[big_net]

over!!!

[big_net]

撒旦非工作室