[5分]如何利用ado导入txt文本文件？

在做一个项目，其中涉及导入有一定规则的txt文本文件。由于txt文件中的数据格式是固定的，比如都是用“|”或者空格作为分隔符，我只要在Access中建立相应的导入规则，然后再利用TransferText语句就可以完成txt文本中的数据导入，如：

DoCmd.TransferText , "Rule_92018", "tblCBS92018_tmp", strPathFileName 

这样做的优点就是很简单，易于上手，缺点就是不适合导入大量的数据，且无法实现进度条的应用。所以，我想知道能否利用ado进行导入（或其他方式），如何导入？

比如在txt文本文件中，是如下的数据排列方式（以空格为分隔符）

1 张三 男 26 辽宁 丹东 已婚
2 李四 男 29 辽宁 沈阳 未婚
3 莉莉 女 23 辽宁 大连 未婚

希望懂得这方面应用的朋友能给个思路，我自己没研究过ado，弄起来很费劲，最好是能连在导入过程中的进度条应用思路也一起加进来。谢谢！