以数据库方式打开文本文件
Dim ire As Recordset
Dim iConc As String
iConc = "Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=""Text;HDR=NO" & ";FMT=TabDelimited;DATABASE=c:\""" 'c:\文件目录
Set ire = New ADODB.Recordset
With ire
.CursorLocation = adUseClient
'abc#txt是要读取的文件名:abc.txt
.Open "select * from [11#txt]", iConc, adOpenKeyset, adLockOptimistic 为什么我以TAB制表符分界的文本,读出来还是一行一行的,我想让他们识别为两列:
17:30:43.04 MS2
17:30:43.10 MS1
17:30:43.10 MS1可我用来读CSV文件(逗号分界),返而是正常的,请赐教!
Dim ire As Recordset
Dim iConc As String
iConc = "Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=""Text;HDR=NO" & ";FMT=TabDelimited;DATABASE=c:\""" 'c:\文件目录
Set ire = New ADODB.Recordset
With ire
.CursorLocation = adUseClient
'abc#txt是要读取的文件名:abc.txt
.Open "select * from [11#txt]", iConc, adOpenKeyset, adLockOptimistic 为什么我以TAB制表符分界的文本,读出来还是一行一行的,我想让他们识别为两列:
17:30:43.04 MS2
17:30:43.10 MS1
17:30:43.10 MS1可我用来读CSV文件(逗号分界),返而是正常的,请赐教!
Format=TabDelimited
这样就可以了
1、修改schema.ini文件
2、将