[VBA ] adodb.stream怎ReadLine?

楼主: vernc (cralvin)   2015-01-20 17:20:19
本来是用fso作的,发现日文会乱掉改用adodb.stream
tmp=Trim(TrageTextFile.ReadLine)
请问fso版的这行在adodb.stream该怎么做呢
.ReadLine的adodb.stream版是什么?
thx
Dim str
Set stm=CreateObject("adodb.stream")
stm.Type=2 '以本模式读取
stm.mode=3
stm.charset="Shift-JIS"
stm.open
stm.loadfromfile "20140701_ex01.html"
str=stm.readtext
stm.Close
Set stm=nothing

Links booklink

Contact Us: admin [ a t ] ucptt.com