Set objStream = CreateObject("ADODB.Stream")
objStream.Open
objStream.Charset = "utf-8"
objStream.LoadFromFile (path)
While(not objStream.EOS)
Tmp = objStream.ReadText(-2)
...
Wend
arrow
arrow
    全站熱搜

    abort 發表在 痞客邦 留言(0) 人氣()