Question

asp 怎么删除文本的最行一行

1 123123
2 1231231
3 2342342
4 345345
5
数据库就4条数据
但是每次光标都指向5 我想让光标指向4 不显示5
xmlfile=server.mappath("news1.txt")
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile(xmlfile,True)
set rs = server.CreateObject("adodb.recordset")
sql = "select * from Qianbo_News where SortID=1"
rs.open sql, conn, 1, 3
dim i
a=506
i=0
if not(rs.eof and rs.bof) then
do while not rs.eof
i=i+1
a=a+1
MyFile.WriteLine("&Result"&i&"="&rs("NewsName")&"&bianhao"&i&"="&a&"&ii="&i)
rs.movenext
loop
end if
MyFile.Close

循环出来 就是多一行 多出来 程序就不好使

Answer 1

你的代码有问题了！贴出来，帮你看看！