VBA/Excel/Access/Word/Access/Text Transfer

Материал из VB Эксперт

Перейти к: навигация, поиск

acImportDelim

 
Private Sub cmdImportDelimited_Click()
    DoCmd.TransferText acImportDelim, "CompanyDelimited", "tblCompanyDelimited", "C:\Delimited.txt", True
End Sub



acImportFixed

 
Private Sub cmdImportFixed_Click()
    DoCmd.TransferText acImportFixed, "CompanyFixed", "tblCompanyFixed", "C:\CompanyFixed.txt", True
End Sub