我读的文本是这样的:
   User: admin    Time: 11:30   Date: 02-25

解决方案 »

  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.RecordsetPrivate 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