vb调用文本文档

Question

有一个软件自动按日期生成文本文档，一天一个。现在需要编一个程序自动调用这些文本文档，对其内容进行查询。有几个问题想请教。
1、这些文本文档为什么在excel表格里打不开？我将它们的内容复制到新建的文本文档里，再用excel导入却可以。
2、怎么样调用这些文本文档比较方便呢？能直接调用么？里边的内容是规则的，每一行都是内容+空格+日期时间。还是说先转换成excel表呢？
3、如何自动调用？一头雾水中……可以提供一些代码参考不？

Answer 1

用VB处理文本文件的函数直接处理文本就可以了，没必要再搞成Excel。
如果文件不大可以合并成一个文本文件来处理。
获取目录下的文件名可以用Dir函数或Dir控件+File控件。
处理文本可以用FileSystemObject对象和TextStream对象。
查查MSDN。

Answer 2

1、你用什么能打开，查看文档编码类型。
2、规则文本文件可以当数据库使用，可以用ADO打开，便于查询。

Answer 3

文档编码类型都是ANSI，是后缀的问题。找到方法批量更改。但是文件夹里会不断产生新的TXT，以日期命名，如2010611等。想建立数据库编个小程序可以查询什么的，但不知道怎样做点击按钮就可以实现该文件夹里所有的TXT均导入到ACCESS

Answer 4

递归查找文件夹下的TXT（*.后缀）,然后依次处理就行了。
查找文件的方法如下：
    Dim file As String    
    file = Dir("E:\电影\*.txt")
    
    Do While file <> ""
        Debug.Print "E:\电影\" & file
        file = Dir()
    Loop

Answer 5

    Open CommonDialog1.FileName For Input As #1
    Do Until EOF(1)
        Line Input #1, inputData
        i = i + 1
    Loop
    Close #1
其中commondialog為打開文件對話框