VB读定长的文本文件到Oracle里，都需要什么函数啊？？？

Question

——  ———— ——————  
SS    name     artess        等等之类。第一行和最后一行不读。请问都会用到什么函数，谢谢。

Answer 1

Dim FileStr As String
Dim FileNumber As Integer
Dim sStr As String
Dim Flder As String
Flder = "c:\ABC\1.txt"    
FileNumber = FreeFile
    Open Flder For Input As #FileNumber
    Do While Not EOF(FileNumber)
    Line Input #FileNumber, sStr
    Debug.Print sStr
    '或 Do Something
    Loop
    Close #FileNumber