求救！用ASP读写TXT文本文件的问题，请高手帮忙！！！

老师出了个课题，让我用ASP做一个库存商品数量的程序，要求用TXT文本文件，请高手指点一下！很急的啊！！！

例如：
现有的库存商品数量文件如下：
电视机    5
自行车    8
摩托车    4

要求编制一个管理程序，可以适时向这个文本文件添加数据，如有相同商品则自动将添加的数量与原有的商品数量相加，并写入其商品数总和。

我用以前一个朋友说的方法写文件成功了，但每次都会洗掉原有的数据重新写入，不知怎样自动从文本文件最下面或最上面添加数据。另，我不知怎样来判断文本文件中是否已有将要添加的商品名及如何实现让其数量相加并写入新数量的程序。
<%
set myfileobject=server.CreateObject("Scripting.FileSystemObject")
set mytextfile=myfileobject.OpenTextFile(server.MapPath("test.txt"),2,true)
text=商品名+" "+数量+vbCrLf
mytextfile.Write text
mytextfile.close
%>

8 个解决方案

#1

set mytextfile=myfileobject.OpenTextFile(server.MapPath("test.txt"),8,true)

这样就可以在文件尾写文件了！

#2

我赞同

#3

set mytextfile=myfileobject.OpenTextFile(server.MapPath("test.txt"),2,true)
换成：

set mytextfile=myfileobject.OpenTextFile(server.MapPath("test.txt"),8,true)
就ok了！

#4

<%
set fso=server.CreateObject("Scripting.FileSystemObject")

set mytextfile=fso.OpenTextFile(server.MapPath("test.txt"),8,true)
text="商品名"

mytextfile.Writeline vbCrLf & text
mytextfile.close
set fso=nothing
%>

#5

再请问：
'test.txt
电视机    5
自行车    8
摩托车    4

如果我在以上文件中添加3辆自行车，让文本文件里的数据自动相加变为“自行车    11”，应该怎么做呢？
大概思路就是：
1、用程序添加商品名和数量；（用表单做，已做好了！）
2、判断添加的商品名在文本文件中是否存在，如存在就将添加的数量与库存数量相加，并将相加的结果覆盖到已存在的数据上；如添加的商品名不在文本文件中，则在尾部添加新记录。
我不知道怎样读取文本文件中后面的那个数量和怎样用IF语句！望指教！

#6

我觉得你在写入文本信息是在数字前加入一个标志符，这样就好做多了！

#7

那就先把这个文本文件全部读出，然后分割内容判断你输入得内容时候已经存在，如果存在那么就把内容后面得那个数字自加，否则就添加一个新得行。我在php中用过这个功能。在asp中没有试过。不过我知道vbs中应该也有类似得分割字段变成数组得函数，只是我不是很清楚。往高手指点。

—————————————————————————————————
┏━★━━◆━━★━┓
♂欢|◢ＣＳＤＮ◣|使♂ 　　　　　　　▲*保存帖子，浏览，关注检测
┃迎|◥论坛助手◤|用┃ 　　　　　　　▲完善的ＣＳＤＮ客户端工具
┗━☆━━◇━━━☆┛　　　　　　　▲自动添加签名......

让你更快，更爽，更方便地上CSDN...
http://www.csdn.net/expert/topic/573/573604.xml
http://www.chinaok.net/csdn/csdn.zip

#8

顶！！望高手写出源程序！

#1