Here is a dumbed down version of the code:
DoCmd.TransferText TransferType:=acImportDelim, SpecificationName:="TorS", TableName:="TorS", FileName:="F:\TorS.txt", HasFieldNames:=True
CurrentDb.Execute "SELECT NPA, CTN, STATUS, SWITCH INTO SW FROM TorS WHERE (((STATUS) Like '*POTS*'));"...