VBA用SQL方法连接TXT文件有关问题
VBA用SQL方法连接TXT文件问题
cnn.Open sql
这句错误,提示路径不对,但我连接EXCEL或ACCESS都没有问题,而且123.txt位置也没有问题!!!!!!
------解决方案--------------------
怎么解决的?
- VB code
Sub aa() Dim cnn As New Connection 'Dim aa As New 数据库字符串 sql = "Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties='text;IMEX=1;HDR=NO;FMT=Delimited;';Data Source=" & ThisWorkbook.Path & "\123.txt" cnn.Open sql If cnn.State = 1 Then '判断是否连接成功 MsgBox "连接成功" Else: MsgBox "no" End If End Sub
cnn.Open sql
这句错误,提示路径不对,但我连接EXCEL或ACCESS都没有问题,而且123.txt位置也没有问题!!!!!!
------解决方案--------------------
怎么解决的?