求助:怎样将这种内容的文本文件读出插入到SQL的一个表中

[kd_zyh]

文件内容(INVOUT.TXT)
SJJK0201~~已开发票传出
780~~20060901~~20060930
//发票1
0~~0~~0~~5200061140~~00027277~~1~~20060921~~09~~~~156177.47~~0.17~~26550.17~~柳州市城贸金属材料有限责任公司~~450205715125165~~柳州市红碑路红卫市场西区58号0772-2515089~~柳州市农行柳南支行营业部108101040004738~~水城钢铁(集团)有限责任公司~~520201214409696~~六盘水市钟山区巴西中路 0858-8922858~~六盘水市工行水钢办事处2410080309022111540~~运费:5477.60 附件:3张~~冯丽颖~~~~
0~~螺纹钢~~25~~吨~~61.318~~156177.47~~0.17~~26550.17~~2980~~1~~
//发票2
0~~0~~0~~5200061140~~00027278~~1~~20060921~~09~~~~313811.23~~0.17~~53347.91~~厦门市路桥工程物资公司~~350204155053780~~厦门市海虹路5号5828850~~兴业银行厦门分行9680111200004813~~水城钢铁(集团)有限责任公司~~520201214409696~~六盘水市钟山区巴西中路 0858-8922858~~六盘水市工行水钢办事处2410080309022111540~~运费:10459.50 附件:6张~~冯丽颖~~~~
0~~螺纹钢~~12~~吨~~118.748~~313811.23~~0.17~~53347.91~~3091.91852~~1~~

说明:此文本文件内容是从客户的一个应用软件中导出的,需要读取其中的一部份数据导入另外一个系统中。只要能读出其中的内容到SQL的一个表中，我问题就解决了，请各位高手救命啊！！！

[caixia615]

看这个文件就觉得挺崩溃的,MARK一下~!

[a2krh]

vb.net 中可以用
Dim strArr as string()
strArr = split(发票1,"~~")

出来的

strArr(0) = 0
strArr(1) = 0
strArr(2) = 0
strArr(3) = 5200061140
.
.
.

后面的只要做一个insert 就可以了吧