將訪問查詢導出爲文本文件換行

Question

我正在爲將要導出到文本文件的訪問數據庫創建一個sql查詢。這些要求包括分隔每條生產線的換行。這是默認情況下發生的，還是我需要添加的東西？ 如果我需要添加它，我該怎麼做？

TIA

Answer 1

TransferText包括換行，我相當肯定最讓文本進出將包括換行，除非你做一些事情來阻止它的方法。檢查並不困難。

Dim fs As New FileSystemObject 

s = "c:\docs\test.txt" 
DoCmd.TransferText acExportDelim, , "query6", s 
Set f = fs.OpenTextFile(s) 
a = f.ReadAll 

''Split at linefeed: Chr(10) 
aa = Split(a, Chr(10)) 

''Test 1 
Debug.Print UBound(aa) 

''Test 2 
For Each itm In aa 
    Debug.Print itm 
Next