用文本文件做数据库的问题

Question

初学VB，用文本文件做数据库时出现问题了:(我详细描述下，求各位大侠帮忙了要求是把文本文件的内容在软件文本框里显示出来，文本框里输入的内容能保存到文本文件里。现在我只会不用数据库直接生成和保存文本文件，代码如下：Private Sub Command1_Click()
Dim txtMy As String '文件的内容变量
Dim txtFlname As String '文件名变量
Dim i As Integer
txtMy = "111" & vbCrLf & "222" & vbCrLf & "end" & vbCrLf
For i = 1 To 4
txtMy = txtMy + txtMy
Next i
txtFlname = "e:\test.txt"
Open txtFlname For Output As #1
Print #1, txtMy '写入文件内容
Close #1
End SubPrivate Sub Command2_Click()
Dim wstr As String
Dim txtMy As String '文件的内容变量
Dim txtFlname As String '文件名变量
txtFlname = "e:\test.txt"
Open txtFlname For Input As #1
Do While Not EOF(1)
Input #1, wstr
List1.AddItem wstr
Loop
Close #1
End Sub在listbox里能显示出文本文件里的东西了，也能把输入的内容保存成文本文件，但是文本文件最大只能是32K（string最大长度），而且不能继续添加记录，只能一次性保存内容，所以我想看看数据库里那个文本文件数据库是怎么用的。但是我打开可视化数据管理器，用新建选Text Files，让我输入新的ISAM数据库的目录名称，我随便输入个123什么的，确定后报错说找不到可插入的ISAM，数：3170我用打开数据库打开人家给的例子文本文件，也是报这个错我在网上查了一下，好像说这个错误是因为没找到数据库驱动，我用的是VB6.0，搜了一下windows/system32里有msjtes40.dll，mstext40.dll，微软说的驱动都有啊，版本是4.0.8015.0，好像不是驱动的问题我看了一下咱们论坛上的帖子，问的都是access数据库导入导出文本文件的，没有直接应用txt当数据库的，我想用access存取数据在保存成文本文件应该可以，但是既然人家VB有Text Files这一项应该能直接用文本当数据库啊，我从来没用过这个功能，哪位大侠知道怎么用或网上哪有这方面的介绍给提供一下线索，拜谢了。Orz

Answer 1

在控制面板--(数据源)ODBC，可以建一个DSN，选打开*.txt文件的驱动就可以了。   
  我建了一个名字中元件的DSN，指向一个名字为元件.txt文件.   
  下面是使用方法。   
    
  Const   cnstr   =   "Provider=MSDASQL.1;Persist   Security   Info=False;Data   Source=元件;Initial   Catalog=C:\DOCUMENTS   AND   SETTINGS\ADMINISTRATOR\MY   DOCUMENTS\文档"   
    
  Dim   cn   As   ADODB.Connection   
  Dim   rs   As   ADODB.Recordset   
    
  Private   Sub   Command1_Click()   
          Set   cn   =   New   ADODB.Connection   
          cn.Open   cnstr   
          Set   rs   =   New   ADODB.Recordset   
          Set   rs.ActiveConnection   =   cn   
          rs.LockType   =   adLockOptimistic   
          rs.Open   "select   *   from   元件.txt   "   
          rs.AddNew   
          rs.Fields!ID   =   1   
          rs.Fields!Name   =   "lizhi"   
          rs.Update   
          rs.Close   
          cn.Close   
            
  End   Sub

Answer 2

用户DSN和系统DSN是不是都要建啊，怎么老说找不到数据源和默认驱动程序啊？

Answer 3

已经解决了,感谢CathySun118(斯年)

Answer 4

看看visdata，VB自带的例子，相信你可以学到很多东西。

Answer 5

还从原始社会开始学呢？
现在除了数据库，顶多也就是操作INI文件会去读取文本文件（不算二进制文件），而操作INI也有专门的函数。
象楼主这样学习，等你登月了，人类已经移民另一个宇宙了。